How to execute this query

[Orhan Dogan]

I'm using delphi7 and ado.
my commands:

Var
sql:String;
begin
sql:='Insert into table1 (F1,F2,F3) values(1,2,3);';
sql:=sql+'Insert into table2 (F4,F5,F6) values(4,5,6);';
AdoConnection.Execute(sql);
end;

I want single query execute.

I'm running this query in mssql server