|
Registriert seit: 4. Okt 2004
Ort: Mönchengladbach
150 Beiträge
Delphi 7 Enterprise
|
Re: Popupmenü zur Laufzeit erweitern
22. Dez 2005, 13:23
Zitat von Lannes:
Hallo,
das gewählte Item kannst Du mit PopupComponent herrausfinden.
Ein Beispiel aus der Delphi-Hilfe:
Delphi-Quellcode:
procedure TForm1.Copy1Click(Sender: TObject);
begin
if PopupMenu1.PopupComponent = Edit1 then
Edit1.CopyToClipboard
//...
Zum Thema TTBCustomItem lies mal das:
 http://www.delphi-forum.de/viewtopic...e3196d5#230569 Leider erkennt Delphi Edit1 aber nicht weil Edit1 zur Zeit der Compilierung nicht existiert. Außerdem: In welches Ereigniss sollte ich das reinbringen?  
MFG:
JoeSchnapsBurner
|