IOResult Turbo Pascal

aus Paswiki Turbo Pascal, der freien Wissensdatenbank

Inhaltsverzeichnis 1 Beschreibung 2 Deklaration 3 Anmerkung 4 Beispiele

Beschreibung

Die Funktion IOResult liefert den Fehlerstatus der letzten Ein/Ausgabe zurück.

Deklaration

function IOResult: Integer;

Anmerkung

Um die Funktion IOResult benutzen zu können, muss der Schalterbefehl $I auf $I+ geschaltet werden.

Beispiele

var F: file of Byte;
begin
 Assign(F, ParamStr(1));
 {$I-}
 Reset(F);
 {$I+}
 if IOResult = 0 then
   Writeln('Dateigröße in Byte ', FileSize(F))
 else
   Writeln('Datei nicht gefunden');
end.