Weil er sonst den ganzen (Reset/Initialisierungs-)Kram am Ende min. 3x schreiben müsste. Für jede Abbruchmöglichkeit der Funktion nämlich. Und da ist ein Label tatsächlich mal nützlich, zumal nur in eine Richtung gesprungen wird.
@Luckie: Ich schreib´s immer so:
Delphi-Quellcode:
{$I-}
AssignFile(f,'bla.bla');
ReSet(f,1);
// mach was mit der geöffneten Datei
CloseFile(f);
{$I-}
Alte Angewohnheit von
TP für DOS.
