Drag and Drop VCL mit sichtbarer Komponente

[fisipjm]

Hi,

für ein Projekt war ich eine gefühlte Ewigkeit auf der Suche nach einer Komponente, die es mir ermöglicht in der VCL ein Array of Records anzuzeigen (großteils Label, kein Bild, aber ein Edit das Änderungen auch zurück spielt). Zusätzlich sollte die Komponente auch die einzelnen Items per Drag and Drop sortieren können. Hab nix gefunden was alles abdeckt. Deshalb versuch ich mich jetzt selbst daran mit einer TFrameKomponenten, die ein paar Funktionen zur Interaktion bekommt und einfach selbst TFlowPanels mit ensprechenden inhalten generiert.
Vorneweg, wenn es an diesem Punkt schon Einwände gibt und ihr sagt, wie kompliziert warum nimmst du denn nicht xy. Das Projekt ist nicht in Stein gemeißelt ich lass mich gern von besserem Überzeugen.

Jetzt aber zu meiner eigentlichen Frage. Ich versuche gerade Drag and Drop umzusetzen. Das grobe Konzept dahinter hab ich verstanden und hab es auch schon soweit zum laufen gebracht, das ich die Panels via Drag and Drop verschieben kann. Was ich jetzt noch gerne hätte:
- Das FlowPanel soll während des Ziehens mit wandern. anktuell ändert sich einfach nur der Mauszeiger in die Drag-Geste und beim los lassen erscheint die Komponente
- Ich hätte gerne eine "vorschau" wo das Panel landen würde wenn ich es los lasse. Also im prinzip so, dass das Target Panel aus dem weg geht und man sieht, wo das Panel landen würde wenn man los lässt.

Wie mach ich sowas?

Gruß
PJM