|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
11.10.2009, 08:56 | #1 |
ACM!
Форумчанин
Регистрация: 19.06.2009
Сообщений: 382
|
Как сделать обработчик более универсальным?
Есть в код такая проблема: на форме четыре Edit'а, и у каждого обработчик на ввод один и тот же:
Код:
|
11.10.2009, 09:12 | #2 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
в процедуру Вам передаётся Sender :TObject
Вы не догадываетесь, что это за зверь и для чего он нужен? Поясняю, Sender - это тот объект, на котором произошло данное событие.. Поэтому делаем одну процедурку (например, UniversalKeyPress1 ) там меняем Pos(DecimalSeparator, FU.Text) на Pos(DecimalSeparator, TEdit(Sender).Text) и всем вашим edit'ам на событие OnKeyPress вешаем одну и ту же эту процедурку. остальные процедуры можно удалить. |
11.10.2009, 09:29 | #3 |
ACM!
Форумчанин
Регистрация: 19.06.2009
Сообщений: 382
|
Огромное спасибо! Я пробовал Sender, но без TEdit(), как то об этом не подумал!
|
11.10.2009, 19:17 | #4 |
я получил эту роль
Старожил
Регистрация: 25.05.2007
Сообщений: 3,694
|
Вообще рекомендуется использовать оператор as
Код:
пыщь
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как вам код, и есть ли более простые решения ? | SuBwooFer | PHP | 1 | 10.09.2009 15:08 |
Универсальная программа, с универсальным описанием объектов. | Strannik-BKS | Свободное общение | 38 | 25.04.2009 23:51 |
Как создать обработчик событий для динамически созданного объекта | Лукманов Александр | Общие вопросы Delphi | 1 | 22.03.2009 22:05 |
Как сделать более точные координаты мышки | xGroupers | Общие вопросы Delphi | 7 | 24.04.2008 23:02 |
Как и в какой момент написать обработчик события если БД не доступна | Arteom | БД в Delphi | 8 | 04.10.2007 12:08 |