Hello guys!
I have a problem in order to rotate all objects inside a group. Although I have add the FollowMasterRotation=true, the objects seem to become bigger and smaller when I manually rotate the master box. My goal is to rotate everything inside by following the master object's move. Just like a label in a CD disk.
Check my simple code:
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click bx1 = AxFlowChart2.CreateBox(40, 40, 300, 300) bx1.Style = FLOWCHARTLib.EBoxStyle.bsShape
bx1.RotateContents = True bx1.RotateText = True bx1.LayoutStyle = FLOWCHARTLib.ELayoutStyle.lsCustom
grp1 = AxFlowChart2.CreateGroup(bx1)
bx2 = AxFlowChart2.CreateBox(10, 10, 50, 50) bx2.Style = FLOWCHARTLib.EBoxStyle.bsShape grp1.AttachProportional(bx2, 10, 10, 50, 50)
bx3 = AxFlowChart2.CreateBox(70, 70, 20, 20) bx3.Style = FLOWCHARTLib.EBoxStyle.bsShape grp1.AttachProportional(bx3, 70, 70, 20, 30)
grp1.FollowMasterRotation = True
bx1.MoveTo(40, 40)
End Sub
I would appreciate your help
Best Regards
Vangelis Komninos
|