SETLINESTYLE (W*S)

Graphics Subroutine: Sets the current line style to a new line style.

Module

USE IFQWIN

CALL SETLINESTYLE (mask)

mask	(Input) INTEGER(2). Desired Quickwin line-style mask. (See the table below.)

The mask is mapped to the style that most closely equivalences the percentage of the bits in the mask that are set. The style produces lines that cover a certain percentage of the pixels in that line.

SETLINESTYLE sets the style used in drawing a line. You can choose from the following styles:

QuickWin Mask	Internal Windows* Style	Selection Criteria	Appearance
0xFFFF	PS_SOLID	16 bits on	____________
0xEEEE	PS_DASH	11 to 15 bits on	----------------
0xECEC	PS_DASHDOT	10 bits on	-.-.-.-.-.-.-.-.-.-.
0xECCC	PS_DASHDOTDOT	9 bits on	-..-..-..-..-..-..-..
0xAAAA	PS_DOT	1 to 8 bits on	........................
0x0000	PS_NULL	0 bits on

SETLINESTYLE affects the drawing of straight lines as in LINETO, POLYGON, and RECTANGLE, but not the drawing of curved lines as in ARC, ELLIPSE, or PIE.

The current graphics color is set with SETCOLORRGB or SETCOLOR. SETWRITEMODE affects how the line is displayed.

Example

! Build as a Graphics ap.
 USE IFQWIN
 INTEGER(2)     status, style
 TYPE (xycoord) xy

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

SETLINESTYLE (W*S)

Module

Example

See Also