drag and drop

Legeti · Hält's aus hier Beiträge: 2

HI!
Ich möchte ein shape per drag&drop auf ein anderes Shape verschieben. Dabei soll das shape mit dem cursor mitwandern?!!!!

Wie geht das??? PS: Ich wußte es mal. Es geht !!!!!!!!

Danke!!!

Ex0rzist · Beiträge: 550 Win XP Prof. Mandrake 10.0 D6

Hmm, ich würde das spontan mit dem OnMouseMove-Ereignis lösen.

markieren

Quelltext

1:
2:
3:
4:
5:

Procedure OnMouseMove...
begin
If Drag= True then 
 Shape.Position := Maus.Position
end;

Dabei ist Drag eine (globale) Boolesche Variable, die im OnMouseDown enabled und im OnMouseUp disabled wird.

Habs nicht getestet, müsste aber funktionieren.

_________________
If accidentally read, induce vomitting.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme