| Описание |
Процедура Erase пытается стиреть файл, данный в FileHandle.
Имя файла, должно быть, было назначено подпрограммой AssignFile в дескрипторе файла FileHandle.
Если файл не существует, то поднимается исключение EInOutError.
|
|
| Похожие команды |
|
| |
|
| Пример кода : Создание простого файла, затем попытка удалить его дважды |
var
myFile : TextFile;
begin
// Позволяет нам открыть
текстовый файл
AssignFile(myFile, 'Test.txt');
ReWrite(myFile);
// И записать одну линию в него
WriteLn(myFile, 'Hello World');
// Затем закрываем его
CloseFile(myFile);
// И наконец стираем его
Erase(myFile);
// Если мы пробуем стереть его снова,
мы поднимем исключение
try
Erase(myFile);
except
on E : Exception do
ShowMessage('Нельзя удалить : '+E.Message);
end;
end;
|
Нельзя удалить : File not found
|
|
