Delphi-PRAXiS - Delphi Zugriffsteit "messen"

Hi...
Ich erstelle für jeden Datensatz in einem Query eine XML Datei (ca. 3500) Dateien...
Das geht eine Weile...

... ich lasse also den Fortschritt über eine Progressbar anzeigen, das funktioniert auch.

Nur möchte ich zusätzlich anzeigen wie lange das Programm brauch bis alle Dateien erstellt sind und
welcher (x von xy) Datensatz bearbeitet wird. Ich habs mit einem Timer und einem Label versucht,
wenn die Forschleife startet, setze ich Timer1.enabled := true, er soll mir die Zeit in ms in das Label
schreiben, nur leider passiert gar nichts... er ist genug beschäftigt mit dem erstellen der Files...

Aber die Progressbar wird ja auch aktualisiert und angezeigt, dann sollte das doch auch für die Zeit und den
bearbeiteten Datensatz gehen, nur WIE?

Wie krieg ich das hin, Label1.Refresh funktioniert auch nicht...

LG

Cherry