----- Original Message -----
From: "Joel Neely" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Wednesday, May 02, 2001 10:10 PM
Subject: [REBOL] BUTTON is odd widget out


> As the following code demonstrates, BUTTON seems to be an antisocial
> little tyke who will get marks off in "plays well with others".  ;-)
>
> This raises two questions for me:
>
> 1)  Is this a bug or a "feature"?
> 2)  Are there any nice work-arounds?

Hi Joel,

Not a bug, but the nature of styles that can display alternate texts related
to the face's state. (such as button, toggle, choice). Such styles hold
their text
display texts in a face/texts block. Other styles do similar with face/color
and face/colors

I have modified fix-text to show the button with alt-text when it is
PRESSED, (second texts is for demonstration only, not needed in your code)

fix-text: func [thingie] [
        thingie/text: counter-text
    if in thingie 'texts [
          thingie/texts: reduce [counter-text "PRESSED"]
          probe thingie/texts

  ]
        show thingie
    ]


Cheers,

Allen K






-- 
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the 
subject, without the quotes.

Reply via email to