try & except Problem

Thema durchsuchen

Ansicht

Themen-Optionen

Ein Thema von netscanner · begonnen am 20. Jun 2006 · letzter Beitrag vom 21. Jun 2006

Vorheriger Beitrag

Nächster Beitrag

netscanner

Registriert seit: 2. Dez 2005
Ort: Dieburg
280 Beiträge

Delphi 6 Enterprise

try & except Problem

20. Jun 2006, 20:47

zusammenfalten · markieren

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  ;