在prolog xpce中显示单选按钮

时间:2014-06-05 15:21:21

标签: prolog swi-prolog xpce

我在XPCE prolog中创建了一个带有单选按钮的菜单,但是我的单选按钮显示在同一行,我希望每个按钮都在一个单独的行上。

我的代码如下:

new(D, dialog('title')), 
send(D, size, size(500,500)), 
send(D, append,new(Op, menu(options, marked))), 
send(Op, append, option1), send(Op,append, option2), 
send(Op, append, option2), 
send(Op, size,size(300,300)), 
send(D, display, Op, point(100, 40)), 
send(D,append(new(B1,button(ok, message(D, return, Op?selection))))), 
send(D,display, B1, point(100, 100)), 
send(D, append(button(cancel,message(D, return, @nil)))), 
send(D, default_button(ok)), get(D,confirm, Rval), 
free(D).

提前致谢

1 个答案:

答案 0 :(得分:2)

添加以下行:

send(Op, layout, orientation:= vertical),