Items in einer Listbox verschieben

[SkyLord]

N'abend,

ich versuche gerade ein Programm mit Delphi 5 zu schreiben, dass folgendes kann:
Eine Listbox in der verschiedene Items stehen. Wenn ich ein Item anklicke und nach oben und unten bewege verschiebt es sich innerhalb der Listbox. Wenn ich die Maustaste wieder loslasse gliedert es sich dort in der Listbox ein, wo es zu diesem Zeitpunkt befindet.
Kann man das verstehen. Das ist ähnlich wie beim Media Player in der medienbibliothek.
Wäre nett wenn jemand sagen kann wie das geht.

Vielen dank schon im Vorraus.