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

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

Как создать процедуру для динамически создаваемого компонента [D7]


greg123 ©   (2007-03-12 15:42:00) 

У меня динамически создаются несколько кнопок, теперь мне нужно по нажатию на каждую из кнопок совершать определенное действие, как это можно реализовать?


RASkov   (2007-03-12 18:17:00) [1]

> [2] Сергей М. ©   (12.03.07 15:47)

:) уже шаблоном стало.... :)


Сергей М.   (2007-03-12 15:47:00) [2]

type
 TSomeClass = class[(TSomeAncestorClass)]
  ..
   procedure DoOnSomeButtonClick(Sender: TObject);
  ..
 end;

..

procedure TSomeClass.DoOnSomeButtonClick(Sender: TObject);
begin
 DoSomething;
end;

..

SomeButton := TSomeButton.Create(..);
..
SomeButton.OnClick := SomeObjectOfTSomeClass.DoOnSomeButtonClick;


MBo   (2007-03-12 15:45:00) [3]

http://www.delphikingdom.ru/asp/viewitem.asp?catalogid=342


Наверх

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