ltk

*mb-icons*

Variable

icon names valid for message-box function

*tk*

Variable

dummy widget to access the tk root object

*wish*

Variable

The current connection to an inferior wish.

add-pane

Generic Function: (add-pane window widget &rest options)

add-separator

Function: (add-separator menu)

after

Function: (after time fun)

after

after-cancel

Function: (after-cancel id)

cancels a call scheduled with after or after-idle by its id

after-idle

Function: (after-idle fun)

call fun when tk becomes idle, returns the after event id, which can be passed to after-cancel

append-newline

Function: (append-newline text)

append-text

Generic Function: (append-text txt text &rest tags)

ask-okcancel

Function: (ask-okcancel message &key (title ) parent)

ask-yesno

Function: (ask-yesno message &key (title ) parent)

bbox

Generic Function: (bbox item)

bell

Function: (bell)

bind

Generic Function: (bind w event fun &key append exclusive)

button

Class

Direct Slots

widget-class-name

calc-scroll-region

Generic Function: (calc-scroll-region canvas)

call-with-ltk

Function: (call-with-ltk thunk &rest keys &key (debug 2) stream serve-event
           remotep &allow-other-keys)

Functional interface to with-ltk, provided to allow the user the build similar macros.

canvas

Generic Function: (canvas w)

Class

Direct Slots

widget-class-name

canvas-arc

Class

canvas-bbox

Function: (canvas-bbox canvas handle)

canvas-image

Class

canvas-item

Class

Direct Slots

canvas

Initargs: :CANVAS
Readers: CANVAS
Writers: (SETF CANVAS)

handle

Initargs: :HANDLE
Readers: HANDLE
Writers: (SETF HANDLE)

canvas-line

Class

canvas-oval

Class

canvas-polygon

Class

canvas-rectangle

Class

canvas-text

Class

canvas-window

Class

canvasx

Generic Function: (canvasx canvas screenx)

canvasy

Generic Function: (canvasy canvas screeny)

cget

Generic Function: (cget widget option)

check-button

Class

Direct Slots

widget-class-name

children

Generic Function: (children tree item)

choose-color

Function: (choose-color &key parent title initialcolor)

choose-directory

Function: (choose-directory &key
           (initialdir (namestring *default-pathname-defaults*)) parent title
           mustexist)

clear

Generic Function: (clear widget)

clear-text

Generic Function: (clear-text txt)

clipboard-append

Function: (clipboard-append txt)

clipboard-clear

Function: (clipboard-clear)

clipboard-get

Function: (clipboard-get)

column-configure

Generic Function: (column-configure tree column option value &rest rest)

column-values

Generic Function: (column-values object)

combobox

Class

Direct Slots

widget-class-name

command

Generic Function: (command widget)

configure

Generic Function: (configure widget option value &rest others)

coords

Generic Function: (coords item)

create-arc

Function: (create-arc canvas x0 y0 x1 y1 &key (start 0) (extent 180)
           (style pieslice))

create-bitmap

Function: (create-bitmap canvas x y &key (bitmap NIL))

create-image

Function: (create-image canvas x y &key image)

create-items

Function: (create-items canvas items)

Create canvas items according to the item specs without returning ltk objects for them. This means, they cannot be accessed in any way, but also the creation does not flush the ltk output buffer.

create-line

Function: (create-line canvas coords)

create-line*

Function: (create-line* canvas &rest coords)

create-menu2

Function: (create-menu2 menutree)

create-oval

Function: (create-oval canvas x0 y0 x1 y1)

create-polygon

Function: (create-polygon canvas coords)

create-rectangle

Function: (create-rectangle canvas x0 y0 x1 y1)

create-text

Function: (create-text canvas x y text)

create-window

Function: (create-window canvas x y widget &key (anchor :nw))

cursor-index

Generic Function: (cursor-index widget)

returns the cursor index in the widget

defargs

Macro: (defargs class parents &rest defs)

defwidget

Macro: (defwidget namespec parent slots widgetspecs &rest body)

deiconify

Generic Function: (deiconify toplevel)

destroy

Function: (destroy widget)

dictionary-plist

Function: (dictionary-plist string)

return a plist representing the TCL dictionary

do-execute

Function: (do-execute program args &optional (wt NIL))

execute program with args a list containing the arguments passed to the program if wt is non-nil, the function will wait for the execution of the program to return. returns a two way stream connected to stdin/stdout of the program

do-msg

Function: (do-msg message &key (title ) parent)

entry

Generic Function: (entry object)

Class

Direct Slots

widget-class-name

entry-select

Function: (entry-select e from to)

event

Structure

event-char

Function: (event-char instance)

event-height

Function: (event-height instance)

event-keycode

Function: (event-keycode instance)

event-mouse-button

Function: (event-mouse-button instance)

event-root-x

Function: (event-root-x instance)

event-root-y

Function: (event-root-y instance)

event-width

Function: (event-width instance)

event-x

Function: (event-x instance)

event-y

Function: (event-y instance)

exit-wish

Function: (exit-wish)

focus

Function: (focus widget)

font-configure

Function: (font-configure name &key family size weight slant underline
           overstrike)

font-create

Function: (font-create name &key family size weight slant underline overstrike)

font-delete

Function: (font-delete &rest names)

font-families

Function: (font-families)

font-metrics

Function: (font-metrics font)

force-focus

Function: (force-focus widget)

forget-pane

Generic Function: (forget-pane window widget)

format-wish

Function: (format-wish control &rest args)

format 'args using 'control as control string to wish

frame

Class

Direct Slots

widget-class-name

geometry

Generic Function: (geometry toplevel)

get-open-file

Function: (get-open-file &key (filetypes (quote ((all files *))))
           (initialdir (namestring *default-pathname-defaults*)) multiple
           parent title)

get-save-file

Function: (get-save-file &key (filetypes (quote ((all files *)))))

grab

Generic Function: (grab toplevel &key global)

grab-release

Generic Function: (grab-release toplevel)

grid

Generic Function: (grid widget r c &key columnspan ipadx ipady padx pady ...)

grid-columnconfigure

Generic Function: (grid-columnconfigure widget c o v)

grid-configure

Generic Function: (grid-configure widget o v)

grid-forget

Generic Function: (grid-forget widget)

grid-rowconfigure

Generic Function: (grid-rowconfigure widget r o v)

handle

Generic Function: (handle object)

hscroll

Generic Function: (hscroll object)

iconify

Generic Function: (iconify toplevel)

iconwindow

Function: (iconwindow tl wid)

image

Generic Function: (image object)

image-load

Generic Function: (image-load p filename)

image-setpixel

Function: (image-setpixel image data x y &optional x2 y2)

input-box

Function: (input-box prompt &key (title input) default)

insert-object

Generic Function: (insert-object txt object)

interior

Generic Function: (interior object)

itembind

Generic Function: (itembind canvas w event fun)

itemconfigure

Generic Function: (itemconfigure widget item option value)

itemdelete

Generic Function: (itemdelete canvas item)

itemlower

Generic Function: (itemlower w i &optional below)

itemmove

Generic Function: (itemmove canvas item dx dy)

itemraise

Generic Function: (itemraise w i &optional above)

items

Generic Function: (items object)

label

Class

Direct Slots

widget-class-name

labelframe

Class

Direct Slots

widget-class-name

length

Function: (length sequence)

Return an integer that is the length of sequence.

listbox

Generic Function: (listbox object)

Class

Direct Slots

widget-class-name

listbox-append

Generic Function: (listbox-append l vals)

listbox-clear

Generic Function: (listbox-clear l)

listbox-configure

Generic Function: (listbox-configure l i &rest options)

listbox-delete

Generic Function: (listbox-delete l start &optional end)

listbox-get-selection

Generic Function: (listbox-get-selection l)

listbox-insert

Generic Function: (listbox-insert l index values)

listbox-nearest

Generic Function: (listbox-nearest listbox y)

listbox-select

Generic Function: (listbox-select l val)

load-text

Generic Function: (load-text txt filename)

lower

Generic Function: (lower widget &optional other)

ltktest

Function: (ltktest)

mainloop

Function: (mainloop &key serve-event)

make-canvas

Function: (make-canvas master &key (width NIL) (height NIL) (xscroll NIL)
           (yscroll NIL))

make-image

Function: (make-image)

make-items

Function: (make-items canvas items)

Create canvas items according to the item specs and return a list of canvas-items.

make-line

Function: (make-line canvas coords)

make-ltk-connection

Function: (make-ltk-connection &key remotep)

Create a new LTK-CONNECTION object. This represents a connection to a specific wish. You can maintain connections to several distinct wish processes by binding WISH to the one you desire to communicate with, and using LTK functions within that dynamic scope.

make-menu

Function: (make-menu menu text &key underline name (tearoff 0))

make-menubar

Function: (make-menubar &optional (master NIL))

make-menubutton

Function: (make-menubutton menu text command &key underline accelerator state)

make-oval

Function: (make-oval canvas x0 y0 x1 y1)

make-polygon

Function: (make-polygon canvas coords)

make-rectangle

Function: (make-rectangle canvas x0 y0 x1 y1)

make-scrollbar

Function: (make-scrollbar master &key (orientation vertical))

make-scrolled-canvas

Function: (make-scrolled-canvas master)

make-text

Function: (make-text master &key (width NIL) (height NIL))

make-toplevel

Function: (make-toplevel master)

master

Generic Function: (master object)

maxsize

Generic Function: (maxsize widget x y)

Class

Direct Slots

text

Initargs: :TEXT
Readers: TEXT
Writers: (SETF TEXT)

Generic Function: (menu-delete menu index &optional end)

Class

Class

Class

Direct Slots

command

Initargs: :COMMAND
Readers: COMMAND
Writers: (SETF COMMAND)

Class

Direct Slots

command

Initargs: :COMMAND
Readers: COMMAND
Writers: (SETF COMMAND)

message

Generic Function: (message condition)

Class

Direct Slots

widget-class-name

message-box

Function: (message-box message title type icon &key parent)

minsize

Generic Function: (minsize widget x y)

move

Generic Function: (move item dx dy)

move-all

Function: (move-all canvas dx dy)

normalize

Generic Function: (normalize toplevel)

notebook

Class

Direct Slots

widget-class-name

notebook-add

Generic Function: (notebook-add nb widget &rest options)

notebook-enable-traversal

Generic Function: (notebook-enable-traversal nb)

notebook-events

Function: (notebook-events)

notebook-forget

Generic Function: (notebook-forget nb widget)

notebook-hide

Generic Function: (notebook-hide nb tab)

notebook-identify

Generic Function: (notebook-identify nb x y)

notebook-index

Generic Function: (notebook-index nb tab)

notebook-select

Generic Function: (notebook-select nb tab)

notebook-tab

Generic Function: (notebook-tab nb widget option value)

on-close

Generic Function: (on-close toplevel fun)

on-focus

Generic Function: (on-focus toplevel fun)

pack

Generic Function: (pack w &key side fill expand after before padx pady ...)

pack-forget

Generic Function: (pack-forget widget)

pack-forget-all

Generic Function: (pack-forget-all widget)

pack-propagate

Generic Function: (pack-propagate widget flag)

pane-configure

Generic Function: (pane-configure l i &rest options)

paned-window

Class

Direct Slots

widget-class-name

phase

Function: (phase number)

Return the angle part of the polar representation of a complex number. For complex numbers, this is (atan (imagpart number) (realpart number)). For non-complex positive numbers, this is 0. For non-complex negative numbers this is PI.

photo-image

Class

place

Generic Function: (place widget x y &key anchor bordermode width height in ...)

place-forget

Generic Function: (place-forget widget)

Generic Function: (popup menu x y)

postscript

Function: (postscript canvas filename &key rotate pagewidth pageheight)

process-events

Function: (process-events)

A function to temporarliy yield control to wish so that pending events can be processed, useful in long loops or loops that depend on tk input to terminate

progressbar

Class

Direct Slots

widget-class-name

radio-button

Class

Direct Slots

widget-class-name

raise

Generic Function: (raise widget &optional above)

read-event

Function: (read-event &key (blocking t) (no-event-value NIL))

read the next event from wish, return the event or nil, if there is no event to read and blocking is set to nil

reset-scroll

Generic Function: (reset-scroll sf)

resizable

Generic Function: (resizable widget x y)

sash-coord

Generic Function: (sash-coord window index)

sash-place

Generic Function: (sash-place window index pos)

save-text

Generic Function: (save-text txt filename)

scale

Generic Function: (scale canvas factor &optional factory)

Class

Direct Slots

widget-class-name

screen-height

Function: (screen-height &optional (w NIL))

give the height of the screen in pixels (if w is given, of the screen the widget w is displayed on)

screen-height-mm

Function: (screen-height-mm &optional (w NIL))

give the height of the screen in mm (if w is given, of the screen the widget w is displayed on)

screen-mouse

Function: (screen-mouse &optional (w NIL))

give the position of the mouse on screen as (x y) (if w is given, of the screen the widget w is displayed on)

screen-mouse-x

Function: (screen-mouse-x &optional (w NIL))

give x position of the mouse on screen (if w is given, of the screen the widget w is displayed on)

screen-mouse-y

Function: (screen-mouse-y &optional (w NIL))

give y position of the mouse on screen (if w is given, of the screen the widget w is displayed on)

screen-width

Function: (screen-width &optional (w NIL))

give the width of the screen in pixels (if w is given, of the screen the widget w is displayed on)

screen-width-mm

Function: (screen-width-mm &optional (w NIL))

give the width of the screen in mm (if w is given, of the screen the widget w is displayed on)

scroll-to-top

Generic Function: (scroll-to-top sf)

scrollbar

Class

Direct Slots

widget-class-name

scrolled-canvas

Class

Direct Slots

canvas

hscroll

vscroll

scrolled-frame

Class

Direct Slots

canvas

Initargs: :CANVAS
Readers: CANVAS
Writers: (SETF CANVAS)

hscroll

vscroll

scrolled-listbox

Class

Direct Slots

listbox

hscroll

vscroll

scrolled-text

Class

Direct Slots

textbox

hscroll

vscroll

scrolled-treeview

Class

Direct Slots

treeview

hscroll

vscroll

scrollregion

Generic Function: (scrollregion canvas x0 y0 x1 y1)

search-all-text

Generic Function: (search-all-text text pattern)

search-next-text

Generic Function: (search-next-text text pattern)

see

Generic Function: (see txt pos)

send-lazy

Macro: (send-lazy &rest code)

send-wish

Function: (send-wish text)

separator

Class

Direct Slots

widget-class-name

set-coords

Generic Function: (set-coords canvas item coords)

set-coords*

Generic Function: (set-coords* canvas item &rest coords)

set-focus-next

Function: (set-focus-next widget next)

set-geometry

Generic Function: (set-geometry toplevel width height x y)

set-geometry-wh

Generic Function: (set-geometry-wh toplevel width height)

set-geometry-xy

Generic Function: (set-geometry-xy toplevel x y)

set-wm-overrideredirect

Generic Function: (set-wm-overrideredirect widget value)

sizegrip

Class

Direct Slots

widget-class-name

spinbox

Class

Direct Slots

widget-class-name

start-wish

Function: (start-wish &rest keys &key debugger-class remotep stream debug-tcl)

tag-bind

Generic Function: (tag-bind txt tag event fun)

tag-configure

Generic Function: (tag-configure txt tag option value &rest others)

tagbind

Generic Function: (tagbind canvas tag event fun &key exclusive)

text

Generic Function: (text widget)

reads the value of the textvariable associated with the widget

Class

Direct Slots

widget-class-name

textbox

Generic Function: (textbox object)

title

Generic Function: (title object)

tkobject

Class

Base class for every Tk object

toplevel

Class

Direct Slots

widget-class-name

title

Initargs: :TITLE
Readers: TITLE
Writers: (SETF TITLE)

treeitem

Class

