Einzelnen Beitrag anzeigen

Metschu

Registriert seit: 31. Dez 2006
151 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#1

Listview -> Drag&Drop + AutoScroll

  Alt 12. Mai 2022, 22:41
Hallo zusammen,

ich habe ein ListView im vsReport Style. Hier sollen die Einträge über Drag&Drop sortiert werden können.
Das klappt bis hier hin auch.

Es wäre nun schön, wenn die Liste Automatisch scrollt:

wenn User über die obere Postion des ListView geht nach oben scrollen, unter das ListView nach unten Scrollen.

Gibt es schon so eine Fertige Funktion und ich finde sie nicht?

Oder selbst basteln?

Hierfür benötige ich aber irgendeine info, das ich gerade im "Drag Modus":

Den Rest bekomme ich ja mit der Maus- und Listviewposition hin.

Als letzte Variante würde ich das mit "MouseDown" versuchen, aber da ist ja nicht gesagt, das ich gerade am Zeile Ziehen bin...

Danke schon mal.

Gruß

Torsten
Torsten
Ich kam, sah und alles Funktionierte.
Dann klingelte mein Wecker...
  Mit Zitat antworten Zitat