SetObjBeginningMarker

SetObjBeginningMarker

Declaration:

       FUNCTION   SetObjBeginningMarker
  	
       ( 	  	object 	:HANDLE;
         	  	style 	:LONGINT;
         	  	angle 	:INTEGER;
         	  	size 	:REAL;
         	  	width 	:REAL;
         	  	thicknessBasis 	:INTEGER;
         	  	thickness 	:REAL;
         	  	visibility 	:BOOLEAN
       ) :BOOLEAN ;

Description:

       Sets all properties of an object's beginning marker. Return TRUE if operation was successful.

説明

       ハンドルで指定した図形の始点マーカのすべての設定値を設定します。正常終了するとTRUEが返されます。

Parameters:

       object 	Handle to object. 	図形のハンドル
       style 	The marker style. (see comments for details) 	タイプ
       angle 	The marker angle in degrees. (0 to 90) 	角度（度数、0から90）
       size 	The marker size in page inches. 	長さ（インチ）
       width 	The marker width in page inches. 	幅（インチ）
       thicknessBasis	The marker thickness basis. ( see comments for details) 	太さ
       thickness 	The marker thickness. 	カスタム設定の太さ
       visibility 	The marker visibility. 	表示／非表示

Example:

       PROCEDURE Example;
       VAR
       	ok : BOOLEAN;
       	
       BEGIN
       	MoveTo (0,0);
       LineTo (100, 0);
       	ok := SetObjBeginningMarker(LNewObj, 1280, 25, 0.25, 0.125, 34, 2, TRUE);	
       END;

       RUN(Example);

See Also:

       SetObjEndMarker