グラフィックス・サブルーチン:現在の線種を新しい線種に設定します。
モジュール: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 は,LINETO,POLYGON,および RECTANGLE での直線の描画に影響しますが,ARC,ELLIPSE,または PIE での曲線の描画には影響しません。
現在のグラフィックス色は,SETCOLORRGB または SETCOLOR で設定されます。SETWRITEMODE は,どのように線が表示されるかに影響します。
互換性
STANDARD GRAPHICS QUICKWIN GRAPHICS LIB
関連情報
GETLINESTYLE,GRSTATUS,LINETO,POLYGON,RECTANGLE,SETCOLOR,SETWRITEMODE
例
! 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