Тема: Назначения событий сразу нескольким обьектам
Показать сообщение отдельно
  #4  
Старый 24.11.2008, 23:39
lmikle lmikle вне форума
Модератор
  
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию
Делаешь столько методов, сколько у тебя функций. Далее просто присваиваешь. Все методы должеы быть типа TNotifyEvent:

Код:
procedure (Sender : TObject) of object;

Далее просто присваиваешь их свойству OnClick.
Ответить с цитированием