Программы   Загрузка Партнерство   О компании Контакты  
 
                    
  Карта Сайта   
   





Синтаксис ссылки на событие

Автор: Kurt

Я хочу проверить значение события, чтобы убедиться, что оно указывает в настоящий момент на определенную функцию.

По всей видимости вам придется использовать две временные переменные. Попытайтесь сделать следующее:


var
  ClickMethod: TNotifyEvent;
  B1Click: TNotifyEvent;
...
ClickMethod := Button1.OnClick;
B1Click := Button1Click;
if @ClickMethod = @B1Click then 
  messagebeep(0);

           




Программы  |  Загрузка  |  Партнерство  |  О компании  |  Контакты

Copyright © LSD Software 2006 - 2011