[REBOL] RebGUI enhancement request - active labels
From: btiffin:rogers at: 19-Mar-2007 12:58
Hi,
The apps I've been writing use RebGUI 0.4.0. A major design philosophy I
use is labelled fields. Clicking on the label pops up a requestor (usually
using text-list filled from (sometimes large) databases) that fills in the
field with selected choice. The use can click the label for a popup or enter
data directly in the field.
I needed the visual cue that the label is 'hot' so I modified label to this
(perhaps inefficient, perhaps broken)...
label: make text [
font: make default-font [style: 'bold]
feel: make default-feel [
engage: func [face action event] [
switch action [
down [face/feel/over face false 0x0
face/action face]
away [face/feel/over face false
0x0]
]
]
over: func [face act pos] [
if (get in face 'action) [
either act [face/font/color: gold show face]
[face/font/color: black show face]
]
]
]
]
If there is an action block with the label, change to gold on a hover.
This is a mod of old widget code from 0.4.0
Is it possible to get this feature built into the 'real' RebGUI? If a label
has a click action, to highlight it some how?
Thanks in advance, and I'm more than willing to hear a short response of "No".
By the way, the last %tour.r I pulled out of svn doesn't segfault on
Debian/GNU Linux - etch RC1 anymore.
btiffin