Einzelnen Beitrag anzeigen

Gigant02

Registriert seit: 3. Nov 2004
Ort: Helgoland
341 Beiträge
 
Delphi 7 Professional
 
#5

Re: Text Datei wie Query durchlaufen ??

  Alt 11. Jan 2007, 18:16
mal eine dumme frage

warum geht das nicht

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var FH : Integer;
begin

  FH := FOpen('E:\Jazz\00095a11');
  While not(FH.EOF) do begin

    Meldung(IntToStr(FH));
    Meldung(FReadLF(FH,200));

  end;

  FClose(FH);
end;
also er sagt immer das er FH.EOF nicht kennt


ich habe vor text datei zeile für zeile auszulesen
  Mit Zitat antworten Zitat