AltME groups: search

The first step to getting the collaborative documentation up is to 
migrate the widget specific documentation across; and this gives 
us the opportunity to reformat and expand upon the content. But what 
template to use? If you have an opinion on this then cruise along 
to http://trac.geekisp.com/rebgui/wiki/WidgetList#areaand click 
"Edit this page" to play around with the content and formating of 
this single entry (area). Once we are happy with the format I'll 
use it as a template to bring across all the other widget descriptions.

In the works. I've already restructured the source by removing each 
widget (from %rebgui-widgets.r) to its own <widget>.r file under 
a new %widgets/ directory. Next step is to create a link to each 
source file under its matching WidgetsList Wiki entry.


I've also created a monolithic script (striped output from prebol.r) 
which resides at: http://www.dobeash.com/RebGUI/rebgui.zip


The intention at this stage is to have multiple source files that 
can be collaboratively worked on, with a "build" every so often to 
merge them into a single script for easy access / deployment (not 
everyone will want to grab the source from SVN). The fact that each 
widget resides in its own source file now makes it very easy to "plugin" 
additional widgets.

Yes to the first question, with six widgets not making the cut (I'll 
upload them later):

	area2 (area plus horizontal scroll ... does not work correctly)
	auto-fill (needs to be reworked)
	list-view (code needs a bit more work)
	spinner (not completed)
	icon (awaiting SVG renderer code)
	svg-tool-bar (awaiting SVG renderer code)

Alternate distributions: let's keep it simple for the moment ...

How to clear the text in a title group?


title-group/text: copy "" show title-group doesn't work as junk is 
still left on the screen, and there's no title-group/text/line-list 
attribute to set.

Added a reproducible defect into the trac ...

this is a temporary "fix" for line 549 in rebgui-edit.r

if none? caret: caret-to-offset face view*/caret [ return ]

title-group: show-text works with the body, while you can do a:

	insert clear tg/pane/text "New title"
	show tg


to change the title. Note that this will not cater for a change in 
number of lines.

I named the title-group tg, and I have a button "clear" [ set-text 
tg "" show tg ]
It does not clear the text cleanly.

That's odd. Changing "" to " " works fine (I tried copy "" but no 
luck). At least it's easy to reproduce! ;) I'll take a look at it 
over the weekend when I get some time.

I've made a trac defect entry for this issue.

I put up some preliminary changes to the modal popup handling for 
RebGUI. By manually replacing the original files (but keep them in 
a safe place!) with


 http://www.diefettenjahresindvorbei.de/www/rebgui/rebgui-widgets.r

 http://www.diefettenjahresindvorbei.de/www/rebgui/rebgui-dialog.r


you should be able to try them. You'll notice a different and more 
common behaviour of drop- and edit-lists. For the existing styles 
as can be found in the tour script, I haven't experienced unexpected 
results so far. But I'm curious to hear if incompatibilities arise 
in more complex applications that need to be addressed.

Graham - not sure if the problem with the clearng of text area but 
most often I almost always set line-list to 0 each time I clear a 
field  so that might be the issue your seeing.

huh? every face has a line-list attribute.

line-list is the culprit. Replace the 'show-text and 'clear-text 
functions in %rebgui.r with the following:

show-text: make function! [
	"Sets a widget's text attribute."
	face [object!] "Widget"
	text [any-type!] "Text"
	/focus
][
	face/line-list: none
	insert clear face/text form text

 all [face/type = 'area face/para face/para/scroll: 0x0 face/pane/data: 
 0]
	either focus [ctx-rebgui/edit/focus face] [show face]
]

clear-text: make function! [
	"Clears a widget's text attribute."
	face [object!]
	/no-show "Don't show"
	/focus
][
	face/line-list: none
	clear face/text

 all [face/type = 'area face/para face/para/scroll: 0x0 face/pane/data: 
 0]
	unless no-show [
		either focus [ctx-rebgui/edit/focus face] [show face]
	]
]

