Einzelnen Beitrag anzeigen

Klaus01
Online

Registriert seit: 30. Nov 2005
Ort: München
5.755 Beiträge
 
Delphi 10.4 Sydney
 
#2

AW: TStreamReader & TFileStream freeze nach laden von 140k Zeilen in Record.

  Alt 20. Sep 2021, 06:08
Guten Morgen,

Delphi-Quellcode:
   inc(AnzahlKerzen);
   if anzahlkerzen mod 9999 = 9998 then memo1.Lines.Add('durchgang');
   //form1.Caption := 'Candle Bot - reading Candle Nr.:'+inttostr(AnzahlKerzen)+' from '+ ExtractFileName(filename);
wenn Du das Update der Form Caption auskommentierst - legt Dein Programm keine Pause mehr ein.

Grüße
Klaus
Klaus
  Mit Zitat antworten Zitat