hast du schonmal versucht dir erst den kompletten insert string zu schreiben und ihn dann nur einmal ausführen?
also so:
Delphi-Quellcode:
for i := 0 to ende do begin
sqlString := sqlString + ',INSERT INTO '+Tabelle+' VALUES ('+werte+')';
end;
Delete(sqlString,1,1);
adocom_tmp.CommandString := sqlString;
adocom_tmp.Execute;
also quasi die ganzen Inserts mit Komma getrennt auflisten und dann ausführen... müsste auch um einiges schneller gehen...
wenn du dann noch die grafische ausgabe komplett unterbindest müsste das unterhalb einer Minute durchlaufen!
(obiger Code nicht getestet... das heisst es könnten sich kleine Fehler eingeschlichen haben!)