Small question.  I try to insert a list from a select in Rebdb into 
the data block  of a rebgui table.  It does give me an error in RebGui 
: invalid data block.  I did try to call the variable (''do'' does 
not fit the bill here, is it?).  The same example from the rebgui 
tour would be a: [1 "One" a] and ex-table: table (tab-size - 48x18) 
#WH options ["ID" right .3 "Number" left .4 "Char" center .3] data 
:a.   From start I would like to populate the table from RebDB, and 
from there my block is valid.  I am trying to make an example of 
a small phone book using rebDB and RebGui, it could be usefull as 
an example working app.  But it has been some month I did not touch 
the keyboard.  I do get rusty.  Thanks for any help on this.

oups! The answer is trivial () as in a: [1 "One" a] and ex-table: 
table (tab-size - 48x18) #WH options ["ID" right .3 "Number" left 
.4 "Char" center .3] data (a).

You can even take it a step further and replace (a) with the database 
call itself; e.g. (sql [select * from t]) ... just make sure you 
either use compose/only to keep the result set as a block or compose/deep 
with embedded block; e.g. [(sql [select * from t)]

Is there a reason why if you use vid and rebgui together, and when 
you have windows from both open, if you open a rebgui window from 
a vid screen, it opens infront of the existing rebgui screen and 
not the screen that called it?

Is there a reason ...
 not by design! ;)

tab-panel: Autosizing doesn't seem to work. Using -1x-1 gives a small 
tab-panel, showing only the first tab.

And a small piece from the second tab.

Do you imagine a lot of names? Or is there a more systematic way 
to do it?

But than I need to write a special bind block too. That's double 
work. Once in the GUI code, once in the bind block.

hundreds of different fields(layout-wise), or a table with lots of 
rows?

Can some one tell me why the path value of face/picked is sometimes 
valid sometimes invalid ? The last call is invalid but the precedings 
are valid.  prospect-table: table 120x40  #HW options ["ID" left 
.1 "Date M-à-J" left .22 "Nom" left .34 "Prenom" left .34] data (current-list) 
[
			show-text this-text pick face/data first face/picked 
			print "" print face/data print face/picked
			print (type? face/picked)

   ; ** Script Error: Invalid path value: picked ]; I want to use face/picked 
   in a formula to change the index to the pick function.

Robert:
	1) global words: they are not. Try the following:


  f: has [v] [display "Test" [v: field button [unview halt]] do-events]


 My normal approach is to wrap each display in its own function with 
 something like:


  display-account-summary: make function! [id [integer!] /local f1 
  f2 f3 f4 f5 f6] [
			...
			display "Account" [
				f1: field
				f2: field
				...
			]
			...
		]


 2) tab-panel: works, just take a look at how it is used in %tour.r. 
 Note that it defaults to "size: -1x-1". Maybe you need to make the 
 panel contents bigger?

face/picked: try adding a "print mold face/picked" to the table action 
so you can see what block value(s) are being selected. Perhaps, in 
a particular case, it is returning an empty block?

Does image still only take a filename and not an image type?

I'm looking at capturing images from a web cam and inserting them 
into my program.

The following works:

	a: load my-image.png
	display "Test" compose [image (a)]

Sorry for the proliferation of my dots, I'm forcing a resync and 
I'm being disconnected at about 25%... :-(

Ashley: Do you use several display functions in your apps? At the 
moment I have one. I use tab-panels a lot. Hence I have one big display 
function.

Have about half a dozen, and I make use of 'unview-keep to only have 
2 or 3 open at the same time (also useful when multiple data entry 
screens are open at the same time and the user clicks "commit" ... 
data is saved and all windows except the Main Menu are closed).

Next one: What's the best way to create "user-selection-dependent-layouts"? 
For example the User select one entry in a drop-down box and depending 
on the value, a different layout should be shown below the drop-list.

Yes, it's in a tab-panel and depending on the selection of one drop-list 
the data-input form that follows the drop-list has to display different 
labes & fields.

Tab panels can't be used, because it's XOR. So either show A or B.

Doing a hidden layout and than plugging it into the current one would 
be best. But than I have to deal with PANE etc. IMO that's to low-level. 
I would like to have a way to alter the layout dynamically.

Ashley, thanks for the answers.   I cant figure out from the tour 
how to show some new values of data in a table.  What is wrong with 
the instructions in the two buttons.

load/save: I mean get back/fill in all fields in a structured way 
so that it can be used with SQLite.

If you have a form with several fields I want to have something like:
	store data-form
and get back a block like this:
	[name text  "Graham" rebol value true ...]

