Drag'n'Drop

[HolzFreak]

Hallo zusammen

Kann mir jemand weiterhelfen, wie man DragDrop anwendet ?
Ich moechte ein kleines Quiz erstellen, hab fixe Antwortpanels und moechte einfach den FrageButton auf die richtige Loesung ablegen.
Dies funktioniert mit einem Button. Siehe Screenshot2. Aber der andere Button kann ich nicht bewegen.
Quelltext beiliegend.

Danke fuer Eure Antworten

Gruss

Holzfreak

[Uwe Raabe]

Im DragOver musst du Accept anders setzen:

Delphi-Quellcode:

accept := (Source = BitBtnWithColor2) or (Source = BitBtnWithColor1);

[himitsu]

PS: In den Demos, welche man mit seinem Delphi-Setup mitbekommt, gibt es auch irgendwo mindestens ein Beispiel, wie man diese Art von D&D verwendet.

[edit]
ach, die TXT ist eine PAS :shock:

[HolzFreak]

Hallo

Danke fuer den Hinweis. Funktioniert jetzt.

Gruss

Holzfreak