World: r3wp

Nicolas, unfortunately due the system-port bug in R2 it is possibe 
to detect ALT etc. keys only in the Rebol console window.

Cyphre - and as for R3? btw - what does it have to do with the system 
port? Are all keyboard events captured via a system port, or just 
only special keys?

Yes, all system events are captured by system port first. IIRC in 
R3 there is currently no way how to capture non-rebol-defined events 
but in R2 this is possible though only from the console.
I believe the event port capabilities in R3 will be enhanced.

I'm trying to extract info from faces in a panel but I can't get 
it...


I can see the objects! with mypanel/pane but what is the rest of 
the path to get to say a buttons "data:" field?

that would be for example mypanel/pane/1/data if the button is the 
first element.

I tried that but 'm getting an invalid path...

I'm trying to step through them with a foreach statement...i've done 
it with scroll panels but can't figure it out for a simple panel/pane

the pane can also be an object. in that case the path would be mypanel/pane/pane/1/data

still error1


** Script Error: copy expected value argument of type: series port 
bitset
** Where: expand-specs
** Near: specs: copy specs
foreach var

where are you putting this foreach statement? this looks like a dialect 
error.

can you post the code?

The above error was from this probe : probe cal_panel/pane/pane/1/data


Here is a segment of the generated code that I pass through LAYOUT 
before i attach to panel :

[origin 0x0 space 0x0 styles cal_styles across return box 81x81 192.192.192 
with [

edge/size: 1x1] [data: compose [28-Mar-2010]] effect [draw [pen yellow 
text 25x5 "

10-15" pen blue text 25x18 "25-5" font italic-font pen black 40x50 
text "28"]] [pr

int face/data] box 81x81 192.192.192 with [edge/size: 1x1] [data: 
compose [29-Mar-

2010]] effect [draw [pen yellow text 25x5 "13-18" pen blue text 25x18 
"3-8" font i
talic-font pen black 40x50 text "29"]] [print face/data]

the above code is in a block called matrix_panel
then attached to cal_panel with :

cal_panel/pane: layout/tight matrix_panel

where do you call foreach?

just after : cal_panel/pane: layout/tight matrix_panel

with [edge/size: 1x1] [data: compose [28-Mar-2010]]

-->  with [edge/size: 1x1 data: compose [28-Mar-2010]]

Does that work?

bingo ...thanks guys...weird though as I only added the edge a moment 
ago..

Awesome. You're the first guy I've helped.

I can now go to bed...thanks double

View question ... http://synapse-ehr.com/forums/showthread.php?46-mouse-over-events

don't worry ... I debugged it for him.

Oldes, do you still have that nice "color picker" code somewhere? 
 I want to embed that into GLASS as a style, I'd put it in the default 
release with your permission.

Oldes I found a link to color-lab.r... and it fails since there seems 
to be a file missing on the server:

http://oldes.multimedia.cz/color-lab/ctx-color-lab.gz

managed to find the .rip files... all is good.

Fine... just found them as well. The latest is from year 2005 so 
I don't know how it works.

seems to work fine in 2.7.6

If you don't mind, I'll make a derived version and include it with 
GLASS.  full credits will be attributed.  :-)

I don't mind. You are welcome to use it as you like:)

thanks

btw. I think Rebolek has a ColorPicker as well.

ah  battle of the color pickers then...  Rebolek is your picker available, 
I'm curious to see it?

Maxim, I think I saw it somewhere few months ago, I'll have a look 
in the morning, if you don't mind.

So it was on my HDD, interesting. It's here: http://www.filedropper.com/colorsliders

It's a overkill, I know, you can remove half of functionality without 
problem. But, OTOH, it's easier to remove than to add ;)

wow two contenders  :-)


If you don't mind, I think I'll merge your stuff with the one from 
Oldes.


two completely different paradigms.  its always fun to be able to 
chose.


I'll also add stuff of my own, like a user palette which saves to 
disk.

actually I think yours will be easy to convert to glass, since its 
already in AGG

max, you didn't answer my question!

what question?

oh ... you did

REBOL/view R2 CRASHES when I use a linear fill-pen... with a box!!!!!

has anyone else had this problem too?


I'll try to build an example 10 line script which shows this happening...

I think I pinned the issue.  


I think its triggered by some memory optimization within linear-fill, 
(something to do with the dialect parser probably).

draw-blk:  [ ... contains a linear fill ...]

face/effect: reduce ['draw draw-blk]
show face
face/effect: reduce ['draw draw-blk]
show face

the above crashes REBOL


note we use the same draw block within two different effect wrappers, 
consecutively.

even doing a copy/deep on it doesn't work  darn!

its a bit more complex than this but I'm still searching for an exact 
replicatable example with a real draw block as example.

Maxim, I can't get it crash easily here. Using this simple test:

r: 0

dr: [pen red fill-pen linear 50x50 -50 50 r 1 1 red yellow green 
cyan blue magenta box]
view/new layout [bx: box]
loop 1000 [
	r: r + 1
	bx/effect: reduce ['draw dr]
	show bx
]
do-events

I know... its related to this specific draw block... I'm getting 
there...


I saved out the draw block to disk and when load it and use it within 
my tester, it crashes... 


so I'll reduce to the smalest example that crashes and dump it here.

BTW you don't need to use reduce on the effect block in this case.