Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

"Перехват" события OnExit [D7, WinXP]


AlexanderMS ©   (2006-04-28 17:28:00) 

Помогите, пожалуйста! Как при "выходе" (OnExit) с объекта, предком которого является TEdit, совершить какие-то действия? Мне нужно проверить текстовое поле (если текст равен '0', то установить его на пустой ''), когда объект потеряет фокус. Заранее спасибо.


Юрий Зотов   (2006-04-28 17:37:00) [1]

Тьфу, не посмотрел, какая конфа. Вы свой компонент пишете? Тогда перекройте метод DoExit или обработчик сообщения CM_EXIT.


Юрий Зотов   (2006-04-28 17:32:00) [2]

Вот все это в обработчике события OnExit и написать. Точно так, как Вы и сказали. Только на языке Object Pascal.

with Sender as TEdit do
 if Text = '0' then Text := '';


Наверх

Титульная страница Поиск, карта сайта Написать письмо