-
Добрый день. Для обработчика onExit пишу процедуру ChecE которая проверяет, что находится в TEdit.
procedure TfmInsWin.ChecE; begin //ChecE if (ActiveControl<>nil) and (ActiveControl is TEdit) then
но ActiveControl изменяется раньше чем onExit. Как получить который теряет фокус. И если можно оставить фокус там же, если данные введены не правильно. Но это не обязательно.
-
в onExit прилетает сендер, который и есть твой эдит, теряющий фокус
-
> И если можно оставить фокус там же, если данные введены > не правильно
ТвойКомпонентСНевернымиДанным.SetFocus
-
Очень спасибо. Всё работает как и хотел :)
-
про >ТвойКомпонентСНевернымиДанным.SetFocus Это я тупанул. Мог бы и сам догадаться.
|