[REBOL] Re: View a list of Data including checkbox
From: petr:krenzelok:trz:cz at: 1-Apr-2003 15:48
Graham Chiu wrote:
> On Mon, 31 Mar 2003 20:08:22 -0500 (EST)
> Jeannot Chapdelaine <[jchapde--yahoo--ca]> wrote:
>> Would it be possible to have in REBOL a list of data
>> with one checkbox per row, where we can check and
>> uncheck directly in the list ?
> I'm not aware of such a beast, and I had the same need recently.
> In the end I modified text-list so that clicking without control
> allowed multiple selects .. and gave me the same functionality.
> Check out Cerebrus' email manager to see what I mean.
What is the problem with that one? I have it functional here .... first
block of list simply accepts sub-VID dialect - it is like panel, which
simply encloses another VID styles ....
small example, although maybe not easily understandable, as it is mixed
with my small util logic ...
lst: list 230x350 [
origin 0 space 0x0 across
t: text bold black 200x20 [
x: next find vyber-meny t/text
either (first x) = "Ano" [change x "Ne"][change x "Ano"]
ch: check black 
] supply [
count: count + cnt
if even? count [face/color: ivory - 50.50.50]
p1: pick vyber-meny (count * 2) - 1
p2: pick vyber-meny (count * 2)
if none? p1 [exit] ; exit if end of array ...
either index = 1 [
face/data: either p2 = "Ano" [true][false]
Note: as I mentioned in regards to Romano's resize system, styles
supporting function code block are real hell for rebol
beginner-programmers, because of one simple reason - there are words
that you are required to know, if you want to work effectively with the
style. 'face is OK here, but 'cnt is a problem .... maybe you will not
agree, but 'supply part of list style is a real stopper to style usage,
and I have proof with three other ppl I get to some VID coding .... I
wonder if there is more intuitive way?