Ziehen von Objekten mit der Maus

[Martin Rupprecht]

Hallo,

wie kann ich ein Objekt, z.B. ein Panel, zur Programmlaufzeit mit der Maus ziehen und dabei die Umrisse des Objekts und seine Position anzeigen
(wie es z.B. in der Entwicklungsumgebung vom CBuilder der Fall ist) ?

Bin für jeden Tipp dankbar

Martin

[Thorsten Lepke]

Hallo,<br>
hier mein ungeprüfter Lösungsvorschlag:<br>
Mit dem Ereignis OnMouseDown (auf dem Panel + Formular) überprüfen ob ein Klick auf den Rand des Panels erfolgte
(plus einen Offset).<br>
Dann mit TCanvas einen Rahmen um Panel ziehen. Mit dem Ereignis OnMouseMove kann dann der Rahmen der
Mausposition angepasst werden. Bei dem Ereignis OnMouseUp wird dann das Panel der entsprechenden Größe
angepasst (evtl Taste Escape für Abbruch abfangen).

Gruß Thorste