Wenn ich mich recht erinnere, dann gibt es in den Klassenproceduren den "versteckten" Parameter Self, welcher die Klasse, oder die Objektreferenz übergibt (jenachdem wie die Prozedur aufgerufen wurde).
z.B.:
Delphi-Quellcode:
procedure MyTimerOnTimer(Self: TClass; Sender: TObject);
procedure MyTimerOnTimer(Self: TObjekt; Sender: TObject);
procedure MyTimerOnTimer(Self: Pointer; Sender: TObject);
...