TQuery

[Bummi]

TAdoConnection.Execute(SQL) Du wirst allerdings Deinen SQL zu zelegen müssen, also vorzugsweise einzelene GO 's in einer eigene Zeile

Delphi-Quellcode:

While eine enthaltene Zeile = 'GO' dann
  begin
   SQL := zeilen bis Ausschließlich  GO-Zeile
   AdoConnection.Execute(SQL)
   Löschen bis Einschlißlich GO-Zeile
  end;
--gegf. vorhanden rest reinschießen
  AdoConnection.Execute(SQL)

Create(
...)

GO

Create(
....)
GO
Alter ()