except - вылетает, что делать - не знаю....
От: ZetRooT Россия  
Дата: 14.04.05 05:53
Оценка:
решил поработать с exceptions типа пользователь дурак и всё такое. пишу следующий код

try
    Ky:= (image.Height-ysdvig) / (yMAX-yMIN);
    Kx:= (image.Width-xsdvig) / (Nf-N0);
  except
   on e_zero : EZeroDivide do
      begin
        showmessage('Ошибка в данных.');
        Ky := 1;
        Kx := 1;
      end;
  end;


а при создании ситуации деления на ноль в этом месте всё равно вылетает EZeroDivide. ткните носом в узкое место! или на доки по ним...

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

 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.