Einzelnen Beitrag anzeigen

kurtm1

Registriert seit: 13. Dez 2003
348 Beiträge
 
#1

TAdvTabsSet: Tabs mit rechter Maustaste markieren

  Alt 26. Dez 2005, 12:49
Also ich habe ein TAdvTabset (http://tmssoftware.com/apc.htm) in dem einige Tabs eingefügt wurden. Zusätzlich gibt es für die Tabs ein PopUp Menü.

Jetzt möchte ich, dass ich auch mit der rechten Maustaste eine neue Tab aktivieren kann, und es soll dabei auch das PopUp Menü aufklappen.

Soweit sogut hab ich folgenden Code angewandt:
Delphi-Quellcode:
with MediaTabs do
        TabIndex:=ItemAtPos(ScreenToClient(Mouse.CursorPos));
        if MediaTabs.TabIndex=-1 then
        MediaTabs.TabIndex:=0;
Dieser steht im OnPopup Ereignis des PopUpMenüs. Eigentlich funktioniert ja alles, falls man jedoch neben einem Tab (wo keines mehr ist) mit der rechten Maustaste hinklickt, bekomme ich die Fehlermeldung, dass der Tabindex -1 nicht gesetzt werden kann (Listenindex überschreitet ddas Maximum).

Wie kann ich diese Fehlermeldung abfangen?

thx
  Mit Zitat antworten Zitat