World: r3wp

if i understand correctly, you need to use draw to produce a transparent 
image. is that correct?

so my question is, why do you need to make one color transparent, 
instead of using the alpha channel?

img: make image! 50x50
img/alpha: 255 ; make bg transparent
draw img [pen black line-width 2 circle 25x25 20]
save/png %test.png img

he is not using draw. AFAIK

Maxim, yes, I'm using draw.

doh... sorry.

I'm creating the image in a block, then using draw to display the 
final image.

can you give us a real equivalent example?

there are many possible edge defects... seeing them will help us 
cure the booboo :-)

right now we're like swatting flies in the dark... with you having 
the infra red goggles and saying: 
LEFT ! LEFT! .. oh no  RIGHT! RIGHT
;-)

hilight-colour: 255.0.0 ;0.112.99	;request-color


font-style: make face/font [style: 'bold  name: "font-sans-serif" 
 size: 26]

hilights: [
	transform 0 1 1 0x0 0x0
	fill-pen snow pen snow	;white circle
	circle 10x10 9
	fill-pen black pen black	;black circle
	circle 13x13 9
	fill-pen hilight-colour	;0.112.99
	pen hilight-colour	;serve dark green - 0.112.99
	circle 11x11 9
	fill-pen snow pen snow
	font font-style
	text 1 6x0 "*"
]

view center-face out: layout [
	origin 0
	bx: box 23x23 50.50.50 effect [draw hilights effect []][ 
		file: request-file/only/save/file %hilight.png
		if not file [exit]
		if not find file ".png" [append file ".png"]
		save/png file to-image bx
		img: load file
		colour: pick img 1x1

  repeat i length? img [if colour = pick img i [poke img i 0.0.0.255]]
		save/png file img
	]
]

this is a stripped down version (this time one that works without 
error)

clicking on the image brings up the save requestor

Using Gabriel's method creates a clean image without the fringing....

hilight-colour: 255.0.0 ;0.112.99	;request-color


font-style: make face/font [style: 'bold  name: "font-sans-serif" 
 size: 26]

img: make image! 23x23
img/alpha: 255	;make bg transparent


draw img [
	transform 0 1 1 0x0 0x0
	fill-pen snow pen snow	;white circle
	circle 10x10 9
	fill-pen black pen black	;black circle
	circle 13x13 9
	fill-pen hilight-colour	;0.112.99
	pen hilight-colour	;serve dark green - 0.112.99
	circle 11x11 9
	fill-pen snow pen snow
	font font-style
	text 1 6x0 "*"
]

file: request-file/only/save/file %hilight.png
if not file [exit]
if not find file ".png" [append file ".png"]
save/png file img

Thanks all for your input/suggestions.

The "bulk-set alpha" method as shown by Gabriele should evaluate 
quite a lot faster, too.

I had problems with his version for resizine the image on the fly. 
 I didn't look at it very long.  I'm rethinking whether I need the 
resize feature as I will likely build a small GUI where are the parameters 
are set.

I have access to the F1 - F12 keys .. but what about the Alt-F1 - 
F12, or other modifiers?

in the event you have alt/shift/ctrl members.	
event/shift  for example.

when set to true the modifier was pressed when you pressed the key.

combinations exist.

the Alt key is sometimes consumed by the OS, same for the Tab... 
I think someone mentionned that tab + shift is never sent to REBOL.

I have to see if rebgui allows me all of this ...

I'm looking for a script to allow communication between users on 
a lan. rim.r looks like it would work, but the cgi script that ties 
it together is missing. Does anyone have it?

Is something even better available?

There is only event/control and event/shift,   nothing to detect 
Alt key.

Tab and Shift+Tab  can be trapped by Rebol.  But Ctrl+Tab cannot 
be caught by Rebol because Windows consumes this key event before 
it is sent to the application window (eg. Rebol's window).

wasn't there the Alt support in a prior version.  I am almost shure 
I used to support it in an old app of mine...

nope

but it can be surelly overriden, or can't it?

events are a datatype not objects, you cannot set any values in them.

which is why Anton reversed enginerred the do-face mechanism... but 
in any case, the events are generated by the internal REBOL HAL which 
accepts some (but not all) OS events and feeds the event port with 
them.

it has been a long standing request that more OS events been sent 
to scripts...

and that was my point. It could accept even ctrl+tab, as that is 
trappable. But, I remember how Holger argued with me about cross-platform 
issues ....

as long as Cyphre is on View part of R3, I believe the situation 
will be corrected :-)

ahh cross platform is a moot point for many of us. really... the 
fact that REBOL runs on all platforms is very good.

the fact that OUR apps run on all apps is not needed in many/most 
cases

especialy in corp env.  and in any case, we will adapt our apps to 
use any os features REBOL gives us :-)

that's the point for a user to use Apple or windows... why strip 
their power from them.?

example... why no OS icon drag support in apple and window.

Rebol gives you all the OS features you can digest... via the External 
Library Interface.

yes, just like following 3 years of mechanics will allow me to change 
my pistons in my car myself... the question. is... do I want to? 
 when the whole platform is the one taking away those events!  for 
compatibilitie's sake?

and even then... that means I have to try and make it work for apple... 
hum.. I dont' own one, how can I make it work.

(sorry if I sound negative here, its not against you... I'm just 
a bit tired these days...)

You just gotta relax and focus a bit.

hehe

but Anton, is it really possible to add icon drag events in a rebol 
window?  how will I receive my events within the wake-event?  AFAICT... 
its not dooable.

You mean from the OS ? Yes, it is, I far as I remember.

http://www.rebol.org/cgi-bin/cgiwrap/rebol/view-script.r?script=sys-port-drag-accept.r