Einzelnen Beitrag anzeigen

Freiwilderer

Registriert seit: 26. Mai 2009
163 Beiträge
 
Delphi 7 Enterprise
 
#4

Re: Designer Programmierung, Felder verschieben

  Alt 18. Jun 2009, 09:30
hi,
also ich habs jetzt anders gelöst, is allerdings etwas umständlicher
im prinzip setze ich den Mauszeiger beim Klicken in das zu verschiebene Feld in die Mitte des Feldes.
(MouseDown)
dann speichere ich die Position des cursers in eine TPoint variable.

im onMouseMove frage ich dann in 4 if Abfragen ab, ob die aktuelle curser position mehr als 5 pixel von der gespeicherten entfernt ist (natürlich für x und y einzeln), setzte dann das feld 5 pixel in die eine oder andere richtung und setze auch den TPoint wert auf die neue koordinate.
Das funktioniert nun genau so, wie ich mir das vorgestellt hatte

falls jemand den quellcode haben will, bitte mail an freiwilderer@gmx.de ... das is zu kompliziert zum posten hier und ich weiß, wie ärgerlich es ist, wenn man zwar ein thema findet, welches zum eigenen problem passt, aber keine lösung drin steht, sondern nur, jetzt läufts ;D

mfg
  Mit Zitat antworten Zitat