Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Textdatei Richtig Verarbeiten (https://www.delphipraxis.net/120025-textdatei-richtig-verarbeiten.html)

seppi.tm 4. Sep 2008 15:25


Textdatei Richtig Verarbeiten
 
Hallo ich habe folgendes Problem:
ich habe ne textdatei die 230 mb groß ist so nun will ich sie zeile für zeile auslesen und verarbeiten ohne sie erst in den speicher zu laden denn das dauert zu lange wie mache ich das?

wenn ich sie erst in ne listbox oder in ne stringlist lade dann stützt das programm ab^^

Klaus01 4. Sep 2008 15:34

Re: Textdatei Richtig Verarbeiten
 
Hallo,

vielleicht so:

Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
  F:TextFile;
  tmp : String;
begin
  If OpenDialog1.Execute Then
    Begin
    AssignFile(F,OpenDialog1.Filename);
    Reset(F);
    while not eof(F) do
      begin
       Readln(F,tmp);
       // mache etwas mit tmp
      end;
    CloseFile(F);
  end;

end;
Und demnächst vielleicht selber die Suche bemühen.

Grüße
Klaus

Bernhard Geyer 4. Sep 2008 15:36

Re: Textdatei Richtig Verarbeiten
 
Wieso nimmst du ein GUI-Control. Keine Win32-GUI-Control ist dafür ausgelegt 230 MB Text zu laden. Für eine erste verbeserugn mit eine TStrings/TStringList.


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:11 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz