World: r3wp

can you show some demo code ...

display "Test button focus to area" [
   button "Pos" [
      show-focus ar-text
      system/view/caret: at ar-text/text 10
      show ar-text
   ]
   ar-text: area {1234567890

When I click on the button, the caret is positioned between 9 and 
0,

but when I release the button, the focus changes back to the button}
]
do-events

so when you tab back into the area, you want to keep the 0,9 caret 
position?

Not exactly. What I want is, that clicking on the button focuses 
the area, and that I am now able to directly type in the area.

oh ...

and, at the given position, yes.

Thinking aloud: I guess that the show-focus ar-text should be placed 
in the unfocus event of the button?

yes

but show-focus probably sets the cursor to the end again

I'll try to do some patching now ... sorry, I'm on a modem line, 
and need to be erachable by phone, so bye for now.

The following works with button, but not with text-list (which I 
want to use) ...

display "Try to change feel" [
   tl: text-list  feel [
      engage: func [f a e][
         print a
      ]
   ]
   data [ "click"]
   [print 'action]
]
do-events
probe tl/feel
halt

Graham, now that you show me the code, which is now available here
http://anton.wildit.net.au/rebol/rebgui/add-remove-tab-panels.r
I can almost remember writing it !

Ok, the technique used to add/remove tabs from the tab-panel looks 
quite destructive, replacing all the old tab faces with new ones 
whenever a tab is added or removed.

So, writing to the old faces won't make things happy

if you have widgets in the old tabs .. are they destroyed as well?

No, shouldn't be. Just the little tab faces themselves are removed 
and forgotten.

Sorry, I have some connection problems, so here's the second part 
to above message ... again ... ;-)

When I run the above posted snippet, and click on the text-list, 
I get an output of "action", so the action block is run, not the 
changed engage function.

The 'probe shows, that the engage function has been changed in the 
way I have defined it.

So it seems, that RebGUI holds to an old version of engage for text-lists.

hello, where we can find the rebgui.grid done cyphre => http://www.xidys.com/rebgui-grid.jpg

it is very  great !

It is still in testing.

ok thanks for the answer ;-)

Ask Pekr for a copy of the beta version.

do you have a little bug too on widget table. when i run tour.r and 
select  list    text-list  and do a maxime of the windows, the little 
line between two column still stay little !!!!!  (excuse me for ma 
english :-p)

use the trac to enter bugs.

http://trac.geekisp.com/rebgui- view existing tickets and if not 
there, please add it.

oups the bug is not on text-list but in table widget

i don't find the way to input the ticket !!!

Hmm.  The add ticket menu is removed!

We were starting to get spam tickets being raised, so you must login 
to raise a ticket now. I've just verified the table error Claude 
found so I'll raise a ticket or fix it which ever is quicker.

What do you use for a ticket system?

trac

Is there a way to trigger an action when the table row changes highlight? 
 If I reorder things using the column headers, the highlight changes 
and I want to initiate an action based upon that.

Perhaps it's a bug that the highlight changes at all when you sort?

Trac?

http://trac.geekisp.com/rebgui/report

** Script Error: foreach expected data argument of type: series
** Where: next-field

** Near: foreach sibling siblings [if target: any [tabbed? sibling 
into-widget/forwards sibling] [return target]] al

display "Main Window" [
	button "Click Me!" [
		display "Bug Window" [

   label "Select a value from the drop list and then tab out" return 
			drop-list "Focus here" 20 data [ "A" "B" ] return 
			button "quit" [ halt ] 
		]
	]
]

do-events

this must be none : siblings: compose [(face/parent-face/pane)]

not series I mean

I have some questions about Trac, but will move it over to AltME/Rebol3/!Qtask

Can someone add this ticket ... thanks.

hi i would like to insert in table.r widget this code :

;BEG propose en new func by Claude 
	add-rows: func [
		rows [block!]
	][
		pos: 1 + length? data
		insert at data pos rows
		redraw
	]
	;END

for add a block of rows a once !!!!

and this other function to remove-allr-rows   ;-)

;BEG propose en new func by Claude 
	remove-all-rows: func[][
		remove/part skip data (length? data) cols
		redraw
	]
	;END

i do not be able to suscribe to track.geekisp.com  to have a login 
:-(

Ask Ashley for a login name

Noted.

Me too.

I've forwarded both requests to Jaime, shouldn't be longer than a 
day or so.