helm/DEVEL/lablgtkmathview/gMathViewAux.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 class single_selection_math_view_signals :
  24   ([> `container | `widget | `base | `math_view] as 'b) Gtk.obj ->
  25   ((Gdome.element option -> unit) -> unit) ->
  26  object
  27   inherit GMathView.math_view_signals
  28   method selection_changed : (Gdome.element_of_node option -> unit) -> unit
  29  end
  30
  31 class single_selection_math_view :
  32   Gtk_mathview.math_view Gtk.obj ->
  33   object
  34     inherit GMathView.math_view_skel
  35     method connect : single_selection_math_view_signals
  36     method get_selection : Gdome.element option
  37     method set_selection : Gdome.element option -> unit
  38     method action_toggle : Gdome.element -> bool
  39   end
  40
  41 val single_selection_math_view :
  42   ?adjustmenth:GData.adjustment ->
  43   ?adjustmentv:GData.adjustment ->
  44   ?font_size:int ->
  45   ?font_manager:[ `font_manager_gtk | `font_manager_t1] ->
  46   ?border_width:int ->
  47   ?width:int ->
  48   ?height:int ->
  49   ?packing:(GObj.widget -> unit) ->
  50   ?show:bool ->
  51   unit -> single_selection_math_view
  52
  53   (** EXPERIMENTAL STUFF from now on: use with care and at your own risk! *)
  54
  55 class multi_selection_math_view :
  56   Gtk_mathview.math_view Gtk.obj ->
  57   object
  58     inherit single_selection_math_view
  59     method remove_selection : Gdome.element -> unit
  60     method remove_selections : unit
  61     method add_selection : Gdome.element -> unit
  62     method get_selections : Gdome.element list
  63   end
  64
  65 val multi_selection_math_view :
  66   ?adjustmenth:GData.adjustment ->
  67   ?adjustmentv:GData.adjustment ->
  68   ?font_size:int ->
  69   ?font_manager:[ `font_manager_gtk | `font_manager_t1] ->
  70   ?border_width:int ->
  71   ?width:int ->
  72   ?height:int ->
  73   ?packing:(GObj.widget -> unit) ->
  74   ?show:bool ->
  75   unit -> multi_selection_math_view
  76
  77