Declaration:

FUNCTION   CreateDuplicateObject

(   objectToDuplicate :HANDLE;     containerHandle :HANDLE ) :HANDLE ;

Description:

Duplicates the specified object and inserts the new object into the container. If container is nil, the new object will be inserted in the active container.

Parameters:

objectToDuplicate	The object to be duplicated
containerHandle	The container to the newly duplicated object

Declaration:

PROCEDURE   DeleteObjs

;

Description:

Procedure DeleteObjs deletes all selected objects on the active layer. Using this procedure when the layer display mode is Show/Snap/Modify will cause selected objects on any visible layer will be deleted.

Example:

DSelectAll;
SelectObj(((T=Locus) & (NOT V)));
DeleteObjs;

Declaration:

PROCEDURE   DelObject

( h:HANDLE ) ;

Description:

Procedure DelObject deletes the referenced object from the document.

Parameters:

h	Handle to object.

Declaration:

PROCEDURE   Duplicate

(   offsetDX :REAL;     offsetDY :REAL ) ;

Description:

Procedure Duplicate copies the currently selected objects and moves them the specified offset distance.

Parameters:

offset

Offset value.

Example:

Rect(0,1,1,0);
Duplicate(2,0);
{duplicates the rectangle 2 units right of the original}

Declaration:

FUNCTION   HDuplicate

(   objectHandle :HANDLE;     x :REAL;     y :REAL ) :HANDLE ;

Description:

Duplicates and moves an object by the offsets specified.

Parameters:

objectHandle	Handle to the object to duplicate
x	X-coordinate of distance object should be shifted from original location
y	Y-coordinate of distance object should be shifted from original location

Result:

Returns a handle to the new object.

Declaration:

PROCEDURE   HMove

(   h :HANDLE;     xOffset :REAL;     yOffset :REAL ) ;

Description:

Procedure HMove moves the referenced object a relative offset distance.

Parameters:

h	Handle to object.
xOffset	X offset distance.
yOffset	Y offset distance.

Example:

HMove(handleToObject,2,2);

Declaration:

PROCEDURE   HMoveBackward

(   h :HANDLE;     toBack :BOOLEAN ) ;

Description:

Move the referenced object backward in the object stacking order. If toBack is TRUE, the object will be moved to the back of the stacking order.

Parameters:

h	Handle to object.
toBack	Move to back of stacking order.

Declaration:

PROCEDURE   HMoveForward

(   h :HANDLE;     toFront :BOOLEAN ) ;

Description:

Move the referenced object forward in the object stacking order. If toFront is TRUE, the object will be moved to the front of the stacking order.

Parameters:

h	Handle to object.
toFront	Move object to front of stacking order.

Example:

PROCEDURE Example;
BEGIN
	HMoveForward(FSActLayer, FALSE);
END;
RUN(Example);

Declaration:

PROCEDURE   HRotate

(   h :HANDLE;     centerX :REAL;     centerY :REAL;     rotationAngle :REAL ) ;

Description:

Procedure HRotate rotates the referenced object about a coordinate point location. rotationAngle is in degrees.

Parameters:

h	Handle to object.
center	X-Y coordinates of center point of rotation.
rotationAngle	Angle of rotation.

Example:

HRotate(objHd,3,5,60d);

Declaration:

PROCEDURE   Move3D

(   xDistance :REAL;     yDistance :REAL;     zDistance :REAL ) ;

Description:

Procedure Move3D moves the most recently created three-dimensional object a relative distance from it's original location. The object is moved relative to its center.

Parameters:

xDistance	X offset distance.
yDistance	Y offset distance.
zDistance	Z offset ditance.

Example:

BeginXtrd(0',2");
Rect(0",1",1",0");
EndXtrd;
Move3D(3",1",2");

Declaration:

PROCEDURE   Move3DObj

(   h :HANDLE;     xDistance :REAL;     yDistance :REAL;     zDistance :REAL ) ;

Description:

Procedure Move3DObj moves the referenced object a specified distance from its current location. Movement distances are calculated from the 3D center of the object.

Parameters:

h	Handle to object.
xDistance	X offset distance.
yDistance	Y offset distance.
zDistance	Z offset distance.

Example:

Move3DObj(HandleToObj,2,4,0);

Declaration:

PROCEDURE   MoveObjs

(   moveDX :REAL;     moveDY :REAL;     allLayers :BOOLEAN;     allObjects :BOOLEAN ) ;

Description:

Procedure MoveObjs moves object(s) a specified offset distance. The last two parameters, allLayers and allObjects, control which objects are offset by this procedure.

Table - Effect of MoveObjs Parameters

allLayers	allObjects	Effect
TRUE	TRUE	Move all objects on all layers
TRUE	FALSE	Move selected objects on all layers
FALSE	TRUE	Move all objects on active layer
FALSE	FALSE	Move selected objects on active layer

Parameters:

move	X-Y object offset distance.
allLayers	Move objects on all layers option setting.
allObjects	Move all objects option setting.

Example:

MoveObjs(3,0,FALSE,FALSE);
{ moves selected objects on active layer 3 units to the right }

Declaration:

PROCEDURE   SetBBox

(   h :HANDLE;     p1X :REAL;     p1Y :REAL;     p2X :REAL;     p2Y :REAL ) ;

Description:

Procedure SetBBox positions objects whose geometry is defined by a bounding box. These objects currently are Image, PICT, Rectangle, Oval, Rounded Rectangle, and Worksheet Container.

Other objects will generate a warning if they are passed to SetBBox.

Parameters:

h	Handle to object.
p1	Top left coordinate of bounding box.
p2	Bottom right coordinate of bounding box.

Declaration:

PROCEDURE   SetHDef

(   oldH :HANDLE;     newH :HANDLE ) ;

Description:

Procedure SetHDef replaces the definition of the referenced "container" object with a new definition. Supported object types are worksheets, symbol definitions, and layer references.

Parameters:

oldH	Handle to object.
newH	Handle to new definition.

Example:

SetHDef(symbolHd,newSymDefHd);
{updates the referenced symbol with a new definition}