Einzelnen Beitrag anzeigen

Benutzerbild von Binärbaum
Binärbaum

Registriert seit: 19. Jan 2005
Ort: Elstra
764 Beiträge
 
Delphi 7 Enterprise
 
#8

Re: Welches Objekt hat PopUp geöffnet?

  Alt 1. Apr 2005, 20:41
Zitat von TheAn00bis:
Hast recht, kann nicht klappen: SenderPopUp=TPopUpMenu.

Aber warum? Ich weise ihn so zu:

Delphi-Quellcode:
procedure TForm1.PopupMenu1Popup(Sender: TObject);
begin
SenderPopUp:=Sender.Classname;

end;
Man mit sowas muss ich mich mehr beschäftigen!
Sender.Classname gibt immer nur die Klasse des Senders zurück, nicht den Namen selbst.
Wenn also der Sender Memo1 oder Memo2 wäre, würde Sender.Classname in beiden Fällen "TMemo" sein.

MfG
Binärbaum
There are exactly 10 kinds of people: those who understand binary, and those who don't.
---
"Software reift beim Kunden. Bei Hardware ist es anders: Hardware fault beim Kunden." - Rainer G. Spallek
  Mit Zitat antworten Zitat