File: gladedemo.lua

package info (click to toggle)
lua-gtk 0.9%2B20100528-2
  • links: PTS, VCS
  • area: main
  • in suites: squeeze
  • size: 2,176 kB
  • ctags: 1,934
  • sloc: ansic: 9,571; sh: 373; makefile: 241
file content (36 lines) | stat: -rwxr-xr-x 797 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
#! /usr/bin/env lua
-- vim:sw=4:sts=4
--
-- Simple Example for the Glade library.  Note that you should use GtkBuilder
-- instead.

require "gtk"
require "gtk.glade"

-- Signal handlers for Menu
function on_quit1_activate()
    gtk.main_quit()
end

function main()
    local tree, widgets, fname

    fname = arg[1] or string.gsub(arg[0], "%.lua", ".glade")
    tree = gtk.glade.read(fname)
    widgets = gtk.glade.create(tree, "window1")
    gtk.main()
end

main()

-- Show widgets that are still referenced.  The list should be empty, at
-- least after the garbage collection has run.

print(collectgarbage("count"), "kB")
collectgarbage("collect")
print(collectgarbage("count"), "kB")

-- print "** WIDGETS **"
-- for k, v in pairs(gtk.widgets) do print(v) end
-- print "** END OF WIDGETS **"