Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.12.30;
Скачать: CL | DM;

Вниз

Обработка событий у динамически созданных объектов   Найти похожие ветки 

 
Kosmach ©   (2002-12-15 20:49) [0]

Уважаемые мастера, вот какой у меня возник вопрос.
Есть у меня динамический массив
a: array of TEdit;

После чего я периодически делаю следующее

Count:=Count+1;
a[count-1]:=TEdit.Create(Form1);
a[count-1].Parent:=Form1;

Все бы ничего, но как мне после этого отслеживать события у этих моих созданных Edit"ов.
Например я хочу отслеживать событие onChange.
В C++ было что-то вроде CallBack и это позволяло вызывать определенную функцию для обработки этих событий, хотя может я и наврал, вобщем подскажите пожалуйста как мне быть.


 
Anatoly Podgoretsky ©   (2002-12-15 20:53) [1]

Точно также
a[count-1].Событие := обработчик
ничего кроме обычного присваивания.


 
asmith   (2002-12-15 22:03) [2]

Добавлю - сделай их всех "немного разными", проще всего присвой a[count-1].Tag := count; Тогда в обработчике любого события сможешь отделить один TEdit от другого.


 
Kosmach ©   (2002-12-19 15:05) [3]

Прошу прощения что опять подымаю эту тему, но у меня как раз возникла проблемма с тем как мне различать какой TEdit вызвал этот обработчик, а идею asmith"а я не совсем понял.
Не мог бы кто-нибудь поподробнее расписать как мне в уже мною описанном обработчике события обращаться к тому TEdit"у с которым оно произошло.


 
Zz_   (2002-12-19 15:11) [4]

Например, так

(Sender as TEdit).Text := IntToStr((Sender as TEdit).Tag)


 
Kosmach ©   (2002-12-19 15:13) [5]

Спасибо!!!



Страницы: 1 вся ветка

Текущий архив: 2002.12.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.014 c
4-99408
EminEM2
2002-11-12 05:38
2002.12.30
Расскажите про Wparam и Lparam


3-99013
boozer
2002-12-10 11:48
2002.12.30
Теперь проблема с DBEdit, DBLabel и им подобным


1-99196
Checist [root]
2002-12-19 11:19
2002.12.30
Обращение к DrawGrid


1-99193
Hooch
2002-12-19 09:31
2002.12.30
Word + Delphi


14-99298
Darts
2002-12-09 17:55
2002.12.30
---|Ветка была без названия|---