это ж классика!)
она определяет public свойство OnTimer и указывает процедуру SetOnTimer, через которую "этому свойству присваивается значение". т.е. при присвоении свойству OnTimer какого-либо значения вызывается процедура SetOnTimer с этим значением в качестве параметра. тип свойства - метод.
type TNotifyEvent = procedure (Sender: TObject) of object;
|