IdR. ist eine
Query Komponente nicht mal in der Lage, ein Script(mehr als einen Befehl hintereinander) auszuführen. Dafür gibt es separate Scriptkomponenten.
Einspruch, zumindest für Firebird >=2.x kannst du mehrere insert/update/delete Befehle semikolon getrennt zB in einer TSTringlist sammeln, dann schreibst du EXECUTE BLOCK AS BEGIN davor und ein END dahinter und schon kannst du mit nahezu jeder
SQL Query Komponente mehrere Befehle auf ein mal senden (Bei manchen Komponenten musste du deren interne Prüflogik abschalten, wenn die zu blöd sind, execute blocks korrekt zu erkennen).
Das beschleunigt die Ausführung noch mal erheblich, hat aber ein paar Grenzen (maximal 255 Relationen pro block, also 255 inserts oder 127 updates oder 85 "update or insert", gerne aber auch gemischt, als Richtwert einfach maximal 80 Befehle pro Block, gesamter source kleiner als 32k,...)
Bei solchen Anforderungen bringt das erhebliche Geschwindigkeitsvorteile aus einer Delphi/Lazarus Anwendung, aber wie die anderen schon sagten, man sollte bei der Geschwindigkeitsmessung die Zeit nicht verplempern mit visualisierungen, es bringt dir nix an Erkenntnissen zur Optimierung deiner
SQL Operationen, wenn die SQLs am ende für 1% der Laufzeit verantwortlich sind und 99% irgendwelche TMemos auf dem Screen vertrödeln
Außerdem nicht vergessen, wenn es um High Speed geht, hilft auch die Benutzung des lokalen Protokolls xnet oder noch schneller importe per external tables ...
Aber mal ganz ehrlich, dein Source ist aus meiner Sicht nicht annähernd hilfreich, um den
SQL Speed neutral zu bewerten, dafür solltest du klarer trennen zwischen Zeitaufwand für das senden der
SQL Befehle und irgendwas anzuzeigen. Nicht vergessen, 10000 mal 1ms sind 10 Sekunden