Thema: Delphi Textdatei zerlegen

Einzelnen Beitrag anzeigen

rowkajjh

Registriert seit: 9. Jan 2006
38 Beiträge
 
#4

Re: Textdatei zerlegen

  Alt 9. Apr 2006, 17:19
Hmmm, bei eof bekomme ich eine Exception:

---------------------------
Benachrichtigung über Debugger-Exception
---------------------------
Im Projekt DAT2DTEST.exe ist eine Exception der Klasse EInOutError mit der Meldung 'E/A-Fehler 104' aufgetreten.
---------------------------
Anhalten Fortsetzen Hilfe
---------------------------


Delphi-Quellcode:
Procedure DAT2D.LoadFromFile(filename : string);
var
  i : Integer;
  x, y: Extended;
  F : TextFile;
begin
  DecimalSeparator := ','; // adjust output
  AssignFile(F, filename);
  while not Eof(F) do
  begin
    ReadLn(F, i, x, y);
    AddOrReplace(x,y,i);
  end;
end;
Muß ich noch Assignfile noch was machen mit der Datei?
  Mit Zitat antworten Zitat