SETLINESTYLE

グラフィックス・サブルーチン:現在の線種を新しい線種に設定します。

モジュールUSE DFLIB

形式

CALL SETLINESTYLE (mask)

mask
(入力) INTEGER(2)。要求する Quickwin 線種マスク (以下の表を参照)。

マスクは,設定するマスクのビットの割合に最も近い値の線種にマップされます。線種は,その線のピクセルの一定の割合をカバーする線を生成します。

SETLINESTYLE は,線を描画する時に使用される線種を設定します。以下の線種から選択することができます。

QuickWin マスク 内部 Windows 形式 選択基準 見え方
0xFFFF PS_SOLID 16 ビットがオン ____________
0xEEEE PS_DASH 11 ~ 15 ビットがオン ----------------
0xECEC PS_DASHDOT 10 ビットがオン -.-.-.-.-.-.-.-.-.-.
0xECCC PS_DASHDOTDOT 9 ビットがオン -..-..-..-..-..-..-..
0xAAAA PS_DOT 1 ~ 8 ビットがオン ........................
0x0000 PS_NULL 0 ビットがオン  

SETLINESTYLE は,LINETOPOLYGON,および RECTANGLE での直線の描画に影響しますが,ARCELLIPSE,または PIE での曲線の描画には影響しません。

現在のグラフィックス色は,SETCOLORRGB または SETCOLOR で設定されます。SETWRITEMODE は,どのように線が表示されるかに影響します。

互換性

STANDARD GRAPHICS QUICKWIN GRAPHICS LIB

関連情報

GETLINESTYLEGRSTATUSLINETOPOLYGONRECTANGLESETCOLORSETWRITEMODE

	! QuickWin または Standard Graphics アプリケーションでビルドします。
	USE DFLIB
	INTEGER(2)     status, style
	TYPE (xycoord) xy

	style = #FFFF
	CALL SETLINESTYLE(style)
	CALL MOVETO(INT2(50), INT2(50), xy )
	status = LINETO(INT2(300), INT2(300))
	END