sql语句执行提示没有默认值

Question

var
  i:integer;
begin
  showmessage(dxdbtreeview1.DBSelected.KeyFieldValue);
  i:=dxdbtreeview1.DBSelected.KeyFieldValue;
  adoquery1.SQL.Clear;
  adoquery1.SQL.Text:='select * from laowu where groupid=i';
  adoquery1.open;
end;把 adoquery1.SQL.Text:='select * from laowu where groupid=i';
改为adoquery1.sql.text:='select * form laowu where groupid=1'就正常。

Answer 1

adoquery1.SQL.Text:='select * from laowu where groupid='+IntToStr(i);

Answer 2

adoquery1.SQL.Text:='select * from laowu where groupid=+'inttostr(i);

Answer 3

adoquery1.SQL.Add:='select * from laowu where groupid=+'inttostr(i);

Answer 4

var
  i:integer;
adoquery1.SQL.Text:='select * from laowu where groupid=i';
编辑过了吗？
adoquery1.SQL.Text := 'select * from laowu where groupid=isnull('+StrToInt(i)+',0)';