Neuzeichnen von TStatusbar

[Neelix]

Das:
dmCopyVertrag.qu_tmp_blabla_11.ExecSQL; Dahinter verbirgt sich u.a. so etwas

SQL-Code:

INSERT INTO tmp_blabla_1
SELECT distinct b2.bla_2, b3.bla_3 
FROM blabla_21 b2, tmp_blabal_31 b3
WHERE b2.bla_22 = b3.bla_32
AND b2.bla_23 = b3.bla_33

Und davon gibt es mehrere. Eingefügt werden 1000 und mehr Datensätze und selectiert wird über Tabellen mit mehreren Tausend Datensätzen.

Und um gleich der Frage vorzubeugen, warum ich nicht erst mal mit wenigen Datensätze teste: Ich nutze das Programm zur Zeit im "scharfen Betrieb" und versuche nur nebenbei die Anzeige in der Statuszeile wieder hinzubekommen.