]> rtime.felk.cvut.cz Git - l4.git/blob - l4/pkg/ocaml/ocaml/contrib/otherlibs/labltk/frx/frx_listbox.mli
Update
[l4.git] / l4 / pkg / ocaml / ocaml / contrib / otherlibs / labltk / frx / frx_listbox.mli
1 (***********************************************************************)
2 (*                                                                     *)
3 (*                 MLTk, Tcl/Tk interface of Objective Caml            *)
4 (*                                                                     *)
5 (*    Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis    *)
6 (*               projet Cristal, INRIA Rocquencourt                    *)
7 (*            Jacques Garrigue, Kyoto University RIMS                  *)
8 (*                                                                     *)
9 (*  Copyright 2002 Institut National de Recherche en Informatique et   *)
10 (*  en Automatique and Kyoto University.  All rights reserved.         *)
11 (*  This file is distributed under the terms of the GNU Library        *)
12 (*  General Public License, with the special exception on linking      *)
13 (*  described in file LICENSE found in the Objective Caml source tree. *)
14 (*                                                                     *)
15 (***********************************************************************)
16 open Camltk
17 val scroll_link : Widget.widget -> Widget.widget -> unit
18   (* [scroll_link scrollbar listbox] links [scrollbar] and [listbox]
19      as expected.
20    *)
21
22 val add_completion : Widget.widget -> (eventInfo -> unit) -> unit
23   (* [add_completion listbox action] adds Macintosh like electric navigation
24      in the listbox when characters are typed in.
25      [action] is invoked if Return is pressed
26    *)
27
28 val new_scrollable_listbox :
29   Widget.widget -> options list -> Widget.widget * Widget.widget
30   (* [new_scrollable_listbox parent options] makes a scrollable listbox and
31      returns (frame, listbox)
32    *)