Hello, this is the situation (lazarus 0.9.29 - fpc 2.3.1):
TMyClass = class
private
FNotifica: TNotifyEvent;
procedure SetNotifica(const AValue: TNotifyEvent);
published
property Notifica: TNotifyEvent read FNotifica write SetNotifica;
end;
var MyClass: TMyClass;This is OK.
On another unit, I have:
TAnotherClass = class
public
procedure DoNotifica(Sender: TObject);
procedure SetLinks;
end;
procedure TAnotherClass.SetLinks;
begin
MyClass.Notifica:=self.DoNotifica; // <--- This is the problem
end;and, when fpc compile this I get:
fopessoas.pp(41,39) Error: Wrong number of parameters specified for call to
"NotificaInfo"
fopessoas.pp(22,15) Hint: Found declaration:
TfPessoas.NotificaInfo(TObject);
fopessoas.pp(91) Fatal: There were 1 errors compiling module, stoppingWell, what can I do?
