Rechtsklick in Scrollbar einer TListBox abfangen

[Amateurprofi]

Wenn ich in die vertikale ScrollBar einer TListBox rechtsklicke öffnet sich ein PopUp Menu mit den Einträgen

• Bildlauf hier
• Oberer Rand
• Unterer Rand
• Seite nach oben
• Seite nach unten
• Bildlauf oben
• Bildlauf unten

Ich möchte anstatt folgendes Verhalten implementieren:

1) Wenn der Mauszeiger in die ScrollBar zeigt, soll ein Hinweis eingeblendet werden der angibt, welcher Eintrag der Position des Mauszeigers entspricht.
2) Bei Rechtsklick in die ScrollBar soll kein PopUp Menu erscheinen, sondern es soll, abhängig von der geklickten Position, folgendes passieren:

A) Oberer Pfeil Button geklickt : Zum Anfang der Liste scrollen
B) Unterer Pfeil Button geklickt : Zum Ende der Liste scrollen
C) Dazwischen geklickt: Zu dem Eintrag scrollen, der der Position des Mauszeigers entspricht.

Den ersten Teil (Hinweis einblenden) habe ich gelöst. (Siehe Testprojekt)
Beim zweiten Teil (Scrollen) habe ich bisher keinen Lösungsansatz.

Fragen:

Wie verhindere ich, dass ein PopUp Menu geöffnet wird?
Wie kann ich auf Rechtsklick in die ScrollBar reagieren?

[Amateurprofi]

@Frühlingsrolle:

Leider bringt mich das aber nicht weiter.
1) Das MouseDown wird nur bei einem Klick in den Clientbereich der ListBox ausgelöst, nicht aber bei einem Klick in die ScrollBar der ListBox.
2) Es geht nicht darum, herauszufinden, ob einer der Buttons der Scrollbar gedrückt ist, weil ich auch ohne die ScrollBarInfo weiß, dass die nicht gedrückt sind, wenn ich sie mit der rechten Maustaste klicke.

Mir geht es darum

1) Auf einen Rechtsklick in die ScrollBar der ListBox zu reagieren, d.h. ich möchte wissen, welches Event bei einem Rechtsklick in die ScrollBar der ListBox ausgelöst wird.
2) Zu verhindern, dass das beschriebene PopUp Menu geöffnet wird.

Trotzdem: Danke für den Versuch zu helfen.

[Uwe Raabe]

Ich fürchte, das Popup des Scrollbar-Teils wird von Windows selbst erstellt und angezeigt. Es gibt meines Wissens keine Möglichkeit, das zu verhindern oder zu beeinflussen.

[Amateurprofi]

Zitat von Uwe Raabe:

Ich fürchte, das Popup des Scrollbar-Teils wird von Windows selbst erstellt und angezeigt. Es gibt meines Wissens keine Möglichkeit, das zu verhindern oder zu beeinflussen.

Ja, das ist auch meine Befürchtung.
Aber vielleicht weiß ja doch irgend jemand eine Lösung.

[Amateurprofi]

Zitat von Frühlingsrolle:

Damit das Popupmenu nur bei Bedarf erscheint, muss TListBox.PopupMenu := nil sein bzw. kein Popupmenu der Listbox zugewiesen werden und kann bei Bedarf mit TPopupMenu.Popup(xPos, yPos) aufploppen.

Nein!
Bei ListBox.PopUpMenu kann man ein eigenes PopUp-Menu eintragen, das dann bei Rechtsklick in den Clientbereich der Listbox angezeigt wird.
Und mit ListBox.OnContextPopUp kann man steuern, ob es automatisch geöffnet wird oder ob man in ListBoxContextPopUp dafür sorgt, dass es an einer bestimmten Position (oder auch gar nicht) geöffnet wird.
Mit dem PopUp Menu, das ich beschrieben habe hat das nichts zu tun.