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:

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:

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:

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:

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.