| Navigation: Language Reference > 13 - Built-in Functions >====== SETPENSTYLE (set line draw style) ====== |    |
SETPENSTYLE( [style] )
| SETPENSTYLE | Sets the current pen style. |
| Style | An integer constant, constant EQUATE, or variable that specifies the pen's style. If omitted, a solid line is set. |
The SETPENSTYLE procedure sets the current line draw style for use by all graphics procedures. The default is a solid line. This procedure is valid in Clarion Win32 Windows, and also for REPORT structures in both Clarion Win32 and Clarion#.
Every window has its own current pen style. Therefore, to consistently use the same pen (which does not use the default style setting) across multiple windows, the SETPENSTYLE statement should be issued for each window.
EQUATE statements for the pen styles are contained in the EQUATES.CLW file. The following list is a representative sample of these (see EQUATES.CLW for the complete list):
| PEN:solid | Solid line | |
| PEN:dash | Dashed line | |
| PEN:dot | Dotted line | |
| PEN:dashdot | Mixed dashes and dots |
Example:
MDIChild WINDOW('Child One'),AT(0,0,320,200),MDI,MAX,HVSCROLL
!window controls
END
CODE
OPEN(MDIChild)
SETPENCOLOR(000000FFh) !Set blue pen color
SETPENSTYLE(PEN:dash) !Set dashes for line style
ROUNDBOX(100,50,100,50,00FF0000h) !Red round-cornered box with blue dashed border
See Also: