World: r3wp

here is the message => "result: pick data first picked"   near "on-click" 
         on source rebgui.r  function choose !!!!

picked return []

re: RebGUI and R3/VID. I'll probably put something up on my website 
on this topic as I get asked this quite a lot. Basic thinking at 
this stage is:

	I need to create SDK GUI apps for Windows and OSX
	R2/RebGUI is the only practical alternative at present for *me*
	I'd love to use R3/VID to create SDK GUI apps today
	This probably won't be possible for quite some time

 If and when this *is* possible I'll port all my apps over to R3/VID

 To do this I'll either create a compatibility layer that lets RebGUI 
 apps run on R3/VID, or

 Write a conversion script that tries to convert (if possible) RebGUI 
 scripts to R3/VID

 I'd hope R3/VID is complete enough that it doesn't require any of 
 RebGUI's basic widgets!

ashley do you have a solution for the menu bug ?

Yes, but the next build will be a while yet.

Does the TABLE widget support horizontal scrolling?

No, there is Cyphre's grid, but it was not adapted to new API changes 
....

thanks

I need to popup a menu where the cursor is.  I guess caret-to-offset 
will get me the offset into the face ....

this doesn't seem to change much in edit-text

caret-to-offset face find/tail/last head view*/caret view*/caret

removingt the /tail seems to help :)

how to set the check-group ?


display "" [ cg: check-group data [ "1" none "2" none "3" none ] 
button "Set" [ set-data cg [ true true true ] probe cg/data] ] do-events

doesn't work for me

BTW, set-values.r seems to be missing from the distribution now.

I often have the need to set a date on a field ... and use a symbol 
to invoke the request-date .. .but this usually means I have to name 
the date field like this


datefld: field 25 symbol data 'look on-click [ use [d][ if d: request-date 
[ set-text datefld form d ]]]


To avoid naming the datefield, I have this function which returns 
the prior face


get-prior-widget: func [ f
    /local pane priorface
][
    pane: f/parent-face/pane
    priorface: pick pane -1 + index? find pane f
]

and here's a request date that uses it


request-date-priorface: func [ f /local d ]
[
    if d: request-date [
        set-text get-prior-widget f form d
    ]
]

so we can now do:


 field 25 symbol data 'look on-click [  request-date-priorface face 
 ]

Can't use funct as using the SDK :)

1) set-values.r ... removed in build#212. Plan is to add accessors 
(e.g. add, update, delete) to each "complex" widget.

2) named widgets ... don't forget the 'in-widget function, it does 
what you want above (see biuld#213 release note from Aug 27).

3) funct ... you'll have to build your own collection of SDK+ mezz 
funcs as the SDK diverges further from R3 (and R2 releases without 
an SDK update).

and how to set  a check-group?

Just looked at in-widget, and it does different things. I want to 
find a specific widget ...

And this doesn't seem to work either


>> display "" [ gb: group-box -1x-1 data [ t: table "test" options 
[ "a" left 1 ] data [ 1 2 3 ]] return button "Get" [ probe get-values 
gb ]] do-events
[[]]

Ashley, I posted a simple function that grabs spelling suggestions 
from the google spell checker.  I  am going to see if I can use it 
in the rebgui spell checker to provide suggestions as currently the 
spell checker does not ....

posted in the core group

I've managed to incorporate the google spell check into rebgui's 
spell checker... but it is slower of course but more accurate.

Some optimizations would be to add correctly spelled words unknown 
to the local dictionary automatically, and to also spell check a 
number of words at the same time ... it probably makes not much difference 
to the google spell checker, and is less expensive in terms of web 
calls.

What I am doing now .. is scanning all the words in the face, and 
checking them against the dictionary.  If not found, I collect them 
all and then submit all of them to google.  This then gives me lists 
of choices for each word which is not recognized.

Seems to be working ...

In RebDOC, Request-font throws an error ...

4.  I can't see a way to update the check-group so looks like it 
is easier for me to just  rebuild the check-group on the fly

Hi!  maybe I should ask this in the "I'm New" group.  Wanted to try 
out RebGUI for my 2nd REBOL project.  I'm stuck early on trying to 
refresh a table based on a SQL query in a parent window when closing 
a child window that would have added a record to table.  I've gotten 
the examples on click and away events to work, but do not understand 
how to use focus events apparently.  Can someone point me to some 
sample code that would help w/ moving focus from window to window 
and refreshing tables?  With that, I think most of my GUI problems 
would be solved. 

TIA!  -Jack

Post some sample code somewhere ...

http://www.dobeash.com/RebGUI/cookbook.html#section-1might help 
you get started.

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]
		]
	]

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