with QueryWsdSet do
begin
close;
SQL.Clear;
if SelectedNode.Level=0 then
//SQL.Add('update settingT set wdsx=Ewsx.Text, set wdxx=Ewxx.Text, set sdsx=Essx.Text, set sdxx=Esxx.Text');
SQL.Add('update settingT set wdsx=:wdsx, set wdxx=:wdxx, set sdsx=:sdsx, set sdxx=:sdxx');
if SelectedNode.Level=1 then
SQL.Add(format('update settingT set wdsx=:wdsx, set wdxx=:wdxx, set sdsx=:sdsx, set sdxx=:sdxx where cf=%d',[StrToInt(CurrNodeId)]));
if SelectedNode.Level=2 then
SQL.Add(format('update settingT set wdsx=:wdsx, set wdxx=:wdxx, set sdsx=:sdsx, set sdxx=:sdxx where cf=%d and hw=%d',[ParentNodeId,CurrNodeId]));
QueryWsdSet.ParamByName('wdsx').AsFloat := strToFloat(Ewsx.Text);
QueryWsdSet.ParamByName('wdxx').AsFloat := strToFloat(Ewxx.Text);
QueryWsdSet.ParamByName('sdsx').AsFloat := strToFloat(Essx.Text);
QueryWsdSet.ParamByName('sdxx').AsFloat := strToFloat(Esxx.Text);
QueryWsdSet.execsql;
end;
提示说我SET附近有语法错误,到底怎么回事呀
begin
close;
SQL.Clear;
if SelectedNode.Level=0 then
//SQL.Add('update settingT set wdsx=Ewsx.Text, set wdxx=Ewxx.Text, set sdsx=Essx.Text, set sdxx=Esxx.Text');
SQL.Add('update settingT set wdsx=:wdsx, set wdxx=:wdxx, set sdsx=:sdsx, set sdxx=:sdxx');
if SelectedNode.Level=1 then
SQL.Add(format('update settingT set wdsx=:wdsx, set wdxx=:wdxx, set sdsx=:sdsx, set sdxx=:sdxx where cf=%d',[StrToInt(CurrNodeId)]));
if SelectedNode.Level=2 then
SQL.Add(format('update settingT set wdsx=:wdsx, set wdxx=:wdxx, set sdsx=:sdsx, set sdxx=:sdxx where cf=%d and hw=%d',[ParentNodeId,CurrNodeId]));
QueryWsdSet.ParamByName('wdsx').AsFloat := strToFloat(Ewsx.Text);
QueryWsdSet.ParamByName('wdxx').AsFloat := strToFloat(Ewxx.Text);
QueryWsdSet.ParamByName('sdsx').AsFloat := strToFloat(Essx.Text);
QueryWsdSet.ParamByName('sdxx').AsFloat := strToFloat(Esxx.Text);
QueryWsdSet.execsql;
end;
提示说我SET附近有语法错误,到底怎么回事呀
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货