1<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> 2<html> 3 4<head> 5<title>Windows Interface Reference: Line structure</title> 6</head> 7 8<body> 9 10<h1>Line </h1> 11 12<p>The Line structure contains functions to draw lines.</p> 13 14<pre>structure Line : 15 sig 16 type HDC 17 type RECT = { top: int, left: int, bottom: int, right: int } 18 type POINT = { x: int, y: int } 19 20 datatype PointType = 21 PT_BEZIERTO 22 | PT_BEZIERTOANDCLOSE 23 | PT_LINETO 24 | PT_LINETOANDCLOSE 25 | PT_MOVETO 26 27 eqtype ArcDirection 28 val AD_CLOCKWISE : ArcDirection 29 val AD_COUNTERCLOCKWISE : ArcDirection 30 31 val AngleArc : HDC * int * int * int * real * real -> unit 32 val Arc : HDC * RECT * int * int * int * int -> unit 33 val ArcTo : HDC * RECT * int * int * int * int -> unit 34 val GetArcDirection : HDC -> ArcDirection 35 val LineTo : HDC * POINT -> bool 36 val MoveToEx : HDC * POINT -> POINT 37 val PolyBezier : HDC * POINT list -> unit 38 val PolyBezierTo : HDC * POINT list -> unit 39 val PolyDraw : HDC * (PointType * POINT) list -> unit 40 val Polyline : HDC * POINT list -> unit 41 val PolylineTo : HDC * POINT list -> unit 42 val SetArcDirection : HDC * ArcDirection -> ArcDirection 43 end</pre> 44</body> 45</html> 46