result:=false;
try
with query1,SQL do begin
Clear;
Add(' insert into a values(g1,g2)');
ExecSQl;
Clear;
Add(' insert into b values(g3,g4,g5)');
ExecSQl;
Clear;
Add(' insert into c values(g6,g7,g8,g9,g10)');
Execsql;
end;
result:= True;
except
raise;
end;
是这样吗?