try & except Problem

[netscanner]

Delphi-Quellcode:

try
assignfile (datei, 'rekord.txt');    //rekord wird geladen
reset (datei);
readln (datei, rekordhalter);
readln (datei, punkttxt);
closefile (datei);
except
 reset (datei);
rewrite (datei, 'NoName');
rewrite (datei, '10');
closefile (datei);assignfile (datei, 'rekord.txt');

 end  ;

Hier ist mein Try Except Befehl - er bringt trotzdem einen fehler

warum?

[inherited]

Wenn du es mit Debugger startest? Dann wird trotzdem ein Fehler angezeigt. Später, wenn du nur die exe nimmst, sollte der Fehler nicht mehr angezeigt werden

[netscanner]

tut er aber....dann sagt er mir file not found

[inherited]

Schau dir lieber mal TFileStream an
Das was du nimmst ist die konservative methode^^
Was bezweckst du mit

Delphi-Quellcode:

rewrite (datei, 'NoName');
rewrite (datei, '10');

[netscanner]

was bewirkt TFileStream ????
hab nur noch heute abend zeit mein problem zu lösen....

[Matze]

Zitat von netscanner:

was bewirkt TFileStream ????

Mal in die OH geschaut?

[netscanner]

...so wie ich sehe kann ich mit TFileStream aber auch nicht checken ob die datei da ist oder net....

[Helmi]

Zitat von netscanner:

...so wie ich sehe kann ich mit TFileStream aber auch nicht checken ob die datei da ist oder net....

Dann schau dir mal FileExists an

[McLane]

Zitat von netscanner:

Delphi-Quellcode:

try
assignfile (datei, 'rekord.txt');    //rekord wird geladen
reset (datei);
readln (datei, rekordhalter);
readln (datei, punkttxt);
closefile (datei);
except
 reset (datei);
rewrite (datei, 'NoName');
rewrite (datei, '10');
closefile (datei);assignfile (datei, 'rekord.txt');

 end  ;

Hier ist mein Try Except Befehl - er bringt trotzdem einen fehler

warum?

warum trotzdem ein fehler kommt: wenn das assignfile schon fehlschlegt ist datei ein nicht initialisierter Zeiger. In deinem Except Bereich läufst du also zwangsläufig in dem Fall auf einen Fehler...

[jbg]

Zitat von McLane:

wenn das assignfile schon fehlschlegt ist datei ein nicht initialisierter Zeiger.

Nur das AssignFile() recht selten fehlschlägt, da es die Datei nicht anrührt. Es setzt nur die Funktionszeiger und den Dateinamen im "datei"-TTextRec Record.