So for all widgets where the SAVE flag is set, the name of the widgit 
word, the word and value is returned. With this it's possible to 
handle records very comfortable.

put-form/all my-display block-of-values-returned-by-sql-call
blk: get-form my-display


I've got as far as thinking about how it could / should be implemented 
(there are some interesting issues with grouping widgets like group-box, 
table, text-list, etc); but my focus at the moment is to complete 
the SVN setup / structure / documentation / usage instructions so 
as collaborative development can begin (and I am no longer the bottle-neck 
in changes being implemented). Unfortunately, I'm two weeks into 
an intensive four week certification course (non-IT related) so REBOL 
things are on the back burner for a while (although I'm popping in 
here to answer the odd question here and there where I can).

Is there a "fit" for images as in Vid?

Here is a very simple patch to slider, which makes a nice half-second 
pause at the beginning of a scroll:
				if find [down time] act [
					if act = 'down [face/rate: 2]
					if act = 'time [face/rate: 16]

Thanks.


 "how's the splitting of widgets into separate files going?" Done, 
 it's all in SVN now: http://trac.geekisp.com/rebgui/browser


Anyone who wants dev access (both source and Wiki write access) just 
drop me a private message and I'll get you a username (same as REBOL3 
username) and password. A lot remains to be done before I open it 
up to full collaborative access, but having a few folks on it means 
we can test the infrastructure / process (in addition to getting 
some changes into RebGUI faster).

Changes like the above are good candidates to start with. ;)

Done and done. SVN client software is available at:

	Windows: http://tortoisesvn.sourceforge.net/

 Mac: http://www.lachoseinteractive.net/en/community/subversion/svnx/features/
	Linux: http://esvn.umputun.com/


Please flag any source code changes you make with a comment that 
includes your initials.

I have the following problem: I need to provide a drop-list with 
two columns. And one of the columns has long texts in it, so that 
you can't read it if the drop-list isn't made extremly wide. Has 
anybody an idea how to best create the GUI for such a selection?

Maybe something like a tooltip would help...

or make it clickable and open a text-window?

Anyway to filter on a table ?

So, only display rows that match a certain criterion?

Can you change the size of text within a table?

how about all the text in a table ?

Ok.  I've give that a go.

So, can I set the font size in a particular table isolated from other 
widgets?

It's rare to come across a GUI (WinXP, Mac) where widgets have arbitrary 
sizes. The intended use of the font attribute is to change things 
other than size (alignment, style, color mostly) ... but even then 
I like to remind myself that in UI design consistency is king.

I've got another idea for a widget that I've seen around.  Basically 
it's a type of tabbed style.  You have a number of say tables aligned 
vertically, but the data is not visible.  You click on the header 
of the table, and the table expands vertically to show the data, 
while other open tables collapse down to make space.

hummm drop down list is a nightmare of coding ... this is typically 
(in my opinion) one of the easyly doable in C/C++ but tricky to do 
with rebol. Tricky but why ?? Mainly because of the speed when you 
have to redreaw the main pane and the scrolling interface

Hmm.  Carl's one is pretty snappy .. but it's not done as a style.

I have done extremely advanced styles in rebol, including a video 
editing timeline with scalable time and slideable tracks,  and face 
can be extremely fast when its used properly.  The only issue so 
far was Draw speed (fixed with AGG) and slow face blitting (cpu based). 
 Otherwise, if your face is not full screen, you can scroll 300000 
cell tables 10 times a second... (yes with advanced styles and resizing 
and the like).

I did a demo of this at devcon 2004, its was a test within glayout. 
 Sorry to say I'm currently too busy to have fun :-(

Claude, I just wanted to make sure people know that face is effective 
and fast... I can give a quick pointer... to make VID faces fast, 
I had to remove all the code within feel/redraw.  Using feel/redraw 
is a major performance hit when doing large layouts.

I like it also.



I fact there is a super set that Fireworks uses.  In addtion to the 
up down open close stuff, it...

Allows you to tear the off as thier own windows.
Doc the windows over other windows, which become horz tabs.
Reorder them.

We are currently working on this for the new Framework.

Outlook bar control would be a good addition to rebgui.

how can I avoid that the used words in a RebGUI layout are added 
to the global context?

But now I got a problem: I use some drop-lists that have much more 
entries than fit on the screen. When doing this I now get the following 
error, if I use any of my drop-lists:

