|
Establece la propiedad DragMode de los edits a dmAutomatic
en el evento onDragDrop pones esto:
(Sender as TEdit).text:=(Source as TEdit).Text;
y en el evento OnDragOver pones esto:
Accept:=Source is TEdit;
listo, ya puedes hacer un drag and drop de tus edits
|