World: r3wp

Ashley - that got me started, but where I get stuck is on the syntax 
to refer to a widget *in another window*.  In the sample below, I 
want my "Save" button to not only write a new record to my SQLite 
db, but also to refresh the query that loads the table in the parent 
window (OR, can I refresh the parent window table after the child 
window closes and the focus returns to the parent?  I cannot seem 
to trigger any focus events.).  I was trying to wrap my windows in 
objects, which are new to me also, so I'm sure that is part of my 
problem.  Obviously my attempt to refer to my table by this path 
(adddelusers/gui/tbl/data) is incorrect, since I get this error:

** Script Error: Invalid path value: tbl
** Where: on-click

** Near: insert adddelusers/gui/tbl/data (sql/flat "select * from 
users order by userid") adddelusers/gui/tbl/redraw

adddelusers: context [
			title: {Add/Remove Users}

   tbldata: copy esql/rtn [sql/flat "select * from users order by userid"][]
			gui: [

    tbl: table 125x50 options ["UserID" left 0.2 "Password" left 0.8] 
				return
				button "Add User" 30 on [
										click [display/parent adduser/title adduser/gui ]
									]
				button "Remove User" 30 [alert "need to add code here..."]
						]	
]

adduser: context [
		title: {Add User}
		gui: [	
				user:	field text "username" return
				pwd:	field text "password" return

    button "Save" [sql compose ["insert or replace into users values 
    (?,?)" (to-word user/text) (to-binary checksum/secure pwd/text)]

         insert adddelusers/gui/tbl/data (sql/flat "select * from users order 
         by userid") adddelusers/gui/tbl/redraw
								unview adduser/gui ]
				button "Cancel" [unview adduser/gui]
		]
	]

sorry for the double-send.  and I realize that in cleaning up the 
code I left out the initial table load using the "tbldata" in the 
first window, but I think the rest of the sample represents my issue.

TIA for helping a newbie!

syntax is

on-click [] and not on [ click [ ] ]

Graham - either syntax works.  I had been testing several events 
(away, over, etc.) and Ashley's documentation mentions that you can 
put them all inside a single "on [...]" block.

I find I can refer to my parent table easily with a short path, by 
just doing "insert clear tbl/data ...." from the child window "Save" 
button action and I get what I want.  BUT, that means I didn't encapsulate 
my table name at all like I had hoped within my adddelusers object. 
 I would like to setup each window display with generic widget names, 
and not worry about uniqueness - that's why I thought about trying 
to wrap the guis in objects.  Can that be done?  and if so, will 
I be back to my problem of not knowing how to reference an encapsulated 
widget on another window?

Thanks!

If you're going to try and encapsulate inside a context, why not 
provide the method to update the gui inside the context?

BTW, if you're hiding field names then my experience is that you 
need to use closures instead of functions.

Thank you, Graham, for the continued feedback.  I'm ashamed to say 
I don't even understand your last comment - this newbie will have 
to go research "closures".


Your previous comment - that sounds like a good approach - I'll have 
to learn more to do that.  I can only learn something by trying to 
use it to solve real problems; the bad news for me is that in this 
case I'm new to GUIs, REBOL and RebGUI.

If you search on closures in this thread it will explain the issue 
it solves

Get something that's simple working first ... then add complexity. 
I tend to "encapsulate" my GUIs in functions with generic widget 
identifiers, such as:

show-add-user: make function! [/local f1 f2 f3] [
	display "Add User" [
		after 2
		text ...		f1: field
		text ...		f2: field
		text ...		f3: field
		bar
		reverse
		button [f1/text: ...]
		do [...]
	]
]


If you can get this working then the problem shifts from being a 
RebGUI problem to a context problem (which more people can assist 
with in the Core or REBOL2 groups).

Ashley - thanks for pointing me in the right direction!

hi, rebgui 1.1.8 don't work with rebol 2.7.7 for linux !!!!! segment 
fault !!!!

ashley, do you have a fixe for it , regards

Isn't the issue with 2.7.7 linux

for windows no problem

rebol 2.7.7 + rebgui 1.1.8 + my program  => no problem

rebol 2.7.7 linux + regbui 1.18 + tour.r of rebgui => segment fault 
!!!!!

i use a mint based on ubuntu 8.10 !!!!

It's a linux build issue ... keep using 2.7.6

oki thanks

check the linux group here

Gabriele mentions a segm. fault

If RebGUI is using draw, that would confirm what I'm seeing here 
as well. Must say that I'm using Mint as well, so this still does 
not rule out that it is a distribution specific issue (as other people 
reported it working).

Gabriele, could you try the style browser for the vid extension kit, 
please? AFAIR there is little to no DRAW used in it.


do http://97.107.135.89/www.hmkdesign.dk/data/projects/vid-ext-kit/downloads/style-browser.r

vid-ext seems to work fine for me, using rebview 2.7.7 on ubuntu

(if that's any help)

the vid ext style browser works, that is

Andreas, if rebgui fails on your setup, then there is possibly a 
DRAW issue.

hm, let me see if i have something to test rebgui lying around

a small rebgui app of mine using build 93 of rebgui works just fine

and the rebgui demo app using build 117 from the viewtop also works 
fine

if you didn't have problems before, then your setup is probably not 
the cause like in Claude's case.

Henrik: that seems to work fine. I haven't clicked all the styles, 
but most of them. I think that only DRAW crashes.

Gabriele, ok. also try to simply click the first style and hold down 
the down cursor key. then you will scroll through all styles.

btw, map-event crash if the event doesn't contain a gob.

btw 2/,  We can not set the gob attribute on custom events (using 
make event!)

Ah ! wrong thread

I need help! But that aside, how can I scroll programatically to 
a certain position in an area? I was able to scroll to the very end 
by doing this:


textarea/para/scroll/y: negate (textarea/text-y - textarea/size/y)
show textarea


But the scrollbar handle stays at the top when doing this. I haven't 
yet found out how I can access the scrollbar from the area which 
is probably what I will have to do to solve this, right?

display "test" [
	a: area (mold ctx-rebgui/colors)
	button [a/pane/data: .5 show a]
]

Thanks a lot :) Before I do something completely wrong again... I 
also want to scroll to a certain line in the text area if possible. 
My approach now would be to see if I can somehow see how many lines 
of text are displayed in the text area, calculate the percentage 
of the line I want to scroll to based on this total number of lines, 
divide that by 100 and use it for a/pane/data. Right..?

Is that informatio available?

This seems to work:

display "test" [
	a: area (mold ctx-rebgui/colors)
	button [
		scroll-to-line: 5
		
		line-height: 30
		total-lines: (second size-text a) / line-height
		percent: ((scroll-to-line - 1) / (total-lines / 100)) / 100
		a/pane/data: percent
		show a
	]
]


The height of a line is hardcoded though which means it stops working 
if the font size is changed. Is there a way to get the current line 
height?

presumably you need to get the font information out

a/font/size gives me the font size, which is 12 by default. But does 
that help in getting the line height? Is there some kind of standard 
so that a font with the size 12 always has a height of font-size 
* something? Don't know anything about fonts...

Nor me ...

:) Thanks anyhow

but if you can get the font name, font size you should be able to 
create some text and then get the sizes from that

So, instead of using your whole area, just use one character in a 
face

Ah you mean like in an invisible text container? That should work, 
right. Thanks :)

Yep, something like that :)

ctx-rebgui/sizes/font-height