Da sind etliche Fehler oder zumindest Ungereimtheiten.
Zitat von
chrissy:
f : file;
AssignFile(f, Pfad+'Dokumente\RechnungK.doc');
FileMode := 2;
Reset(f);
while (not eof) do
begin
writeln(Pfad+'Dokumente\RechnungK.doc', FieldByName
1. f : Text; statt f : file
2. Reset öffnet zum NUR-Lesen. Rewrite verwenden.
3. was ist Filemode, bzw. wieso weist du dem einen Wert zu ??
4. EOF ohne Parameter bezieht sich auf Konsole EOF (f) wäre richtig.
5. was ist, wenn eine Datei nicht da ist ? Wozu gibt es (*$I-*) usw.?
Oh je, das ist ja eine mittlere Katastrophe.
statt writeln (f,....) verwendest du den Dateinamen selbst, der muß in assign zugewiiesen werden an das f. Danach darf nur das f benutzt werden.
In den 5 analysierten Zeilen dürften mit Folgefehlern mind. 20 weitere auftauchen.
Na denn, viel Spaß. Ich empfehle dringend das Delphi-Handbuch.
