AltME groups: search

Note that rebgui has a tab-panel with a pretty simple spec, eg:
	tab-panel data ["one" layout1 "two" layout2 "three" layout3]

Looks nice, Pekr. Would it advocate REBOL making REBOL versions of 
those examples? The code should be less, of course. Else there wouldn't 
be much point in doing it. Maybe it's possible to make a Python -> 
REBOL converter (cross compiler)? I know zip of Python, so I can't 
say.

I see. The examples are in matplotlib syntax. And matplotlib is a 
python 2D plotting library. So, as you say, it's probably better 
to find the best plotting library (or make a new one), than making 
an implementation of matplotlib. It could be the best one around 
though.

I think, we have a problem with the way, AGG is implemented. E.g. 
arguments to LINE are pairs (like 100x100). To be able to make a 
smooth curve using LINE, the arguments have to be decimals. Try the 
following code to see:

Twips are screen-independent units to ensure that the proportion 
of screen elements are the same on all display systems. A twip is 
defined as being 1/1440 of an inch.

This seems more complicated than decimal pair to me, because you 
need to recompute from twips to actual pixels, so you need to know 
screen resolution and size.

Geomol, don't forget you can just use a higher resolution and scale 
it.

The EFFECT block is like a graphical pipeline. You can have a serie 
of effects and DRAW blocks after each other. Like:

img: to-image layout [box red "Red" box green "Green" box blue "Blue"]

view layout [box 200x400 white effect [draw [image img] tint 40 draw 
[translate 100x100 image img]]]

Gemol .... that is interesting (I understand now what is meant by 
a a graphical pipeline) but not quite what I wanted. 

I have a draw block with a number of images and I want to apply an 
effect indivdual images.

http://www.hmkdesign.dk/rebol/tab-view/tab-view.r<-- a very small 
demo.

yep, actually it was more inspired by the segmented button in OSX. 
I think it conveys a much better message of grouped buttons than 
just using TOG buttons with OF 'group

If it's the LAYOUT user who want's different fonts, let him specify 
them.

If it''s you wanting to to have e.g. a second bold font just for 
the pressed tab in one tab-view, I think you may for example allocate 
two font objects and dynamically swap them in the FEEL/REDRAW.
Code fragment:


 redraw: func [face action offset] [... face/font: pick face/fonts 
 face/state ...]

You may even get along with changing a single font object:


 redraw: func [face action offset] [... face/font/style: if face/state 
 ['bold] ...]

now it's a chicken and egg thing. If I clone the object inside INIT, 
the font settings inside the layout is ignored, apparently because 
they are parsed before INIT is run.

henrik, just clone on change. VID also uses a flag in face/flags 
to indicate if a given subobject has been already cloned or not (so 
to clone only once)

On Gabriele's note, use FLAG-FACE? to check for flags:

	>> layout [b: box]
	>> flag-face? b font
	== none
	>> layout [b: box font-size 30]
	>> flag-face? b font
	== [font]

and FLAG-FACE when you want to set a flag yourself.

how do we know if current view or core version has access to pro 
features (a part from doing an /attempt on a lib call

I've browsed the 'system word throughout but didn't notice any place 
where the license made a difference when I enabled/disabled it.

Never mind, component? doesn't return none when the component isn't 
enabled. That seems a little silly to me.

So you might rename CTX to VARS to give it a meaningful name.

The above approach (storing the words in a context) makes it safe 
to add variables of any name (without having to check if it would 
override a some facet of the panel style).

anton:  WRT license,  (I had found that one  ;-) this only tells 
you that a pro license is installed... not the components which it 
enables...

since components of the pro package have changed from one version 
to another... its getting a bit tedious to hope everything is properly 
mapped...

I tried to create with the following code a circle with a transparent 
background and save it. I tried some different versions, but currently 
I have no glue how to achieve this. The point is I need a file with 
a circle and a transparent background :-) and I thought I quickly 
do this with Rebol instead of using a paintprogram. So am I doing 
something wrong ? It's saving the background from the window and 
if that is set to 'none then it's black ?

view layout [
    b: box 22x22 effect [
        draw [pen red line-width 2 circle 11x11 10]
    ]
    across 
    f: field 200 button "Save" [
        file-name: to-file f/text

        unless find/last file-name ".png" [append file-name ".png"]
        save/png file-name to-image b
    ]
]

There is some rebol-XXX? words and one is 'rebol-pro?
>> help rebol-
Found these words:
   rebol-command?  logic!    false
   rebol-encap?    logic!    false
   rebol-link?     logic!    false
   rebol-pro?      logic!    false
   rebol-view?     logic!    true
   to-rebol-file   native!   Converts a local

Thanks Gabriele, didn't even know that draw is a function which can 
be used stand-alone. (thanks to Geomol of course as well :-)

Im getting all the time the same errors from /view 1.3.2.3.1 anyone 
kows if thats a known problem?

Seems to work OK here.

Are you sure you don't have any special things in your %user.r file?
It's usually a things to check.

Well now you mentioned it.. I had a look and its stuffed with 'Steel 
configurations.. Let me remove those ;-)

I think they were from Carl or his son. Just a guess. Non-rebol.

steel !!!  wow that's a long time ago!  ;-)

Im using Layout where im appending panes into layouts.. But i dont 
think thats the problem... The problem is resizing an 'effect to 
negative numbers... like a box from 0x0 500x500 to ->  -50x0 -100x100 
...and only using it in the Engage event... Odd?? anyone an explanation 
perhaps ? This is Linux /rebview from SDk262

Sounds like a bug. What is the effect block which shows the error 
?

By the way... Is there any news on the Right Text Formatting inside 
Rebol? Will it be in? or is there a special project for RTF ?

Yes "roadmap"... We are all very currious regarding a roapmap and 
status indicator of all the running projects.. I have asked Carl 
if it would be possible to publish sush an indicator for the public.. 
It seemed a good idea to him...so lets wait and see if that can bring 
us more insight ;-)

Im not waiting for anything Im still trying to understand all of 
rebols concepts.. so i enjoy the time being ;-) New releases are 
always a surprice to me..Its like a small gift in a box when that 
happens.. ;-)

yes thanks.. Im a blind Horse on my new keyboard..sorry..

oke a small extraction of it... You draw something.. I.e. you draw 
a circle.. (I know do that with a face and a 'draw effect) but when 
i look at the Paint-Program from the Old Draw manual its done directly 
on an image.. That Circle can grow in size and shrink in size or 
even be deleted..can change color... can have overlaps.. anctualy 
think of it as a drawing too with interactive drawings.. (Though 
the output is always an image because the result is saved as an image...No 
framework is saved in rebol code..)

Well, if you want to keep a long DRAW block, you can modify the parameters 
and change/delete commands. Every time the face is refreshed, however, 
that draw block will be executed. This will become slow eventually. 
So once in a while you will want to render the result into an image 
and clear the draw block. This is as simple as  face/image: to-image 
face .

yes and keep a block to the draw which created it so you can play 
with it later, if you want  (undo, history, etc).

Rooky: how do i get this thing to become a tuple ? -> rejoin [ random 
white "." 64 ]
whatever i try it stays a string..

what are you trying to do? can't you randomize a tuple directly?

so i need to rejoin the random color with i.e. the alpha of .64...
Do i need a compose/deep on this perhpas?

yes thats what I though... but somehow I need to be able to stick 
the colors and the alpha together and that brings me always to a 
string.. instead of a tuple.. so the result is 'none and thus my 
drawing is transparent ;-)

Duh? i tried that already... But I see now... i mixed a .64 and a 
"." 64 with the rejoin.. This would indeed ben very odd if that would 
not have been possible ;-) Thnx...

a problem? :-) I have some win-shell wrapper, may post it ...

I'll give that a go...

Q: invalid args: []

Hi, I have a layout, and I always get the above mentioned error ... 
does anyone know a some hints to find the culprit? I haven't succeeded 
so far.

Q: focusing a specific field

Whar's the best way to focus a specific field on display of a layout? 
ATM I append sth like:
do [focus the-field]

Q: Clickable list lines

Hi, I have a 'list with several 'texts in it, Now I want to be able 
to click anywhere on a line, and start some action. So far I add 
an action block to the text fields. Is it possible to add it to the 
list itself, so that it is available anywhere on the line, even when 
there's no text field?

Is someone able to point me to a document on the design principles 
of VIEW's modal window system which has kept up with the latest changes 
and corrections made by IIRC Romano and Gabrielle? I only located 
snatches on the web but found no official or semi-official docs.

1) show-popup creates modal windows (either inside a parent window, 
as a subface, or outside as a standalone window)

2) modal windows have a pop-detect feel that catches *all* events

4) there are 8 default handlers for popup windows with a predefined 
pop-detect

4.4) the "away-nobtn" one is a combination of 2 and 3

4.5) the "win" one is for popups inside another window (as a subface), 
and has a different logic to figure out if the event is "outside" 
or "inside" it; it also does not hide the popup on close

I was thinking about this last night and a good modification to the 
face object might be good to include the item 'move-limit

No that's not necessary. We actually want to cut down on such bloat. 
The face object needs a bit of plastic surgery.

Yes, but there must be some reason why you want to do this on this 
particular day :)  But I still don't agree it's good to add a new 
facet to the face object just for this one purpose. Consider how 
many different confining systems there can be. This is something 
that should remain user-programmable.

They seem to be removed (at least from global context) in View 1.3.1 
(or maybe before). Previous betas had these (eg. View 1.2.7):
>> ? reg
Found these words:

   create-reg      native!   Creates a registry key and returns TRUE 
   on success...

   delete-reg      native!   Deletes a registry key. Returns TRUE if 
   deleted. (...

   exists-reg?     native!   Returns TRUE if registry key exists. (HKCU 
   is defa...

   get-reg         native!   Returns value of a registry key, else NONE. 
   (HKCU ...

   list-reg        native!   Returns a block of sub-keys for a registry 
   key. (H...

   set-reg         native!   Sets registry key value. Returns value 
   on success,...
   unset-reg-funcs function! [

The problem I have is, that I start a reblet from inside IOS but 
it needs the new View. So I cechk this and want to start View automatically. 
For this I need the install location, dynamically at runtime.

Using...what is it...RUN from IOS should run the associated app. 
So, assuming they set up a .r association, you could run a test .r 
script and look at system/options/boot.

I have set my 'view (1.3.2.3.1 5-Dec-2005 pro) to not open the desktop 
on startup, now I start it from a windows link like this:

 C:\Programme\Rebol\View\rebol.exe -s "C:\Dokumente und Einstellungen\ingo\Anwendungsdaten\rebol\start-desktop.r"
(You'll imagine, what the script does ;-)

Now, if I click on a rebol file which accesses a dll I get a security 
question whethter I really want to allow access to the dll. shouldn't 
this be allowed with the -s switch?

How to create a draw block dynamically with a number of different 
fonts.  You are not allowed to create the font inside the draw block 
as evaluation is not permitted, but word lookup is.

does draw honour the colour attribute of a font object ?  Seems not.

Or, is there a way to reuse the word wrapping routines that VID uses 
?

I've never seen a way to do that.

>> ? textinfo
USAGE:
    TEXTINFO face line-info line

DESCRIPTION:
     Sets the line text information in an object for a face.
     TEXTINFO is a native value.

ARGUMENTS:

     face -- The face for which the information is defined. (Type: object)

     line-info -- The object where the information will be set. (Type: 
     object)

     line -- The line to get information for. (Type: number any-string)

There is a fairly detailed description of TEXTINFO in http://www.rebol.com/docs/view-system.html
section 6.9.2

I've got a column of text about 40 chars, and I want it to snake 
up and down 3 columns on a page .. and it seems to work.

in draw, if you place a block of text formatted with line feeds, 
it displays as is.

A pity I can't pick up a draw object and move it around on screen 
:(

how does your program work? is it a dialect that can produce DRAW 
and PS?

well, I need some scaling and 90 degree rotation. I'm creating the 
number marks you use in a marathon race to put on your chest and 
back.

already have the number mark done, but there is a catch: the number 
can only be seen after printing it out, due to the construction of 
the program. it would be nice to be able to preview it before printing.

You've already seen my psd2draw.r script .. I just feed the same 
block thru my ps dialect to get the postsrcript and write that to 
a file.

I think it's best for me right now to create a makeshift preview 
rather than an actual preview

That's a fair enough rebuttal.. let's see the links to back it up.

where is SVG support? What browser it starts from? When most of old 
browsers will be replaced/reinstalled? I think that there is still 
one or even more - let's say two years to see those technologies 
settle a bit ...

One thing I love using View for is to make very quick custom GUIs 
for customers who need to carry out special tasks, but have no idea 
how to do it via the command line. It takes minutes to build something 
up (say a simple backup/restore system) and show them which buttons 
to press. It can almost be done right in front of them.


I'd hate having to resort to downloading a 50-100 MB Flash development 
tool or build and compile Visual Basic apps, which, ooops, don't 
really work on their Linux box, and I just need a GUI with two buttons 
and a text field. Also how much system access does Flash give you? 
Can you create/move/delete files?


It's so much nicer to say "Sure, let me do this and it can be done 
in an hour" rather than "I'll have a look at it at home and we'll 
see what I can deliver some time next week."


For those things, it doesn't matter that View doesn't use Aero, Quartz 
Extreme or super fast hardware acceleration to display a few simple 
buttons. It just does the job you need to do.

Anton, I know about matrix math and have a book here with the standard 
4x4 matrix operations for transformation like rotation, scale, etc. 
in 3D, if you need those. But are you sure, AGG use matrix math to 
do the 4-corner IMAGE trick? I would guess, it's some (2D) texture 
algorithm.

Anton, one approach is to make a scanline routine. Sort the 4 corners 
according to y-coord. Start with the point with the lowest y-coord 
and look the colour up in the image (the point in that corner). For 
the next line (down on the monitor), you find the fraction, you've 
moved along the line to the point at the right side from where you 
started, and the same for the line to the point on the left side. 
Then you can find each colour for the pixels between the 2 points. 
You can keep doing this, until you reach one of the 2 next corners 
in the original corner points. Then you go along a new line to the 
last corner point. The same for the other end of the scanline. A 
problem is then to make the result look smooth. Bi-linear or tri-linear 
filtering can help here. I hope, I make some sense. It's a lot easier 
to draw than explain.

Maybe a little drawing can help me:

00010000
00222000
03333300
44444440
05555555
00666660
00077700
00008000

0 = background

1-8 = the 8 scanlines, this little figure is made of. The 8 scanlines 
are drawn starting with 1 and ending with 8. The colours in each 
pixel in each scanline is picked from the original image.

Each scanline has to be mapped onto the original image to find the 
colours. If such a mapping is made with straight lines, I predict 
the result to look ok with nice rectangle-like figures. But if one 
corner is far away from the rest, or moved in between the others, 
the result might be awful. A better way could be to map the scanlines 
as Bezier-curves on the original image. Could be interesting to know, 
how AGG does it, now that AGG's result is so good.

Thanks for your idea, by the way, but I need to have the exact same 
transformation used by DRAW IMAGE with four points. I just need to 
transform a single point at a time.

Oh, it's been a while, since I did C++, but it's something like:
6 private (internal) variables: den, den_step ... nom_y_step
2 public: x and y
Constructor iterator_x without arguments does nothing.

Constructor iterator_x with 3 arguments (and a constant!? The constant 
is an 8D vector) does (REBOL code):
den: (m[6] * tx) + (m[7] * ty) + 1.0
...
y: nom_y / den

Then an operator ++, so you can write: iterator_x_object++;

And the operator runs the code in the function. End of class definition 
at the };

Then some sort of begin situation!? I think, if you make an object 
of class iterator_x, you give 3 arguments: x, y and step. Then m_mtx 
is added from somewhere. m_mtx must be defined somewhere else, I 
guess.

It's a bit weird, that m_mtx is 2 dimensional [8][1]. It's like in 
REBOL:
m_mtx: [[1.0] [2.0]Ê[3.0].... [8.0]]
where you could just do:
m_mtx: [1.0 2.0 3.0 ... 8.0]

Yes, confusing. It's like they want everything to be classes, even 
basic datatypes like double. So you can initialize a double with 
something looking like a function call. Pure object-orientation is 
not good. :-)

Excellent... :) Transforming a grid of points works. >:D

My guess is, that Anton made a function in REBOL like IMAGE used 
in the DRAW dialect. It takes 4 points and do some calculations producing 
a modified image. Like what I do in Canvas, when you use perspective. 
I'm using DRAW for that, Anton is converting the routine from AGG 
C++-source.

Not quite, although I think I could. What I have done is made a function 
which can transform a point from one space into another. Eg, for 
Geomol's example above, it maps from the image (logo.gif) space into 
the final rendered space shown on screen. So I could ask for any 
point in the image and find out where it is rendered to at the end.

Anton, what is your plan with it? For what use do you need such a 
space-transformation routine?

You have a "twisted" image and want the original one!? :-)

not image - individual points, one at a time

I wouldn't call Melbourne a wilderness!

Not that I would ask a user to use a rotated and skewed gui..!

Actually Melbourne is a bit of a wilderness, in a way.

Not familiar with Novell/XGL.  Got a link?

it's a linux thing

Here, but there is a video somewhere...
http://www.novell.com/linux/xglrelease/

I"m trying to install Suse on a new AMD motherboard and it doesn't 
recognise the video on the motherboard, and so get some rather disturbing 
effects.

Anton: I can put the video on my surfnet account, bandwidt enough, 
so you can be slashdotted. Suppl me with a page with all the credits, 
and ...