database若为oracle
with Query do
begin
close;
sql.clear;
sql.add('begin');
sql.add('一段sql语句');
sql.add('一段sql语句');
.
.
.
sql.add('end;');
execsql;
end;
with Query do
begin
close;
sql.clear;
sql.add('begin');
sql.add('一段sql语句');
sql.add('一段sql语句');
.
.
.
sql.add('end;');
execsql;
end;
while not eof
begin
//doyourself;
next;
end;