Einzelnen Beitrag anzeigen

Amateurprofi

Registriert seit: 17. Nov 2005
Ort: Hamburg
1.041 Beiträge
 
Delphi XE2 Professional
 
#1

Rechtsklick in Scrollbar einer TListBox abfangen

  Alt 18. Mär 2020, 03:24
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?
Angehängte Dateien
Dateityp: zip ListBoxTest.zip (720,8 KB, 1x aufgerufen)
Gruß, Klaus
Die Titanic wurde von Profis gebaut,
die Arche Noah von einem Amateur.
... Und dieser Beitrag vom Amateurprofi....

Geändert von Amateurprofi (18. Mär 2020 um 14:37 Uhr)
  Mit Zitat antworten Zitat