谁用过这样的语句，答对者高分！（再现等待）

[delphiyesgood]

with adozbcx do
begin
close;
sql.Clear;
sql.Add('update zzlr set zzdf=case when zzwc>='''+floattostr(ha)+''' then zzdf=5*100*zzqz when zzwc<'''+floattostr(ha)+''' and zzwc>='''+floattostr(jh)+''' then zzdf=4*100*zzqz when zzwc<'''+floattostr(jh)+''' and zzwc>='''+floattostr(yb)+''' then zzdf=3*100*zzqz');
sql.Add('zzwc<'''+floattostr(yb)+''' and zzwc>='''+floattostr(jc)+''' then zzdf=2*100*zzqz when zzwc<'''+floattostr(jc)+''' and zzwc>='''+floattostr(zc)+''' then zzdf=100*zzqz when zzwc=0 then zzdf=0');
prepared;
showmessage(sql.Text);
open;
在程序运行中报 select 第一行=附近语法错误。第一次在 delphi中使用 update set when then 语句，请高手指点，困惑中........

[愉快的登山者]

sql.Add('update zzlr set zzdf=(case when zzwc>='''+floattostr(ha)+''' then zzdf=5*100*zzqz when zzwc<'''+floattostr(ha)+''' and zzwc>='''+floattostr(jh)+''' then zzdf=4*100*zzqz when zzwc<'''+floattostr(jh)+''' and zzwc>='''+floattostr(yb)+''' then zzdf=3*100*zzqz');
sql.Add(' when zzwc<'''+floattostr(yb)+''' and zzwc>='''+floattostr(jc)+''' then zzdf=2*100*zzqz when zzwc<'''+floattostr(jc)+''' and zzwc>='''+floattostr(zc)+''' then zzdf=100*zzqz when zzwc=0 then zzdf=0 end)');

[happydreamer]

sql.Add('update zzlr set zzdf=
(case when zzwc>='''+floattostr(ha)+''' then zzdf=5*100*zzqz
when zzwc<'''+floattostr(ha)+''' and zzwc>='''+floattostr(jh)+''' then zzdf=4*100*zzqz
when zzwc<'''+floattostr(jh)+''' and zzwc>='''+floattostr(yb)+''' then zzdf=3*100*zzqz');

sql.Add( when 这里你少了一个when

'zzwc<'''+floattostr(yb)+''' and zzwc>='''+floattostr(jc)+''' then zzdf=2*100*zzqz
when zzwc<'''+floattostr(jc)+''' and zzwc>='''+floattostr(zc)+''' then zzdf=100*zzqz
when zzwc=0 then zzdf=0' end)');

[delphiyesgood]

to:tj_dns(愉快的登山者)
加上括号、when依然报同样的错误，update set when then 在delphi中能实现吗？谢谢！

[yoki]

加上括号、when的同时后面还要加 end

[yoki]

可能你最后面丢了一个end

[delphiyesgood]

全都加上了,可还是报第一行=附近语法错误,这到底为什么?

[egg629]

检查前面的过程