delphhi

求助：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));