helm/DEVEL/lablgtkmathview/gMathView.mli

   1 (* Copyright (C) 2000, Luca Padovani <luca.padovani@cs.unibo.it>.
   2  *
   3  * This file is part of lablgtkmathview, the Ocaml binding
   4  * for the GtkMathView widget.
   5  *
   6  * lablgtkmathview is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU General Public License
   8  * as published by the Free Software Foundation; either version 2
   9  * of the License, or (at your option) any later version.
  10  *
  11  * lablgtkmathview is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with lablgtkmathview; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  19  *
  20  * For details, send a mail to the author.
  21  *)
  22
  23 exception ErrorLoadingFile of string
  24 exception ErrorWritingFile of string
  25 exception ErrorLoadingDOM
  26 exception NoSelection
  27 class math_view_signals :
  28   ([> `container | `widget | `base | `math_view] as 'b) Gtk.obj ->
  29   object ('a)
  30     inherit GContainer.container_signals
  31     val obj: 'b Gtk.obj
  32     method clicked : callback:(Gdome.element -> unit) -> GtkSignal.id
  33     method element_changed :
  34       callback:(Gdome.element option -> unit) -> GtkSignal.id
  35     method selection_changed :
  36       callback:(Gdome.element option -> unit) -> GtkSignal.id
  37   end
  38 class math_view :
  39   (Gtk_mathview.math_view Gtk.obj as 'a)->
  40   object
  41     inherit GContainer.container
  42     method action_get_selected : int
  43     method action_set_selected : int -> unit
  44     method action_toggle : unit
  45     method connect : math_view_signals
  46     method export_to_postscript :
  47       ?width:int ->
  48       ?height:int ->
  49       ?x_margin:int ->
  50       ?y_margin:int ->
  51       ?disable_colors:bool -> filename:string -> unit -> unit
  52     method get_action : Gdome.element option
  53     method get_anti_aliasing : bool
  54     method get_buffer : Gdk.pixmap
  55     method get_element : Gdome.element option
  56     method get_font_manager_type : [ `font_manager_gtk | `font_manager_t1]
  57     method get_font_size : int
  58     method get_frame : GBin.frame
  59     method get_hadjustment : GData.adjustment
  60     method get_height : int
  61     method get_kerning : bool
  62     method get_log_verbosity : int
  63     method get_selection : Gdome.element option
  64     method get_top : int * int
  65     method get_transparency : bool
  66     method get_vadjustment : GData.adjustment
  67     method get_width : int
  68     method load : filename:string -> unit
  69     method load_tree : dom:Gdome.document -> unit
  70     method set_adjustments : GData.adjustment -> GData.adjustment -> unit
  71     method set_anti_aliasing : bool -> unit
  72     method set_font_manager_type :
  73       fm_type:[ `font_manager_gtk | `font_manager_t1] -> unit
  74     method set_font_size : int -> unit
  75     method set_kerning : bool -> unit
  76     method set_log_verbosity : int -> unit
  77     method set_selection : Gdome.element option -> unit
  78     method set_top : int -> int -> unit
  79     method set_transparency : bool -> unit
  80     method unload : unit
  81     val obj : 'a
  82   end
  83 val math_view :
  84   ?adjustmenth:GData.adjustment ->
  85   ?adjustmentv:GData.adjustment ->
  86   ?font_size:int ->
  87   ?font_manager:[ `font_manager_gtk | `font_manager_t1] ->
  88   ?border_width:int ->
  89   ?width:int ->
  90   ?height:int ->
  91   ?packing:(GObj.widget -> unit) -> ?show:bool -> unit -> math_view