Resizing a Boxobject

Hello,

I tried to rezise a known boxobject in a Report:

obj is the original boxobjext witch was found in the report

' cast the obj to a BoxObject
Dim pObj As CrystalDecisions.ReportAppServer.ReportDefModel.BoxObject = CType(obj, CrystalDecisions.ReportAppServer.ReportDefModel.BoxObject)

'clone the casted BoxObject
Dim objClone As CrystalDecisions.ReportAppServer.ReportDefModel.BoxObject = pObj.Clone

' set the right position                
objClone.Right = objClone.Left + 100

' change the color
objClone.LineColor = RGB(255, 0, 0)

'on the rasDoc exchange the object
m_RasDoc.ReportDefController.ReportObjectController.Modify(obj, objClone)

.......

'view the report

If i view the report the BoxObject has changed the color, but the left position is unchanged.

But if I save the report with the save Method and I view it in the Crystal Reports Designer the BoxObject has changed the size.

Is there any solution for this problem?