Listviewitem mit Maus im Listview verschieben

Question

Hallo Leute,

ich möchte mit Strg+Maus ein Listviewitem innerhalb eines Listviews nach oben/unten verschieben.

Wie kann ich das am einfachsten bewerkstelligen.

Vielen Dank im voraus.

Gruß Ahmed

Answer 1

Hallo, gucke dir mal den Code in diesem Artikel an. Wenn es nur klappen soll, wenn die Strg-Taste gedrückt ist, dann musst du noch in MouseMove überprüfen ob diese gedrückt ist, bevor du die Items änderst:

    Private isCtrlDown As Boolean

    Private Sub ListView1_KeyDown(sender As Object, e As KeyEventArgs) Handles ListView1.KeyDown

        isCtrlDown = e.Control
    End Sub

    Private Sub ListView1_KeyUp(sender As Object, e As KeyEventArgs) Handles ListView1.KeyUp

        isCtrlDown = e.Control
    End Sub

        If (isCtrlDown) Then
            'Führe den Code aus
        End If

---

Koopakiller - http://koopakiller.ko.ohost.de/

Answer 2

Perfekt, genau das was ich gesucht hatte.

Vielen Dank für die Hilfe.

Ahmed