Procedure EndGroup completes the creation of a new group object in a VectorWorks document. The new group object is then generated in the document.
PROCEDURE EndGroup;def vs.EndGroup():
return NoneBeginGroup;
Rect(-1,1,0.5,0);
Rect(0,1.5,1,0.5);
Oval(-1.5,0.5,-0.5,-0.5);
EndGroup;
{creates a group object}
BeginGroup;
Rect(-1,1,0,0.5);
Rect(-1,0.5,-0.5,0);
BeginGroup;
Oval(-0.5,0.5,1,0);
Oval(0,0,1,-0.5);
EndGroup;
EndGroup;
{creates a group comprised of 2 rects and 1 group}vs.BeginGroup()
vs.Rect(-1,1,0.5,0)
vs.Rect(0,1.5,1,0.5)
vs.Oval(-1.5,0.5,-0.5,-0.5)
vs.EndGroup()
#{creates a group object}
vs.BeginGroup()
vs.Rect(-1,1,0,0.5)
vs.Rect(-1,0.5,-0.5,0)
vs.BeginGroup()
vs.Oval(-0.5,0.5,1,0)
vs.Oval(0,0,1,-0.5)
vs.EndGroup()
vs.EndGroup()
#{creates a group comprised of 2 rects and 1 group}EndGroup;vs.Locus(0,0)
vs.SetRecord( vs.LNewObj(), kHiddenRecName )
vs.SetRField( vs.LNewObj(), kHiddenRecName, 'IEMAction', 'DeleteMe' )
vs.EndGroup()
hGroupHand = vs.LNewObj()
vs.SetPenFore( vs.LNewObj(), 65535, 0, 0 )
vs.SetFPat( vs.LNewObj(), 1 )
vs.HMoveBackward( vs.LNewObj(), False )
vs.EndGroup()
vs.HMoveForward( vs.LNewObj(), True )
vs.BeginRoof( rightX, gutterBottomY, leftX, gutterBottomY, r1 + w / 2, -1, drop, r1, 2, thickness )
DrawRoadway( r1, sweep2D, w )
vs.SetZVals( zVal, deltaZVal )
vs.EndGroup()
tempHand = vs.ConvertToNURBS( vs.LNewObj(), False )
SetAttrsByClassOrParent( tempHand, gObjHandle, gPaving_Class )
#vs.SetSelect( gObjHandle )
DrawRoadway( r1, sweep2D, w )VS Functions: BeginGroup | BeginGroupN
Availability: from All Versions