package camlpdf

  1. Overview
  2. Docs
type style =
  1. | NoStyle
  2. | Solid
  3. | Dashed
  4. | Beveled
  5. | Inset
  6. | UnderlineStyle
type border = {
  1. width : float;
  2. vradius : float;
  3. hradius : float;
  4. style : style;
  5. dasharray : int array;
}
type subtype =
  1. | Text
  2. | FreeText
  3. | Line
  4. | Square
  5. | Circle
  6. | Polygon
  7. | PolyLine
  8. | Highlight
  9. | Underline
  10. | Squiggly
  11. | StrikeOut
  12. | Stamp
  13. | Caret
  14. | Ink
  15. | Popup of t
  16. | FileAttachment
  17. | Sound
  18. | Movie
  19. | Widget
  20. | Screen
  21. | PrinterMark
  22. | TrapNet
  23. | Watermark
  24. | ThreeDee
  25. | Unknown
and t = {
  1. subtype : subtype;
  2. annot_contents : string option;
  3. subject : string option;
  4. rectangle : float * float * float * float;
  5. border : border;
  6. colour : (int * int * int) option;
  7. annotrest : Pdf.pdfobject;
}
val read_annotation : Pdf.t -> Pdf.pdfobject -> t
val get_popup_parent : Pdf.t -> Pdf.pdfobject -> int option
val annotations_of_page : Pdf.t -> Pdfpage.t -> t list
val string_of_subtype : subtype -> string
val obj_of_annot : t -> Pdf.pdfobject
val make_border : ?vradius:float -> ?hradius:float -> ?style:style -> ?dasharray:int array -> float -> border
val make : ?content:string -> ?border:border -> ?rectangle:(float * float * float * float) -> ?colour:(int * int * int) -> ?subject:string -> subtype -> t
val add_annotation : Pdf.t -> Pdfpage.t -> t -> Pdfpage.t