ProgressBar bei LoadFromFile in TListBox

[bodenheim]

Zitat von OregonGhost:

Auch das Einlesen von 10 MB sollte nicht länger als zwei Sekunden dauern,

??

ich weiss worauf ihr hinaus wollt, Problem ist so,

die Dateien sind 5-6 MB groß und wenn ich lade, hängt der Rest vom Open Dialog bis alles geladen ist.
Nutzer könnte auf die Idee kommen, das Programm sei abgestürzt.
Das dauert über 10 Sek. um die Text-Datei in die StringListBox zu laden, habe einen normalen Rechner. (??)
Also würde das nicht so lang dauern, würde ich auch keine gauge einbauen.

Edit: Habe nochmal nachgemessen, das Laden von 6 MB txt über

Delphi-Quellcode:

while not Eof(myFile) do
      begin
        ReadLn(myFile, sRecord);
        listbox1.items.add(sRecord);
        inc(i);
        gauge1.Progress := i;
      end;

dauert an dem Rechner über 15 Sek. Mit gauge oder ohne.
Mit Readln oder ReadfromFile, egal..

Danach werden die Daten dann noch in eine StringGrid geparsed..
_____________________________________

Zitat von OregonGhost:

Delay einzubauen, damit man mehr vom Fortschritt sieht

nicht deshalb sondern weil der "Open-Dialog" sonst "hängt".