** Script Error: Out of range or past end
** Where: action
** Near: result: pick data first picked

The problem is in file: rebgui-widgets.r inside the choose function. 
I don't have a clue what I have changed in my app to trigger the 
problem.

The bad thing is... it's a show stopper at the moment.

How can I access the SVN repository via a client? What URL do I have 
to use?

Here is a short example when it fails:
rebol []

;--- Startup
if system/product == 'Link [

 attempt [call reduce ["d:\rebol\view\rebol.exe" system/script/header/file] 
 quit]

 attempt [call reduce ["c:\programme\rebol\view\rebview.exe" system/script/header/file] 
 quit]

 attempt [call reduce ["c:\rebol\view\rebol.exe" system/script/header/file] 
 quit]
	quit
]

;-- use xpeers framework structure
link-root: first split-path system/script/path
link-root: copy/part link-root index? find link-root "/xpeers/"
append link-root %xpeers/
do link-root/framework/anamonitor300.r
do link-root/framework/slim.r

;-- RebGUI stuff

#include %rebgui.r unless value? 'ctx-rebgui [do link-root/framework/libraries/rebgui.r]

;-- SLIM stuff
slim/open 'debug none ; [mark-my-words]
; mark-my-words/init

unit-size: 4
font-size: 12
tab-size: 120x55

display/min-size "CalcIT" compose/deep [
	label "Land"
	drop-list 60 data ["A" "B"] return
] 1024x768
do-events
halt

this is strange...  here is a stupid first  test, try to call rebgui 
after slim... does that change anything?

I would like to see a widget that allows scrolling of other widgets 
contained inside it.

In fact I wonder if the need for a tree view indicates a poor design?

it is also a pity, Henrik's grid does not work with RebGUI (although 
not supporting my favourite horizontal scroll :-)

We have a drop down in RebGUI that when we click off does not close, 
any hints?

Well, that is a hint, I will ask Richard.  Thanks.

Works well, although it stll requires a click outside the popup for 
it to be dismissed (not merely moving the mouse pointer off the list 
as some have requested). Also note that this changes the behaviour 
of clicking from one drop-list to another (you have to click the 
new drop-list button twice ... once to dismiss the old list and now 
a second time to activate the new list). Note that the first hide-popup 
in the choose function (line 405) is no longer needed with this change.

View's modal system can handle closing on moving the mouse away, 
you just need to set a custom handler.

I think requiring a click outside is good behaviour, but it is only 
good if that click is not consumed, but passed on (so that the second 
drop-list  activates straight away)..

Agreed.  


One more subtle point, on Windows, both in Firefox browser, and in 
products like Word, the behavior is:


Moving your mouse over Droplist-1 highlights it (this is true of 
all widgets)
Droplist-1 is clicked on, and opens.

Moving the mouse to Droplist-2 does not highlight, because the first 
widget is engaged.

Clicking on Droplist-2 closed Droplist-1, and highlights Droplist-2, 
but does not engage it (open Droplist-2).


Of note, even something as simple as a checkbox on Windows has 8 
states:

Unchecked
Checked
Unchecked highlighted
Checked highlighted
Unchecked ghosted 
Checked ghosted
Button down unchecked
Button down checked


I strongly vote copying the most used UI in the world on every little 
detail.  They might not be "right" but they are the popular vote.

RebGui has some rough edges, but over all it has been really easy 
to build stuff with.  Ashley, on our Qfile client application, we 
are putting in the Credits RebGUI, and a ink to your site.  We will 
post a beta on Qtask and if you want something changed just tell 
us.

one uses a svn client.

And if I didn't, Ashley has a list of clients on his main page at 
http://trac.geekisp.com/rebgui

So, I'll be looking for a non GUi client.

Interesting.  I made a joke to a freind of mine about how I keep 
getting depressed learning about the features of some given product 
that is version 2.  I look at the product that is version 2 that 
is missing important features, and then wonder, what did version 
one have?

Version 1, our light switch features "on." 

Version 2, in addition to the much loved "on" feature, you can now 
turn the light "off"

I really feel this way about SVN and CVS.

Might be related to the discussion above:

If I have a 'field that uses an on-unfocus event and I enter some 
test and than click on a drop-down list, the on-unfocus event for 
the field isn't generated.

