我用了通配符的这一段程序怎么运行起来总是报错？

Question

k:=edit2.Text;
    Q_select.Close;
    Q_select.SQL.Clear;
    Q_select.SQL.Add('select xjjbxx.xh,xjjbxx.xm,xjjbxx.xb as xb,xjjbxx.csny as csny,xjjbxx.yxdm,xjjbxx.address,xjjbxx.hcz,xjjbxx.rxsj as rxsj,dm_yx.yxmc as yxmc,dm_bj.bjmc as bjmc  ');
    Q_select.SQL.Add('from xjjbxx,dm_bj,dm_yx');
    Q_select.SQL.Add('where xjjbxx.yxdm=dm_yx.yxdm and dm_zy.zymc='''+DB_zy.text+'''');
    Q_select.SQL.Add(' and xjjbxx.bjdm=dm_bj.bjdm and xjjbxx.yxdm=dm_yx.yxdm ');
    Q_select.SQL.Add(' and xjjbxx.xh like  k%;');
    Q_select.ExecSQL;
    Q_select.Open;

Answer 1

    Q_select.SQL.Add(' and xjjbxx.xh like  k%;');
改成：    Q_select.SQL.Add(' and xjjbxx.xh like'+''''+Edit2.text+'%'+'''')
试一下

Answer 2

Q_select.SQL.Add(' and xjjbxx.xh like  ''k%'';');

Answer 3

Q_select.SQL.Add(' and xjjbxx.xh like  ''' + k + '%'';');

Answer 4

if k='' then
  Q_select.SQL.Add(' and xjjbxx.xh like ''%'';');
else
  Q_select.SQL.Add(' and xjjbxx.xh like ''%'+k+'%'';');

Answer 5

if k='' then
  Q_select.SQL.Add(' and xjjbxx.xh like ''%'';')
else
  Q_select.SQL.Add(' and xjjbxx.xh like ''%'+k+'%'';');