Einzelnen Beitrag anzeigen

kurtm1

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

Re: TAdvTabsSet: Tabs mit rechter Maustaste markieren

  Alt 27. Dez 2005, 09:36
ok habe nun eine funzende, einfache Lösung gefunden:

Delphi-Quellcode:
procedure TForm1.AdvTabSetMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
        if MediaTabs.ItemAtPos(point(x,y))<>-1 then
        MediaTabs.TabIndex:=MediaTabs.ItemAtPos(point(x,y));
end;
  Mit Zitat antworten Zitat