# Line

The Line structure contains functions to draw lines.

    structure Line :
      sig
        type HDC
    	type RECT = { top: int, left: int, bottom: int, right: int }
    	type POINT = { x: int, y: int }

        datatype PointType =
              PT_BEZIERTO
            | PT_BEZIERTOANDCLOSE
            | PT_LINETO
            | PT_LINETOANDCLOSE
            | PT_MOVETO

        eqtype ArcDirection
        val AD_CLOCKWISE : ArcDirection
        val AD_COUNTERCLOCKWISE : ArcDirection

        val AngleArc : HDC * int * int * int * real * real -> unit
        val Arc : HDC * RECT * int * int * int * int -> unit
        val ArcTo : HDC * RECT * int * int * int * int -> unit
        val GetArcDirection : HDC -> ArcDirection
        val LineTo : HDC * POINT -> bool
        val MoveToEx : HDC * POINT -> POINT
        val PolyBezier : HDC * POINT list -> unit
        val PolyBezierTo : HDC * POINT list -> unit
        val PolyDraw : HDC * (PointType * POINT) list -> unit
        val Polyline : HDC * POINT list -> unit
        val PolylineTo : HDC * POINT list -> unit
        val SetArcDirection : HDC * ArcDirection -> ArcDirection
      end