nehe: use border around buttons.
parent
795150333a
commit
e49ec97043
|
@ -1,5 +1,7 @@
|
||||||
USING: ui.gadgets.buttons ui.gadgets.packs ui.gadgets ui
|
USING: accessors kernel nehe.2 nehe.3 nehe.4 nehe.5 ui
|
||||||
nehe.2 nehe.3 nehe.4 nehe.5 kernel accessors ;
|
ui.gadgets ui.gadgets.borders ui.gadgets.buttons
|
||||||
|
ui.gadgets.packs ;
|
||||||
|
|
||||||
IN: nehe
|
IN: nehe
|
||||||
|
|
||||||
MAIN-WINDOW: nehe-window { { title "Nehe Examples" } }
|
MAIN-WINDOW: nehe-window { { title "Nehe Examples" } }
|
||||||
|
@ -8,6 +10,6 @@ MAIN-WINDOW: nehe-window { { title "Nehe Examples" } }
|
||||||
"Nehe 3" [ drop run3 ] <border-button> add-gadget
|
"Nehe 3" [ drop run3 ] <border-button> add-gadget
|
||||||
"Nehe 4" [ drop run4 ] <border-button> add-gadget
|
"Nehe 4" [ drop run4 ] <border-button> add-gadget
|
||||||
"Nehe 5" [ drop run5 ] <border-button> add-gadget
|
"Nehe 5" [ drop run5 ] <border-button> add-gadget
|
||||||
>>gadgets ;
|
{ 2 2 } <border> >>gadgets ;
|
||||||
|
|
||||||
MAIN: nehe-window
|
MAIN: nehe-window
|
||||||
|
|
Loading…
Reference in New Issue