Merge remote-tracking branch 'andy128k/master'
[cl-gtk2.git] / gtk / gtk.cell-renderer.lisp
blob25dda526abfd2aa82eb287ab37f24b10706ce1a7
1 (in-package :gtk)
3 ; TODO: GtkCellEditable
5 ; TODO: GtkCellRenderer vtable
7 ; TODO: gtk_cell_renderer_get_size
9 ; TODO: gtk_cell_renderer_render
11 ; TODO: gtk_cell_renderer_activate
13 ; TODO: gtk_cell_renderer_start_editing
15 ; TODO: gtk_cell_renderer_stop_editing
17 (defcfun gtk-cell-renderer-get-fixed-size :void
18 (cell (g-object cell-renderer))
19 (width (:pointer :int))
20 (height (:pointer :int)))
22 (defun cell-renderer-get-fixed-size (cell)
23 (with-foreign-objects ((width :int) (height :int))
24 (gtk-cell-renderer-get-fixed-size cell width height)
25 (values (mem-ref width :int)
26 (mem-ref height :int))))
28 (export 'cell-renderer-get-fixed-size)
30 (defcfun (cell-renderer-set-fixed-size "gtk_cell_renderer_set_fixed_size") :void
31 (cell (g-object cell-renderer))
32 (width :int)
33 (height :int))
35 (export 'cell-renderer-set-fixed-size)
37 ; TODO: GtkCellRendererAccel
39 ; TODO: GtkCellRendererCombo
41 ; TODO: GtkCellRendererPixbuf
43 ; TODO: GtkCellRendererProgress
45 ; TODO: GtkCellRendererSpin
47 ; TODO: GtkCellRendererText
49 ; TODO: GtkCellRendererToggle
51 (defcfun (cell-renderer-text-set-fixed-height-from-font "gtk_cell_renderer_text_set_fixed_height_from_font") :void
52 (renderer (g-object cell-renderer-text))
53 (number-of-rows :int))
55 (export 'cell-renderer-text-set-fixed-height-from-font)