Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Отлов ошибок [D7, WinXP]

WhiteGuy © (2005-01-13 13:59:00)
ЛЮУУУУДИ!!
Как мне перехватить ошибку "I/O Error 21" или "File not found!" или какую-нить другую и вместо нее написать свое сообщение?? Можно код? ;-)

Johnmen (2005-01-13 18:29:00) [1]
>Ega23 © (13.01.05 17:54) [8]

Более компактный и быстрый код.

Ega23 (2005-01-13 17:54:00) [2]
2 Johnmen © (13.01.05 17:47) [7]

Почему?

Johnmen (2005-01-13 17:47:00) [3]
Ошибки ввода/вывода предпочтительнее обрабатывать, как ocean (13.01.05 16:43) [5]

Arm79 (2005-01-13 17:44:00) [4]
Ega23 © (13.01.05 16:34) [3]

Да, точно. Спасибо, описАлся...

ocean (2005-01-13 16:43:00) [5]
а вот еще идея, если действительно речь о файловых операциях.
{ $I- } //отключить ошибки
AssignFile(...);
Reset(...);
...
if IOerror <> 0 then ...//свое сообщение об ошибке, IOresult содержит код
{ $I+ }

Ega23 (2005-01-13 16:35:00) [6]
2 WhiteGuy © (13.01.05 13:59)
"I/O Error 21" или "File not found!"

if not FileExists(aFileName) then Exit;

Ega23 (2005-01-13 16:34:00) [7]
2 Arm79 © (13.01.05 16:31) [2]
do Exception.Create('Вах, как мне плохо!');

do raiseException.Create('Вах, как мне плохо!');

Arm79 (2005-01-13 16:31:00) [8]
try
здесь код программы, где отлавливается ошибка
except
on E: Exception
do Exception.Create('Вах, как мне плохо!');
end;

koshak (2005-01-13 14:03:00) [9]
try
except

?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »