Показать сообщение отдельно
  #5  
Старый 12.06.2007, 11:58
Аватар для Decoding
Decoding Decoding вне форума
Местный
 
Регистрация: 03.06.2006
Адрес: Почту найдете на моем сайте
Сообщения: 576
Версия Delphi: D10.2
Репутация: 214
По умолчанию

Создай в секции private своего компонента переменную для своего события
Код:
private
  FCount: TNotifyEvent;
Затем в секции published создай событие
Код:
 
published
  property OnCount: TNotifyEvent read FCount write FCount;
Затем, в том месте кода компонента, где должно вызваться событие, напиши
Код:
 
if Assigned( FCount ) then OnCount( Self );
Ответить с цитированием