Previous  Up  Next

Module Cpdfdraw

module Cpdfdraw: sig .. end

Draw on PDFs

type colspec =
| NoCol
| RGB of float * float * float
| Grey of float
| CYMK of float * float * float * float 
type justification =
| Left
| Right
| Centre 
type drawops =
| Rect of float * float * float * float
| Bezier of float * float * float * float * float * float
| Bezier23 of float * float * float * float
| Bezier13 of float * float * float * float
| To of float * float
| Line of float * float
| ClosePath
| SetFill of colspec
| SetStroke of colspec
| SetLineThickness of float
| SetLineCap of int
| SetLineJoin of int
| SetMiterLimit of float
| SetDashPattern of float list * float
| Matrix of Pdftransform.transform_matrix
| Qq of drawops list
| Fill
| FillEvenOdd
| Stroke
| FillStroke
| FillStrokeEvenOdd
| Clip
| ClipEvenOdd
| FormXObject of float * float * float * float * string * drawops list
| Use of string
| ImageXObject of string * Pdf.pdfobject
| Image of string
| NewPage
| Opacity of float
| SOpacity of float
| FontPack of string * Cpdfembed.cpdffont * (int, unit) Stdlib.Hashtbl.t
| Font of string * float
| TextSection of drawops list
| Text of string
| SpecialText of string
| Para of float option * justification * float * string list
| Newline
| Leading of float
| CharSpace of float
| WordSpace of float
| TextScale of float
| RenderMode of int
| Rise of float
| Tag of string
| EndTag
| STag of string
| EndSTag
| BeginArtifact
| EndArtifact
| Namespace of string
| EltInfo of string * Pdf.pdfobject
| EndEltInfo of string
| AutoTag of bool 
val do_add_artifacts : bool Stdlib.ref

When this is set, any untagged material is tagged as an artifact.

val rolemap : string Stdlib.ref

Set the role map.

val draw : struct_tree:bool ->
       fast:bool ->
       underneath:bool ->
       filename:string ->
       bates:int ->
       batespad:int option -> int list -> Pdf.t -> drawops list -> Pdf.t

Calling draw struct_tree fast underneath filename bates batespad range pdf drawops draws on top of all the pages in the range.