Exports information for the overall size of the model

Parameters

model (string) - the model name

Return Value

CreoCube- Custom object that contains all the information about the size of the model

Remarks

 

Examples

Dim ActiveModel As String = CAD.Win.ActiveModel
Dim BOX As CreoCube = CAD.solid.OuterBounds(ActiveModel)

CAD.Feat.Resume( ActiveModel, "OUTER_PTS-PRO")
CAD.Dim.Write(ActiveModel, "", "PRO_X1_DIM", BOX.X1)
CAD.Dim.Write(ActiveModel, "", "PRO_X2_DIM", BOX.X2)
CAD.Dim.Write(ActiveModel, "", "PRO_Y1_DIM", BOX.Y1)
CAD.Dim.Write(ActiveModel, "", "PRO_Y2_DIM", BOX.Y2)
CAD.Dim.Write(ActiveModel, "", "PRO_Z1_DIM", BOX.Z1)
CAD.Dim.Write(ActiveModel, "", "PRO_Z2_DIM", BOX.Z2)
CAD.Regenerate(ActiveModel)