l4/pkg/ocaml/contrib/otherlibs/labltk/browser/jg_text.mli

   1 (*************************************************************************)
   2 (*                                                                       *)
   3 (*                Objective Caml LablTk library                          *)
   4 (*                                                                       *)
   5 (*            Jacques Garrigue, Kyoto University RIMS                    *)
   6 (*                                                                       *)
   7 (*   Copyright 1999 Institut National de Recherche en Informatique et    *)
   8 (*   en Automatique and Kyoto University.  All rights reserved.          *)
   9 (*   This file is distributed under the terms of the GNU Library         *)
  10 (*   General Public License, with the special exception on linking       *)
  11 (*   described in file ../../../LICENSE.                                 *)
  12 (*                                                                       *)
  13 (*************************************************************************)
  14
  15 (* $Id: jg_text.mli 4144 2001-12-07 13:41:02Z xleroy $ *)
  16
  17 open Widget
  18
  19 val get_all : text widget -> string
  20 val tag_and_see :
  21   text widget ->
  22   tag:Tk.textTag -> start:Tk.textIndex -> stop:Tk.textIndex -> unit
  23 val output : text widget -> buf:string -> pos:int -> len:int -> unit
  24 val add_scrollbar : text widget -> scrollbar widget
  25 val create_with_scrollbar :
  26   'a widget -> frame widget * text widget * scrollbar widget
  27 val goto_tag : text widget -> tag:string -> unit
  28 val search_string : text widget -> unit