1<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> 2<html> 3 4<head> 5<title>Windows Interface Reference: Pen structure</title> 6</head> 7 8<body> 9 10<h1>Pen </h1> 11 12<p>The Pen structure contains functions and structures to create pens.</p> 13 14<pre>structure Pen : 15 sig 16 type HPEN 17 datatype 18 PenStyle = 19 PS_ALTERNATE 20 | PS_COSMETIC 21 | PS_DASH 22 | PS_DASHDOT 23 | PS_DASHDOTDOT 24 | PS_DOT 25 | PS_ENDCAP_FLAT 26 | PS_ENDCAP_ROUND 27 | PS_ENDCAP_SQUARE 28 | PS_GEOMETRIC 29 | PS_INSIDEFRAME 30 | PS_JOIN_BEVEL 31 | PS_JOIN_MITER 32 | PS_JOIN_ROUND 33 | PS_NULL 34 | PS_SOLID 35 | PS_USERSTYLE 36 37 type COLORREF = Color.COLORREF 38 type LOGBRUSH = Brush.LOGBRUSH 39 type LOGPEN = PenStyle * int option * COLORREF 40 41 val CreatePen : PenStyle list * int * COLORREF -> HPEN 42 val CreatePenIndirect : LOGPEN -> HPEN 43 val ExtCreatePen : PenStyle list * int * LOGBRUSH * (int * int) list -> HPEN 44 end</pre> 45</body> 46</html> 47