[Yurk@]

Для этой цели можно использовать функцию

Код:

try
...
// операция, которая может вызвать ошибку
...
ecxept
// напр. вывод вашего мессежда об ошибке (или Exit, Abort);
end;