Hallo SiouX,
sieh Dir mal in der Delphi-Hilfe
TFileStream an oder gleich
hier, ist viel einfacher und moderner als das Dateihandling unter Pascal.
Yo, ansonsten machst Du das schon ganz gut, bis auf eine Kleinigkeit:
Delphi-Quellcode:
procedure DateiEinlesen(Pfad: String; var Datensatz: String);
begin
AssignFile(Datei,Pfad);
try
Reset(Datei);
read(Datei, Datensatz);
except
showmessage('fehler beim lesen');
end;
// anderer Fehler möglich, ergo anderer TryBlock
try
closeFile(Datei);
except
showmessage('Kann Datei nicht öffnen');
end;
end;
Greetz DANNYBOY