Locus

Locus Objects - 2D

Declaration:

       PROCEDURE   Locus ( pX :REAL;
			   pY :REAL
    			  ) ;

Description:

　Procedure Locus creates a 2D locus object at the specified coordinate location.

説明

　 指定した座標の位置に基準点を作成します。

Parameters:

　 p Coordinate location of new locus. 基準点の座標

Example:

PROCEDURE Example;
VAR
       	x, y :REAL;
      BEGIN
       	HCenter(FSActLayer, x, y);
       	Locus(x, y);
      END;
RUN(Example);