Как обьявить событие при создании компоненты

← →
Oleg_K © (2005-02-28 09:12) [0]

Имеется модуль Unit (uOperation без формы),
ругается на то, что:
Incompatible types: "method pointer and regular procedure"
что мне сделать? обьявить тип? как?

{это пример, но суть та}
procedure Start(I: Integer);

procedure Click;
begin
Beep;
end;

var
Timer: TTimer;
begin
Timer:=TTimer.Create(nil);
Timer.Interval:=I;
Timer.OnTimer:=Click;
end;

← →
MBo © (2005-02-28 09:14) [1]

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

← →
Shirson © (2005-02-28 11:36) [2]

procedure Click (sender:TObject);
И сделать процедуру не локальной.

> Shirson © (28.02.05 11:36) [2]

procedure MyClass.Click(Sender: TObject)

Т.е. процедура должна быть методом какого-нибудь объекта. Или методом класса.

Как обьявить событие при создании компоненты Найти похожие ветки