05-15-2024, 08:37 AM
Hi,
Do you have an example, the following works for me. Most shapes/controls rotate about their bounding box centre, lines are an exceptions and tricky to rotate.
Do you have an example, the following works for me. Most shapes/controls rotate about their bounding box centre, lines are an exceptions and tricky to rotate.
Code:
Polygon1 = LDShapes.AddPolygon("1=1\=0\;2\=50\;;2=1\=34.5\;2\=97.6\;;3=1\=90.5\;2\=79.4\;;4=1\=90.5\;2\=20.6\;;5=1\=34.5\;2\=2.4\;;")
Shapes.Move(Polygon1,100,100)
For i = 1 To 360
Shapes.Rotate(Polygon1,i)
Program.Delay(10)
EndFor