Einzelnen Beitrag anzeigen

Benutzerbild von APP
APP

Registriert seit: 24. Feb 2003
Ort: Graz (A)
705 Beiträge
 
Delphi 7 Enterprise
 
#8

Re: prozedur aufruf und sender

  Alt 25. Okt 2003, 20:42
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;
Armin P. Pressler

BEGIN
...real programmers are using C/C++ - smart developers Delphi;
END;
  Mit Zitat antworten Zitat