Einzelnen Beitrag anzeigen

Benutzerbild von alcaeus
alcaeus

Registriert seit: 11. Aug 2003
Ort: München
6.537 Beiträge
 
#2

Re: Textdatei in ein Record einlesen ?

  Alt 28. Apr 2004, 05:22
Du kannst immer noch mit
Readln(Textdatei,StringVar); eine Zeile aus der Textdatei auslesen. Das ganze machst du solange EoF(Textdatei) False ist. Den String den du dann erhälst kannst du dann auslesen, z.B. so:
Delphi-Quellcode:
var
  TextDatei: TextFile;
  Pfad, Zeile: String;
AssignFile(TextDatei,Pfad);
Reset(TextDatei);
while not EoF(TextDatei) do
begin
  Readln(TextDatei,Zeile);
  if Zeile[1] <> '#then
//Deine Auswertung
end;
CloseFile(TextDatei);
Der Code ist nicht getestet, aber ich sehe keinen Grund warum er nicht funktionieren sollte
Andreas B.
Die Mutter der Dummen ist immer schwanger.
Ein Portal für Informatik-Studenten: www.infler.de
  Mit Zitat antworten Zitat