Rebol Talk Forum  |  Getting Started  |  Code Examples, Tips & Advice  |  Topic: Stacking Panels
Pages: [1] Print
Author Topic: Stacking Panels  (Read 552 times)
DefiantPc
Administrator
Jr. Member
*
Offline Offline

Posts: 70


View Profile
Stacking Panels
« on: January 18, 2004, 12:24:52 PM »

Code:
rebol[title:""]

screen-size: system/view/screen-face/size

out: layout [

size screen-size
bx: box 500x500 ivory
do [bx/offset: screen-size / 2 - (bx/size / 2)]

at bx/offset + 0x0 p1: panel 400x400 [
   backdrop navy
   ]

at p1/offset + 0x0 panel 102x79  [
   origin 1
   space 2x2
   backdrop  green
   button "p1 butt1" [unview]
   button "p1 butt2" [unview]
   button "p1 butt3" [unview]
]

at p1/offset + 100x100 panel 102x79  [
   origin 1
   space 2x2
   backdrop  red
   button "p1 butt1" [unview]
   button "p1 butt2" [unview]
   button "p1 butt3" [unview]
]

]

view/options center-face out [ no-title no-border]
« Last Edit: January 18, 2004, 12:25:56 PM by DefiantPc » Logged
Pages: [1] Print 
Rebol Talk Forum  |  Getting Started  |  Code Examples, Tips & Advice  |  Topic: Stacking Panels
Jump to:  

  
Quick Search...

Advanced search
  
Welcome, Guest. Please login or register.
Did you miss your activation email?
August 30, 2008, 07:00:24 AM
Username: Password: Session Length:
  

News: 01-09-08

Alpha version of REBOL 3 has been released!


  
2235 Posts in 583 Topics by 1757 Members
Latest Member: Xzycdysz

  Rebol Talk Forum | Powered by SMF 1.0.9.
© 2001-2005, Lewis Media. All Rights Reserved.

RT design by Defiant Pc