also ich würde das erst mal umstellen:
Delphi-Quellcode:
ATable := TTable.Create(nil);
ATable.DatabaseName := ADataBase;
for i := 0 to Pred(500) do
begin
ATable.TableName := ATableName;
ATable.Open;
... Werte auslesen
ATable.Close
end;
ATable.Free;
Ob damit Dein Fehler schon beseitigt ist, kann ich nicht versprechen.
Aber die Sache wird sicher einiges schneller...
Klaus E.
Linux - das längste Text-Adventure aller Zeiten...
Wer nie Linux mit dem vi konfiguriert hat, der hat am Leben vorbei geklickt.