Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

[REBOL] Help with Panes

From: martin::middleton::speechworks::com at: 21-Dec-2001 17:46

OK, I'm sure somebody has already asked this question before, but it's beyond my simple mind. I'm trying to create a GUI where I click on a button and it opens a pane. Within that pane is another button, that opens up another pane. When I click on the "Done" button I want to get back to the same state I was in at the beginning, but I can't make it work. Any help is GREATLY appreciated! REBOL [Title: "Pain with Panes"] main: layout [ vh2 "Automated Software Manufacturing Build System" guide button "Setup Phase" [panels/pane: init_panel show panels] button "Source Phase" [panels/pane: source_panel show panels] button "Build Phase" [panels/pane: build_panel show panels] button "Package Phase" [panels/pane: package_panel show panels] button "Post Phase" [panels/pane: post_panel show panels] button "Quit" [quit] return guide box 2x300 maroon return panels: box 400x300 coal ] ; Initialization Functionality init_panel: layout [ origin 0x0 vh3 "Setup the Environment" guide button "Add" [init_panel/pane: init_add_panel show init_panel] button "Remove" [init_panel/pane: init_remove_panel show init_panel] button "Modify" [init_panel/pane: init_modify_panel show init_panel] button "View All" [init_panel/pane: init_view_panel show init_panel] return guide box 2x200 blue return init_panel: box 300x300 gray ] init_add_panel: layout [ vtext "Enter the name of a variable and" vtext "the value you want to assign to it." across label "Name:" var-name: field return label "Value:" var-value: field return button "Enter" button "Cancel" button "Done" return below vtext "Click Enter to create the variable" vtext "Click Cancel to clear the entries" vtext "Click Done when all variables have been created" ] init_remove_panel: layout [ vh1 "TBD" ] init_modify_panel: layout [ vh1 "TBD" ] init_view_panel: layout [ vh1 "TBD" ] ; Source Functionality source_panel: layout [ origin 0x0 vh3 "Source Phase" ] build_panel: layout [ origin 0x0 vh3 "Building Phase" ] package_panel: layout [ origin 0x0 vh3 "Packaging Phase" ] post_panel: layout [ origin 0x0 vh3 "Post Phase" ] init_panel/offset: 0x0 source_panel/offset: 0x0 build_panel/offset: 0x0 package_panel/offset: 0x0 post_panel/offset: 0x0 view main - martin