请教添加数据问题。
procedure TForm1.btn1Click(Sender: TObject);
var
a,S:string;
begin

a:=edt1.Text;
b:=edt2.Text;

s:='insert into GS (GS001,GS002) VALUES (a,b)' ;

ShowMessage(s);
with qry1 do
begin
Close;
sql.Clear;
SQL.add(s);
Open;
end;
end;

想在表GS里面的GS001,GS002添加一行数据a是数字型b是文字型的。
ShowMessage时候看到里面的数据还是ab并不是edt1和edt2里面的。
应该怎么样做呢？


[解决办法]
s:='insert into GS (GS001,GS002) VALUES (' + Edt1.Text + ',' + edt2.Text + ')';
Open改为Execute;
[解决办法]

Delphi(Pascal) code

procedure TForm1.btn1Click(Sender: TObject);begin  with qry1 do  begin    Close;    sql.Clear;    SQL.add('insert into GS (GS001,GS002) VALUES (:a,:b)');    Parameters.ParamByName('a').Value:=edt1.Text;    Parameters.ParamByName('b').Value:=edt2.Text;    ExecSQL;  end;end;