IOResult (функция)

Язык:
Русский
English

 IOResult  (функция)


Возвращает статус последней выполненной операции ввода/вывода.

Объявление

 Function IOResult : Integer;

Режим

Windows, Real, Protected

Результат

Если ошибки не было, возвращается нуль. Если была, возвращается код ошибки времени выполнения программы.

Замечания

Чтобы контролировать ошибки ввода/вывода с помощью функции IOResult, опция проверки ввода/вывода должен быть выключена ({$I-}). Если происходит ошибка ввода/вывода, и проверка ввода/вывода выключена, то все последующие операции ввода/вывода игнорируются, пока не будет сделано обращение к функции IOResult, при котором очищается внутренний флаг ошибки.

См. также

Пример

Язык:
Русский
English


 { Пример программы для функции IOResult }

uses Crt;

var
  F : file of Byte;

begin
 { Получаем имя файла из командной строки }
  Assign(F, ParamStr(1));
 {$I-}
 Reset(F);
 {$I+}
 if IOResult = 0 then
   WriteLn('Размер файла: ', FileSize(F), ' байт.'))
 else
   WriteLn('Файл не найден.');
end.
Тэги: IOResult
| G+
Код для вставки: :: :: :: ::
Поделиться: // //