Library
Module
Module type
Parameter
Class
Class type
General purpose GUI (Graphical user interface) library for Ocaml.
Bogue is a lightweight and fast GUI for developing desktop applications, games, or for easy debugging of non-GUI programs.
Bogue is entirely written in ocaml except for the hardware accelerated graphics library SDL2.
For a quick start, see Bogue's general principles, and the minimal example.
The main modules are
Main
(creating, running, and quitting your app),Layout
(arranging widgets to form sophisticated interfaces like table, menus, etc.) andWidget
(the building blocks, like labels, buttons, etc.).indexlist
The only thing that open Bogue
does is to bring these modules into your namespace. The have quite common names, so beware of conflict. In case of doubt, don't open Bogue
, and access to the modules by using the Bogue
prefix, for instance Bogue.Widget.label
. The Widget
and Layout
modules are probably the ones that you will find yourself using the most, so it's a good idea to alias them:
module W = Bogue.Widget
module L = Bogue.Layout
module Theme : sig ... end
Theming variables
module Utils : sig ... end
Utilities
module Time : sig ... end
Time in msec
module Var : sig ... end
Global variables with mutex
module Timeout : sig ... end
Delayed actions
module Trigger : sig ... end
Dealing with events
module Mixer : sig ... end
Basic audio mixer for sound effects
module Sync : sig ... end
Synchronized execution queue.
module Draw : sig ... end
Low-level graphics and colors
module Mouse : sig ... end
Mouse and touchscreen information
module Tvar : sig ... end
Transform variables
module Avar : sig ... end
Animated variables
module Selection : sig ... end
Unions of ranges of integers
Widgets are building blocks of the GUI. They also receive all events (mouse focus, etc.) and contain the intelligence of your GUI, through connections (or callbacks, see Widget.connection
). However, in order to be displayed, they need to be packed into layouts (Layout.t
).
The main module for dealing with widgets is Widget
.
module Image : sig ... end
Image widget
module Style : sig ... end
Line and box styles
module Label : sig ... end
One-line text widget
module Button : sig ... end
Button widget with text or icon
module Slider : sig ... end
Slider widget
module Check : sig ... end
Checkbox widget
module Text_display : sig ... end
Multi-line text display widget
module Text_input : sig ... end
One-line text-input widget
module Box : sig ... end
Box widget
module Sdl_area : sig ... end
SDL Area widget
module Widget : sig ... end
Creating widgets and giving life to them
module Update : sig ... end
Updating widgets
Layouts are rectangular graphical placeholders, in which you should pack all your widgets in order to display your GUI. Sophisticated gadgets are usually obtained by combining several layouts together.
module Layout : sig ... end
The main, all-purpose graphics container
module Space : sig ... end
Adjust various spacings and sizes of layouts
module Print : sig ... end
Convert Bogue objects to strings for debugging
module Snapshot : sig ... end
Create an image from a Layout
module Long_list : sig ... end
Handle large lists by not displaying all elements at once
module Tabs : sig ... end
Switch between layouts using Tabs
module Popup : sig ... end
Put layouts on top of others
module Menu : sig ... end
Various types of menus
module Select : sig ... end
Drop-down select list
module Radiolist : sig ... end
Check list with a single choice
module Table : sig ... end
Tables with sortable columns and selectable rows
module Window : sig ... end
Because a GUI continuously waits for user interaction, everything has to run inside a loop. You start the loop with run
, and this is usually the last command of your Bogue code.
module Main : sig ... end
Control the workflow of the GUI mainloop
Here is a minimal example with a label and a check box.
open Bogue
module W = Widget
module L = Layout
let main () =
let b = W.check_box () in
let l = W.label "Hello world" in
let layout = L.flat_of_w [b;l] in
let board = Bogue.make [] [layout] in
Bogue.run board;;
let () = main ();
Bogue.quit ()
This can be compiled to bytecode with
ocamlfind ocamlc -package bogue -linkpkg -o minimal -thread minimal.ml
and to native code with
ocamlfind ocamlopt -package bogue -linkpkg -o minimal -thread minimal.ml
Then execute the compiled code:
./minimal
A window should open which should look like this:
You may also evaluate this code in a Toplevel! (for instance utop
, or in an emacs
session...). Just insert
#thread;; #require "bogue";;
at the top, then paste the example code above, and add ;;
at the end.