How can I create something like a STYLE to avoid always having to 
specify things like
	font [align: 'right]

Here's a patch to group-box which makes the top line font-size sensitive:

have you thought of asking Ashley for a write access account to the 
svn?

Geomol, I was enlightened to hit the public cache with a few ;;;;;

tables: Is it possible to change the column layout of a table after 
it was layouted? I have a space where I display a table that changes 
it's layout depending on the context of the app. Sometimes it has 
2 than 5 columns and different column labels.

tab-panels: If I use nested tab-panels and add a pre-enter action 
for the nested tab, it's not executed for the first tab shown. As 
this tab is implicitly shown if the parent tab is clicked, the action 
doesn't seemed to be triggered.

If you're inside an area field with some text, and a slider showing, 
and if you position the slider to the bottom, and then click inside 
the area, the text scrolls back so you're not at the bottom anymore.

Ok, submitted a ticket to the trac.

Graham, this patch to the area/pane (slider) action makes things 
better:

				action:	make function! [face /local pos new] [

     ;	don't alter scroll if the last function to touch it was edit-text!!!
					unless parent-face/key-scroll? [

      parent-face/para/scroll/y: negate parent-face/text-y - parent-face/size/y 
      + 3 * data

						if system/view/caret [
							system/view/caret: 
								offset-to-caret parent-face 
									new: min max 
									(pos: caret-to-offset parent-face system/view/caret)

         0x0 ; <-- should add height of one line of text, to keep caret fully 
         visible

         parent-face/size - (face/size * 1x0) ; <- should subtract height 
         of one line of text
						

       ;print [parent-face/size pos new parent-face/para/scroll/y index? 
       system/view/caret]
						]

						show parent-face
					]
					parent-face/key-scroll?: false
				]


It also needs this patch to work correctly, near the top of rebgui-widgets.r:


 ; Unfortunately, offset-to-caret returns end of the string when offset 
 is between two lines, 

 ; which is only possible when indent/y > 0. This ought to be submitted 
 to rambo as a rebol/view bug.
	; I would not use indent until it is fixed.

 ; offset-to-caret needs to work correctly to allow the new area widget 
 functionality of keeping
	; the caret visible when scrolling. -Anton


 ;default-para-wrap: make default-para [origin: 2x0 indent: 0x2 wrap?: 
 true]

 default-para-wrap: make default-para [origin: 2x0 indent: 0x0 wrap?: 
 true]

Yes, I need to do a bit more to "sell" the whole collaborative dev 
idea; plus I think folks need a bit of hand-holding to use SVN. Perhaps 
a "5 easy steps to making a change" type guide?

I'll spend a bit of time today updating my site and the Wiki before 
we go public on the ML and RebolTalk.

RebGUI 0.4.2 is up. Grab it the usual way with:

	do http://www.dobeash.com/get-rebgui.r


You may want to delete view-root/public/www.dobeash.com/RebGUI first 
as a number of old files are now redundant.

This build is the latest snapshot of the repository and includes:


 - %rebgui.r is now a single monolithic (72Kb single line) script 
 (individual source files are in SVN)
	- Cyphre's drop-list change
	- Anton's quit [not] when only one pane remains
	- clear-text and show-text fixes
	- led widget fix (failed when encap'ed)
	- language file for Italian added
	- %tour.r Opera icons replaced with Tango Desktop equivalents


Also note that the RebGUI home page has moved to http://www.dobeash.com/RebGUI/
and that all active issues / tickets can now be found (and updated) 
at http://trac.geekisp.com/rebgui/report/1

Yeah sorry guys, I spent almost an hour the other day just installing 
Tortoise for SVN, because my windows installer was too old.

A window popped open to suggest that  get a newer service pack. I 
got it going in the end by running automatic updates and updating 
just the windows installer. It worked in the end, without restarting 
the machine, but then I'd run out of time to actually submit anything.

How can we now make a change to rebgui.r? Do you have published the 
build-script that creates rebgui.r?

How can I use the RebGUI LAYOUT function? I just need to get back 
the face that I can append to a PANE. I get the following error:

>> ctx-rebgui/layout material/gui
** Script Error: color needs a value
** Where: append-widget
** Near: color: any [attribute-color color] image: any