Delphi-PRAXiS - drag and drop

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - drag and drop (https://www.delphipraxis.net/113823-drag-drop.html)

khh	15. Mai 2008 10:25

drag and drop

hallo zusammen,
gibts irgendwo ein Beispiel für Folgendes?
ich erstelle zur Laufzeit im click event des Parent ein Label: MyLabel := TLabel.create(self)
Dies ist logischerweise öfter möglich.
Jetzt möchte ich die Labels auf dem Parent verschieben.
Hier hab ich aber leider immer nur Zugriff auf das zuletzt eingefügte label :-(
Wie kann ich feststellen, welches Label verschoben werden soll?

Danke für eure Info
Gruss KH

bitsetter

15. Mai 2008 11:21

Re: drag and drop

Liste der Anhänge anzeigen (Anzahl: 1)

Hi,

du muss in den zugewiesenen Prozeduren StartDrag DragOver und DragDrop das Objekt Sender oder Source nach TLabel casten, siehe Anhang.

khh	15. Mai 2008 13:34

Re: drag and drop

@bitsetter

ich danke dir

Gruss KH

Alle Zeitangaben in WEZ +1. Es ist jetzt 13:33 Uhr.