delphi sql字符串怎么连接一个整数呢?

Question

如下：ProID是一个整数,sql字符串使用+连接起来报错。把+当成数学运算符处理了。把ProID转换成字符串也不行啊，数据库的字段ProductID是整数，运行时会有SQL语法错误。请问怎么处理啊。procedure TfrmMain.CommandSearch;
var
sql:string;
ProID:integer;
begin
    ProID:=untProductManage.frmProductManage.GetProductLineID(self.txtProduct.Text);
    sql:='select * from T_Command where Cmd like ''%'+self.txtCommandSearchKey.Text+'%'' and ProductID like ''%'+ProID+'%''';
    sql:=  sql+' or CmdName like ''%'+self.txtCommandSearchKey.Text+'%''';
    self.CommandQuery.Active:=false;
    self.CommandQuery.SQL.Clear;
    self.CommandQuery.SQL.Add(sql);
    self.CommandQuery.Active:=true;end;[Error] untMain.pas(791): Incompatible types: 'String' and 'Integer'

Answer 1

  sql:='select * from T_Command where Cmd like '+QuotedStr('%'+self.txtCommandSearchKey.Text+'%')+' and ProductID like '+QuotedStr('%'+ProID+'%');
  sql:= sql+' or CmdName like '+QuotedStr('%'+self.txtCommandSearchKey.Text+'%');

Answer 2

ProID 改为 IntToStr(ProID)