Delphi-PRAXiS

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/)
-   -   Delphi Drag&Drop mit Controls (https://www.delphipraxis.net/55459-drag-drop-mit-controls.html)

Tobi482 21. Okt 2005 12:17


Drag&Drop mit Controls
 
Hallo Leute,

Jedes Visuelle Object in Delphi unterstützt ja das Drag&Drop-System. Ich klicke das Obejct an ziehe es und fertig :-D.
Gibt es eine einfache Möglichkeit das Control während des Drag&Drop-Vorgangs einzublende?
z.B.

Ein Panel mit DragMode := dmAutomatic wird gezogen. Sobald man den Courser nun über ein Control bewegt, welches Drops aktzepiert, verändert sich das Symbol. Solange ich aber den Courser bewege und nach einem möglichen DropTarget suche, bleibt das gedraggt Control immer an seiner Stelle.
Wie kann ich es dem Courser Folgen lassen in einer Art Ghostmode so wie es die Icons im Explorer machen. Da wird ein gedragtes Symbol, welches noch nicht gedropt worden ist, halbtransparent an den Courser gehängen.

Mit freundlichen Grüßen Tobi

Pfoto 21. Okt 2005 15:28

Re: Drag&Drop mit Controls
 
Hallo "Tobi482"

schau mal auf dieser Seite:
http://www.blong.com/Conferences/Bor...dDrop/4114.htm

Dort wird ziemlich viel über Drag&Drop erklärt,
auch wie man eine Komponente "ghosted" zieht.


Gruß
Pfoto

Tobi482 23. Okt 2005 11:44

Re: Drag&Drop mit Controls
 
Danke die Seite ist klasse

DAAANNKKE

Gruß Tobi

Tobi482 25. Okt 2005 16:36

Re: Drag&Drop mit Controls
 
Hi

Also erstnochmal Danke :-)

es hat sich aber nun ein Neues Problem ergeben :-(
Der Beispiel Code erklärt gut wie man die Images erstellt dei dann an der Maus hängen.

Leider passiert jedoch ein Fehler.

Soblad man das Image über ein Controlführt ist alels in Ordnung.
Führt man jedoch das Image über ein Control, dessen Parent eine
TGroupBox ist, verschwindet es :-(.

Gruß Tobi


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:27 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz