![]() ![]() ![]() |
![]() |
Usage:
button(Handle, Parent, Button_func(_), Title, X, Y,
Width, Height)
Creates a button control.
Handle | handle. Use _ if you don't need it. |
Parent | handle of the parent window. Use _ for default. |
button_func | predicate which will receive button messages |
Title | the window title |
X,Y | coordinates of upper left corner |
Width, Height | size of the window |
Example:
?-window( _, _, win_func(_), "Button demo", 100, 100, 200, 200).
win_func(init):-
button(_,_,bfunc(_),"button",10,10,50,50).
bfunc(press):-message("Message", "Button pressed.", i).
See also: