prozedur aufruf und sender

[APP]

Hallo Christian,

Zitat:

die Prozedur einer Eigenschaft zugewiesen ist, die die Adresse einer Methode erwartet

meinst Du nun da das @xx := @yy Konstrukt?

Verzeih meine Begriffstutzigkeit, es kann sein, das ich jetzt total
im falschen Eck bin, aber ich riskiere es trotzdem:

Folgendes funktioniert bei mir:

Delphi-Quellcode:

PROCEDURE TForm1.Button5Click(Sender: TObject);
VAR
   radiogroup                      : TRadiogroup;
BEGIN
   radiogroup := TRadioGroup.Create(self);
   radiogroup.Parent := self;
   radiogroup.OnClick := machwas;
   radiogroup.Items.Add('a');
END;

PROCEDURE TForm1.machwas(sender: TObject);
BEGIN
   IF (Sender IS TRadiogroup) THEN
      showmessage('radiogroup geklickt');
END;