原创 visualfc
在LUA中进行GUI程序设计，可以选择的GUI库一般有wxLua和IupLua。wxLua具备典型的面向对象风格，功能相对强大。而IUP的LUA绑定则非常简洁易用。本文主要介绍IupLua。
IUPLUA目前稳定版本为2.7.1，最新版本为3.0beta1。
IUP项目主页为：http://sourceforge.net/projects/iup
在IupLua程序设计中，主要使用表来设计应用程序界面，表的键值则为GUI部件的属性，通过回调函数完成窗口消息的获取。下面给出一个完整的例子。
1
require "iuplua"
2
3text_location = iup.text{expand="HORIZONTAL", id="text_location"}
4btn_browse = iup.button{title="Browse", rastersize="x22",id="btn_browse"}
5dlg = iup.dialog
6{
7 iup.vbox
8 {
9 iup.label{title="Location:"},
10 iup.hbox
11 {
12 text_location,
13 btn_browse
14 ; margin="0x0"
15 },
16 iup.label{title="Text:"},
17 iup.multiline{expand="YES"},
18 }
19 ;title="iuplua sample", size="200x100", margin="10x10"
20}
21
22function btn_browse:action()
23 local dlg = iup.filedlg{dialogtype="DIR"}
24 dlg:popup()
25 if dlg.status == "0" then
26 text_location.value = dlg.value
27 end
28end
29
30dlg:show()
31
32iup.MainLoop()
33
上面的例子通过hbox和vbox进行界面的自动调整。程序很简单，如下图所示：
其中22行的fuctnion btn_browse:action即为回调函数，相比wxLua的Bind方法，这种用法更为简洁。
另外我们也可以看到在此程序中我们需要对text_location和btn_browse进行声明，而后在dialog的box中进行引用，我们也可以使用类似HTML控制中的ID值来进行设计而无需事先声明。如下：
1require "iuplua"
2require "iupid"
3
4dlg = iup.dialog
5{
6 iup.vbox
7 {
8 iup.label{title="Location:", id="ok"},
9 iup.hbox
10 {
11 iup.text{expand="HORIZONTAL", id="text_location"},
12 iup.button{title="Browse", rastersize="x22", id="btn_browse"}
13 ; margin="0x0"
14 },
15 iup.label{title="Text:"},
16 iup.multiline{expand="YES"},
17 }
18 ;title="iuplua sample", size="200x100", margin="10x10"
19}
20
21function btn_browse:action()
22 local dlg = iup.filedlg{dialogtype="DIR"}
23 dlg:popup()
24 if dlg.status == "0" then
25 text_location.value = dlg.value
26 end
27end
28
29dlg:show()
30
31iup.MainLoop()
32
如上所示，使用id值的方式GUI设计代码显得更为一致。那么如何做到这一点呢，在LUA中实现起来很简单，使用upvalue就可以做到。
1function iup_id(func)
2 return function(o)
3 if o.id ~= nil then
4 _G[o.id] = func(o)
5 return _G[o.id]
6 else
7 return func(o)
8 end
9 end
10end
然后对所需部件进行声明。
--standard
iup.button = iup_id(iup.button)
iup.text = iup_id(iup.text)
这样就可以使用id的方式来直接引用GUI部件了，另外需要注意的是各个GUI部件要取不同的id值。
下面给出了我写的iupcd.lua的完整源代码以供参考。
require "iuplua"
require "iupluacontrols"
function iup_id(func)
return function(o)
if o.id ~= nil then
_G[o.id] = func(o)
return _G[o.id]
elseif o.ID ~= nil then
_G[o.ID] = func(o)
return _G[o.ID]
else
return func(o)
end
end
end
--standard
iup.button = iup_id(iup.button)
iup.canvas = iup_id(iup.canvas)
iup.frame = iup_id(iup.frame)
iup.multiline = iup_id(iup.multiline)
iup.progressbar = iup_id(iup.progressbar)
iup.spin = iup_id(iup.spin)
iup.tabs = iup_id(iup.tabs)
iup.val = iup_id(iup.val)
iup.toggle = iup_id(iup.toggle)
iup.radio = iup_id(iup.radio)
iup.text = iup_id(iup.text)
iup.list = iup_id(iup.list)
iup.label = iup_id(iup.label)
--dialog
iup.dialog = iup_id(iup.dialog)
iup.filedlg = iup_id(iup.filedlg)
iup.messagedlg = iup_id(iup.messagedlg)
iup.colordlg = iup_id(iup.colordlg)
iup.fontdlg = iup_id(iup.fontdlg)
iup.alarm = iup_id(iup.alarm)
iup.getfile = iup_id(iup.getfile)
iup.gettext = iup_id(iup.gettext)
iup.listdialog = iup_id(iup.listdialog)
iup.message = iup_id(iup.message)
iup.scanf = iup_id(iup.scanf)
iup.getcolor = iup_id(iup.getcolor)
iup.getparam = iup_id(iup.getparam)
--layout
iup.fill = iup_id(iup.fill)
iup.vbox = iup_id(iup.vbox)
iup.hbox = iup_id(iup.hbox)
iup.zbox = iup_id(iup.zbox)
iup.cbox = iup_id(iup.cbox)
iup.sbox = iup_id(iup.cbox)
--additional
iup.cells = iup_id(iup.cells)
iup.colorbar = iup_id(iup.colorbar)
iup.colorbrowser = iup_id(iup.colorbrowser)
iup.dial = iup_id(iup.dial)
iup.gauge = iup_id(iup.gauge)
iup.tabs = iup_id(iup.tabs)
iup.matrix = iup_id(iup.matrix)
iup.tree = iup_id(iup.tree)
iup.glcanvas = iup_id(iup.glcanvas)
iup.pplot = iup_id(iup.pplot)
iup.olecontrol = iup_id(iup.olecontrol)
iup.speech = iup_id(iup.speech)