]> matita.cs.unibo.it Git - helm.git/blob - helm/DEVEL/lablgtkmathview/gMathViewAux.mli
added boxml namespace
[helm.git] / 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