[REBOL] Re: BUTTON is odd widget out
From: allenk:powerup:au at: 2-May-2001 23:46
----- Original Message -----
From: "Joel Neely" <[joel--neely--fedex--com]>
To: <[rebol-list--rebol--com]>
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