helm/DEVEL/lablgtkmathview/gMathViewAux.mli

   1 (* Copyright (C) 2000-2003, Luca Padovani <luca.padovani@cs.unibo.it>,
   2  *                          Claudio Sacerdoti Coen <sacerdot@cs.unibo.it>.
   3  *
   4  * This file is part of lablgtkmathview, the Ocaml binding
   5  * for the GtkMathView widget.
   6  *
   7  * lablgtkmathview is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU General Public License
   9  * as published by the Free Software Foundation; either version 2
  10  * of the License, or (at your option) any later version.
  11  *
  12  * lablgtkmathview is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with lablgtkmathview; if not, write to the Free Software
  19  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  20  *
  21  * For details, send a mail to the author.
  22  *)
  23
  24 class single_selection_math_view_signals :
  25   ([> `gtk | `mathview_gmetadom | `widget] as 'b) Gtk.obj ->
  26   ((Gdome.element option -> unit) -> unit) ->
  27  object
  28   inherit GMathView.math_view_signals
  29   method selection_changed : (Gdome.element_of_node option -> unit) -> unit
  30  end
  31
  32 class single_selection_math_view :
  33   Gtk_mathview.math_view Gtk.obj ->
  34   object
  35     inherit GMathView.math_view_skel
  36     method connect : single_selection_math_view_signals
  37     method get_selection : Gdome.element option
  38     method set_selection : Gdome.element option -> unit
  39     method action_toggle : Gdome.element -> bool
  40   end
  41
  42 val single_selection_math_view :
  43   ?hadjustment:GData.adjustment ->
  44   ?vadjustment:GData.adjustment ->
  45   ?font_size:int ->
  46   ?log_verbosity: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   ?hadjustment:GData.adjustment ->
  67   ?vadjustment:GData.adjustment ->
  68   ?font_size:int ->
  69   ?log_verbosity:int ->
  70   ?width:int ->
  71   ?height:int ->
  72   ?packing:(GObj.widget -> unit) ->
  73   ?show:bool ->
  74   unit -> multi_selection_math_view
  75
  76