
13.03.2010, 20:17
|
|
Участник форума
Регистрация: 25.11.2009
Сообщений: 201
Провел на форуме: 866555
Репутация:
226
|
|
Сообщение от GhostOnline
Надо соответсвенно объявить процедурный тип и свойство-событие:
TMyClass = class
...........
private
FOnDenjf : TNotifyEvent;
............
public
property OnDenjf: TNotifyEvent read FOnDenjf write FOnDenjf;
end;
И после этого ты можешь присваивать этому свойству значения процедур.
Вместо TNotifyEvent ты можешь объявить свой процедурный тип:
type
TMyEvent = procedure of object({тут перечисление передаваемых аргументов по твоему усмотению});
end;
а не проще в public объявить свою процедуру с параметрами как в процедуре, которая должна вызвать это событие, и написать так как я?
|
|
|