| Описание |
Функция IOResult возвращает результат последней операции ввода/вывода.
Если операция завершилась нормально, то это число 0, положительное число, если операция потерпела неудачу.
Используйте IOResult, когда вы уже отключили значение по умолчанию отлавливающее ошибки ввода/вывода. Когда $IOChecks включено, Delphi выдает исключения для ошибок. Когда выключено Delphi не выдает исключения, требуя, чтобы код сам следил за результатом ввода/вывода IOResult.
|
|
| Примечания |
|
Предупреждение: исправление результата ввода/вывода является одноразовым - исправление сбрасывает значение в 0.
|
|
| Похожие команды |
|
| |
|
| Пример кода : Создание каталог дважды с перехватом кода ошибки |
var
error : Integer;
begin
// Попытка создать новый подкаталог в текущей директории
// Выключение проверки ошибок I/O
{$IOChecks off}
MkDir('TempDirectory');
// Каталог создался успешно?
error := IOResult;
if error = 0
then ShowMessage('Каталог создался успешно')
else ShowMessageFmt('Создание каталога провалилось с ошибкой %d',[error]);
// Попытка снова создать каталог - она провалится!
MkDir('TempDirectory');
error := IOResult; // Сохраняем возвращаемый код
if error = 0
then ShowMessage('Каталог снова создался успешно')
else ShowMessageFmt('Повторное создание каталога провалилось с ошибкой %d',[error]);
// Удаление каталога для очистки
RmDir('TempDirectory');
// Включение проверки ошибок I/O
{$IOChecks on}
end;
|
Каталог создался успешно
Повторное создание каталога провалилось с ошибкой 183
|
|
