Einzelnen Beitrag anzeigen

Benutzerbild von Grumble
Grumble

Registriert seit: 19. Mär 2003
Ort: Dresden
203 Beiträge
 
Delphi 6 Enterprise
 
#1

popup-menu wie krieg ich die caption der popupcomponent raus

  Alt 22. Jul 2004, 13:42
hi,

ich hab n paar checkboxen auf der form, nun hat jede das selbe popup menu gesetzt bekommen.
mit rechtsclick popts auch hoch nur will ich im onpopup event irgendwie die caption der zugehoerigen checkbox rausbekommen, hat jemand n tipp?

ich hab den namen der compo schon rausbekommen aber da komm ich jetzt nich weiter...

Code:
procedure TDSForm.infopmPopup(Sender: TObject);
begin
  if infopm.PopupComponent is Tcheckbox then
    cbcap:=infopm.PopupComponent.Name;
    for i:=1 to dsform.ComponentCount do
    if dsform.Components[i-1].Name=cbcap then
gruesse
grumble
  Mit Zitat antworten Zitat