class TK_LISTBOX < $TK_WIDGET
****
a tk listbox with a vertical scrollbar


Flattened version is here

Ancestors
$TK_WIDGET



Public


Readable Attributes

Features
activate(index: INT)
**** make index the active element
clear_selection(i:INT)
**** Disselects the selection at `i'.
curselection: ARRAY{INT}
**** the indices of all currently selected elements
delete(first: INT)
delete(first, last: INT)
get(first: INT): STR
get(first, last: INT): ARRAY{STR}
index_active: INT
index_anchor: INT
index_at(x, y: FLT): INT
index_end: INT
insert(index: INT, s: ARRAY{STR})
**** Inserts all s's at index i see above for index functions
insert(index: INT, s: STR)
**** Inserts `s' at index `i' see above for index functions
is_selected(i:INT): BOOL
**** Returns true if the index `i' is selcted.
nearest(y:INT): INT
**** Returns the index number which is nearest to the `y' coordinate.
see(index: INT)
**** Makes element i visible (and scrolls if neccessary).
set_selection(i:INT)
**** Sets the selection to the `i'th element .
size: INT
**** Returns number of elements in the list box.

Iters
curselection!: INT
get!( once first,once last: INT): STR


Private

default_init(c: TK_LISTBOX_CFG)
index(s: STR): INT
const tk_widget_type: STR := "listbox";

The Sather Home Page