Graphics Subroutine: Sets the current line style to a new line style.
Module: USE DFLIB
Syntax
The mask is mapped to the style that most closly equivalences the 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.
Compatibility
STANDARD GRAPHICS QUICKWIN GRAPHICS LIB
See Also: GETLINESTYLE, GRSTATUS, LINETO, POLYGON, RECTANGLE, SETCOLOR, SETWRITEMODE
Example
! Build as a Graphics ap.
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