Callback funktion in Objekten ?

[SirThornberry]

@self.callback geht nicht weil Callback eine Methode der Klasse ist und nicht von der Instanz (schwer zu beschreiben). Folgendes geht:
@TMyClass.Callback

Allerdings gibt es für so etwas events.

Delphi-Quellcode:

TMyClass = class(TObject)
private
  [...]
  fEvent: TNotifyEvent; //oder anderer Callbacktyp
public
  OnEvent: TNotifyEvent read fEvent write fEvent;
end;
[...]
procedure TMyClass.DoCallback;
begin
  if Assigned(fEvent) then
    fEvent(Self);
end;