Moin Christian,
dann bau Dir doch eine Dummyklasse.
Delphi-Quellcode:
type
TMyDummy = class(TObject)
public
class procedure LabelClick(Sender: TObject);
end;
implementation
class procedure TMyDummy.LabelClick (Sender : TObject);
begin
ShowMessage('Label geklickt');
end;
procedure TForm1.Btn1Click(Sender: TObject);
begin
lbl1.OnClick := TMyDummy.LabelClick;
end;
Wenn Du die Methoden dann als Klassenmethoden deklarierst, brauchst Du noch nicht einmal eine Instanz der Klasse zu bilden, um die Methoden nutzen zu können (TMyDummy kann auch in einer anderen
Unit deklariert werden)