| 123456789101112131415161718192021222324252627282930 |
- <h1> REBOL/View 2.7</h1>
- <code>
- REBOL [] view layout [ h2 "Demo" area btn "Click Me" ]
- the-form: layout [
- across space 2x8
- style label vtext bold 100x24 middle right
- style bar box 306x3 edge [size: 1x1 color: water effect: 'bevel]
- backcolor water bar return
- label "Full Name" f1: field 200 return
- pad 120 c1: check vtext "Programmer" bold return
- pad 120 c2: check vtext "Operator" bold return
- label "Email Address" f2: field return
- label "Phone Number" f3: field return
- label "Your Comments" f4: area wrap 200x100 return
- bar return
- pad 40 space 100
- btn-enter 60 "Submit" [
- unview/only the-form
- show-results
- ]
- btn-cancel 60 "Close" [unview/only the-form]
- ]
- the-form/effect: [gradient 0x1]
- </code>
|