Direct Slots

text

Initargs: :TEXT
Readers: TEXT
Writers: (SETF TEXT)

image

Initargs: :IMAGE
Readers: IMAGE
Writers: (SETF IMAGE)

master

Initargs: :MASTER
Readers: MASTER
Writers: (SETF MASTER)

column-values

Initargs: :COLUMN-VALUES
Readers: COLUMN-VALUES
Writers: (SETF COLUMN-VALUES)

treeview

Generic Function: (treeview object)

Class

Direct Slots

widget-class-name

items

Initargs: :ITEMS
Readers: ITEMS
Writers: (SETF ITEMS)

treeview-column

Function: (treeview-column tree column &rest options)

Query or modify the options for the specified column.

treeview-delete

Generic Function: (treeview-delete tree items)

treeview-exists

Generic Function: (treeview-exists tree item)

treeview-focus

Generic Function: (treeview-focus tree)

treeview-get-selection

Generic Function: (treeview-get-selection w)

treeview-heading

Function: (treeview-heading tree column &rest options &key command
           &allow-other-keys &aux (path (widget-path tree)))

Query or modify the heading options for the specified column.

treeview-identify-item

Generic Function: (treeview-identify-item tree x y)

treeview-insert

Function: (treeview-insert tree &rest options &key (parent {}) (index end)
           (id (create-name)) &allow-other-keys)

Creates a new item. Returns its id. See also the treeitem class.

treeview-item

Function: (treeview-item tree item &rest options)

Query or modify the options for the specified item.

treeview-move

Function: (treeview-move tree item &optional parent index)

Moves item to position index in parent's list of children.

treeview-set-selection

Generic Function: (treeview-set-selection w items)

value

Generic Function: (value widget)

reads the value of the variable associated with the widget

vscroll

Generic Function: (vscroll object)

widget

Class

Base class for all widget types

Direct Slots

master

Initargs: :MASTER
Readers: MASTER
Writers: (SETF MASTER)

widget-path

Initargs: :PATH
Readers: :%WIDGET-PATH
Writers: (SETF :%WIDGET-PATH)

widget-class-name

Generic Function: (widget-class-name object)

widget-path

Generic Function: (widget-path widget)

window-height

Function: (window-height tl)

give the height of the toplevel in pixels

window-id

Function: (window-id tl)

get the window id of the toplevel

window-transient

Function: (window-transient tl win)

set the transient property of tl to be transient to win or nil

window-width

Function: (window-width tl)

give the width of the toplevel in pixels

window-x

Function: (window-x tl)

give the x position of the toplevel in pixels

window-y

Function: (window-y tl)

give the y position of the toplevel in pixels

wish-stream

Function: (wish-stream instance)

wish-variable

Generic Function: (wish-variable name wish)

wish-variables

Function: (wish-variables instance)

with-atomic

Macro: (with-atomic &rest code)

with-hourglass

Macro: (with-hourglass widgets &rest body)

with-ltk

Macro: (with-ltk
        (&rest keys &key (debug 2) stream serve-event &allow-other-keys) &body
        body)

Create a new Ltk connection, evaluate body, and enter the main loop.

:DEBUG indicates the level of debugging support to provide. It can be a number from 0 to 3, or one of the corresponding keywords: :minimum, :deploy, :develop, or :maximum.

If :SERVE-EVENT is non-NIL, Ltk will use serve-event handlers instead of a blocking main loop. This is only supported on SBCL and CMUCL. Note that using serve-event means that with-ltk will return immediately after evaluating body.

If :STREAM is non-NIL, it should be a two-way stream connected to a running wish. This will be used instead of running a new wish.

with-modal-toplevel

Macro: (with-modal-toplevel (var &rest toplevel-initargs) &body body)

with-widgets

Macro: (with-widgets layout &rest body)

withdraw

Generic Function: (withdraw toplevel)

wm-forget

Generic Function: (wm-forget widget)

wm-manage

Generic Function: (wm-manage widget)

wm-state

Generic Function: (wm-state widget)

wm-title

Generic Function: (wm-title widget title)