求助：delphhi
procedure Tfrmcpxg.btnokxgClick(Sender: TObject);
begin
if edtsrcm.Text='' or edtxgdj.Text='' or comboxgcl.Text='' then
messagedlg('输入信息不完整！请重新输入！',mterror,[mbok],0)
else
begin
adoqueryxg.Close;
adoqueryxg.SQL.Clear;
adoqueryxg.SQL.Add('update dishs set 菜名='+edtsrcm.Text+',单价='+strtofloat(edtxgdj.Text)+',菜类='+comboxgcl.Text+',备注='+memoxgbz.Text+'where 菜号='+edtxsch.Text);
adoqueryxg.Open;
end;
有错误
[Error] ucpxg.pas(70): Operator not applicable to this operand type
[Error] ucpxg.pas(70): Operator not applicable to this operand type
[Error] ucpxg.pas(76): Incompatible types: 'String' and 'Extended' delphi 编译错误 String
[解决办法]
adoqueryxg.SQL.Add('update dishs set 菜名='+QuotedStr(edtsrcm.Text)+',单价='+strtofloat(edtxgdj.Text)+',菜类='+QuotedStr(comboxgcl.Text)+',备注='+QuotedStr(memoxgbz.Text)+'where 菜号='+QuotedStr(edtxsch.Text));