Einzelnen Beitrag anzeigen

Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.624 Beiträge
 
Delphi 12 Athens
 
#2

AW: Einzelne Elemente aus Datei auslesen

  Alt 20. Jun 2010, 18:08
Hallo und Willkommen in der DP ,

ich an Deiner Stelle hätte ja mit dem Schreiben angefangen, damit Du auch wieder etwas zum Auslesen hast . Aber Deine Vermutung ist richtig: Datei öffnen und solange lesen, bis EOF erreicht ist. Allerdings dann nicht mit Readln, sondern mit Read.
Delphi-Quellcode:
AssignFile(Dateivariable, Dateiname);
Reset(Dateivariable);
SetLength(RecordArray, FileSize(Dateivariable));
ArrayIndex := 0;
while not Dateivariable.EOF do
  begin
    Read(Dateivariable, RecordArray[ArrayIndex]);
    inc(ArrayIndex);
  end;
CloseFile(Dateivariable);
Das war jetzt aus dem Kopf getippt, eine Fehlerbehandlung überlasse ich Dir, im Groben müsste das aber so richtig sein.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat