Здравствуйте ArcaD, Вы писали:
AD>В дельфи, в компоненте TEdit, требуется вводить целые числа. AD>при вводе в Edit1 буквы приложение прерывает выполнение и сообщает об ошибке, AD>только после этого вызывается обработчик MyExcept. AD>Как сделать, чтобы при возникновении исключительной ситуации не прерывалось приложение, AD>а выпольнялись только нужные мне действия?
Я знаю точно, что здесь тебе не надо использовать обработку ошибок. Воспользуйся простым способом:
const
Nums: set of = ['0','1','2','3','4','5','6','7','8','9'];
Далее в программе в TEdit.OnKeyPress напиши обработку:
if Key in Nums then begin
< обработка ошибки, например:>
ShowMessage('Error char!!!');
Key:=#0 //////////////// --------- Это важно, иначе все в пустую. Выдаст сообщение и напишет символ, а так нет end
else
...
TMaskEdit не очень хорош, т.к. строка заполнена пробелами сначала и вызовет ошибку конвертации, если заполнена не вся.
