Hi,

I created this small script just to group some useful features:

1) Passing default values using external variables.
2) Check if text is null, then assign default values
3) Read values externally from "view"

rebol[]

text1: "Default 1"
text2: "Default 2"

view layout [
    t1: field text1
    t2: field text2

    button "Save" [
        if t1/text =3D "" [
            t1/text: "DEF1"
        ]

        if t2/text =3D "" [
            t2/text: "DEF2"
        ]

        unview
    ]
]

print join "T1:" t1/text
print join "T2:" t2/text

halt

I hope this will help you!


--Alessandro






On 5/6/06, Ronald <[EMAIL PROTECTED]> wrote:
>
> Hi Yvan,
>
> Why not try this ?
>
> rebol[]
> view layout [
> t: field with [text: "testing"]
> v: field with [text: "Another testing test"]
> do [focus t show t]
> ]
>
> hiwh !
>
> print reverse "rftodeerftaffodlanor" ;-)
>
> --
> To unsubscribe from the list, just send an email to
> lists at rebol.com with unsubscribe as the subject.
>
>
-- 
To unsubscribe from the list, just send an email to 
lists at rebol.com with unsubscribe as the subject.

Reply via email to