Danke Rolf, ich teste mal.
Ähhmm
<18msec pro kB ist doch ganz nett, oder? >
Rechne ich da richtig ? 460k mal 0,018 = 8,28sec ?
Ich habe unter Delphi 9-10 sec gemessen, also ganz grob
Edit6.Text:= FormatDateTime('hh:nn:ss', now);
MyProcedure....
Edit7.Text:= FormatDateTime('hh:nn:ss', now);
Edit......
Ne Rolf, habe die Datei umbenannt, aber siehe Bild.
Gruß Frank