请问添加数据有关问题

请教添加数据问题。
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;