Zieh- oder Anfasspunkte um markierte Objekte

[runningsoft]

Hallo,

ich möchte um ein TShape nach dem Markieren mit der Maus die für Grafikprogramme typischen "Anfasspunkte" zum Vergrößern oder Verkleinern des Objektes zeichnen. Hat jemand einen Vorschlag, wie man so etwas realisieren kann?

Danke

Steffen

[runningsoft]

***push***

Keiner 'ne Idee?

[v2afrank]

Schau Dir mal StretchHandle an. Vielleicht kannst Du das nutzen

[mkinzler]

http://sourceforge.net/projects/ascad/
http://sourceforge.net/projects/commoncad/

[Matze]

Moin,

schau mal ins SDC: ...Komponenten während der Laufzeit in Größe ändern, Verschieben?

[runningsoft]

Hallo,

Danke für die Tipps. Ich hatte es dann zwischenzeitlich bereits so ähnlich wie im Tipp von Matze realisiert. Hab allerdings keine Panele verwendet, sondern um das vorhandene TShape, das zu stretchen ist, weitere acht Shapes gelegt.

Jedem Shape habe ich einen entsprechenden Cursor zugeordnet (crSizeNS, crSizeWE, crSizeNWSE, crSizeNESW) sowie eine entsprechendes OnMouseOver - Ereignis, mit dem ich das zu stretchende Shape in die entsprechende Richtung vergrößern oder verkleinern kann sowie die betreffenden Markierungs-Shapes verschiebe.

Ist vielleicht nicht die eleganteste Lösung, weil ich keine eigene Klasse entwickelt hab, aber für mein Projekt ausreichend.

Steffen