r3wp [groups: 83 posts: 189283]
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

World: r3wp

[View] discuss view related issues

[unknown: 5]
11-Dec-2008
[8366x2]
http://www.tretbase.com/downloads/AVG.jpg
The tabs role vertically.
Henrik
11-Dec-2008
[8368]
yes, I see
Nicolas
12-Dec-2008
[8369x2]
does anyone know how to change the text-list highlight color?
I can change it with system/view/vid/vid-colors/field-select. But 
I can't change the font color at the same time.
Henrik
12-Dec-2008
[8371]
text-list is an iterated face, so you probably have to study how 
it paints each row.
Nicolas
14-Dec-2008
[8372]
is a pane a face?
Geomol
14-Dec-2008
[8373x2]
I see a pane as a block of faces. But the pane is in a graphical 
object, which represents a face, so I guess, you can also say, that 
a pane is a face.
Try this in the REBOL console:

b: make face [size: 100x100 color: red pane: []]
b1: make face [size: 20x20 color: green offset: 20x20]
b2: make face [size: 20x20 color: blue offset: 60x60]
append b/pane b1
append b/pane b2
view b


To close the window, click in REBOL console, press <Esc> and type:
unview
Henrik
14-Dec-2008
[8375]
A pane can both be a face and a block of faces. A layout created 
with LAYOUT is a face. A window is also a face. A face is an object. 
A face can hold another face or a block of faces in PANE.
Anton
14-Dec-2008
[8376]
Pane as face:

b: make face [size: 100x100 color: red pane: []]
b1: make face [size: 20x20 color: green offset: 20x20]
b/pane: b1
view b
amacleod
17-Dec-2008
[8377x2]
I get an error...
 clip: read-clip
** Script Error: h.desktop-window has no value
** Where: read-clip
** Near: require h.desktop-dc: get-dc h.desktop-window
require
For clipboard.r script
ChristianE
17-Dec-2008
[8379]
Have you tried it from console or via running a script? Does your 
script open a window?
amacleod
17-Dec-2008
[8380]
That's from the console.
ChristianE
17-Dec-2008
[8381]
In a fresh console, does


>> do http://www.rebol.org/download-a-script.r?script-name=clipboard.r
write clipboard:// "Test" read-clip
connecting to: www.rebol.org
Script: "Clipboard" (10-Dec-2008)
== "Test"

work? Which Rebol version do you use?
amacleod
17-Dec-2008
[8382x4]
REBOL/View 2.7.6.3.1 14-Mar-2008
Just to be sure I'm using it right...
 do %clipboard.r
>> clip: read-clip
** Script Error: h.desktop-window has no value
** Where: read-clip
** Near: require h.desktop-dc: get-dc h.desktop-window
require

Write-clip works
read-clip with text works
can't read-clip on bitmaps
Graham
17-Dec-2008
[8386]
it never worked with bitmaps
ChristianE
17-Dec-2008
[8387x2]
Doh. Silly typo introduced by refactoring. Updated script. Works 
with bitmaps again, now.
Hopefully, for you, too now, that is.
amacleod
17-Dec-2008
[8389]
Nope...same error!
Maxim
17-Dec-2008
[8390]
rebol does not use the vista default browser... can anyone tell me 
what I must do for it to work?


even altme is using explorer, although every thing is set to firefox... 
even mime types.

it works everywhere except in rebol-related apps  :-(
Ammon
17-Dec-2008
[8391]
Strange.  Rebol is using the default browser for me running on Vista.
Maxim
17-Dec-2008
[8392x2]
damn, graham told me it worked for him too!
my install is very standard on top of it.  i don't play a lot with 
the os... it just breaks everything.
Ammon
17-Dec-2008
[8394x2]
Funny, I tweak EVERYTHING... =D
If you just look at my desktop you'd think I was running 2K not Vista...
ChristianE
18-Dec-2008
[8396x2]
Alan, what I did was updating the script on rebol.org, so if you 
get the exact same error message that's likely turning into a caching 
problem now. The script doesn't even contain the word H.DESKTOP-WINDOW 
anymore, so, if your original error (which is confirmed) persists, 
it should at least lead to different error message. Of course, I'd 
rather see it being gone. Would you mind ching the script you're 
using for version 0.3.1, dated 18-12-2008?
ching = checking
Geomol
18-Dec-2008
[8398]
Maxim, if Vista has a registry too, then you might have the same 
problem, Graham had, and that he just fixed. See group DevCon2008 
and this:

http://newoldthing.wordpress.com/2007/03/23/how-does-your-browsers-know-that-its-not-the-default-browser/
amacleod
18-Dec-2008
[8399]
ChristianE, I downloaded again and it works! This is great! I had 
use of this for a few apps in the past but had given up. I love it!

Thanks a lot.
[unknown: 5]
18-Dec-2008
[8400]
John, Vista does have a registry.
ChristianE
19-Dec-2008
[8401]
Thanks, Alan, good to know it works for you.
Sunanda
19-Dec-2008
[8402]
A View problem:

rebol []
  unview/all
  view layout [button "butt" [request-list "req" [1 2 3]]]
  
Sequence:
1. run the above code

2. click "butt" to get the pop-up request list. Do not interact with 
it! instead:
3. return to the console window and hit esc
4. run the coee again

Result:
 a stuck window
 

Any ideas what I need to do in addition to the unview/all to disable 
whatever the request-list is waiting for?
Henrik
19-Dec-2008
[8403]
does hide-popup work?
Sunanda
19-Dec-2008
[8404]
Sadly, not -- at least not when used like this:

  rebol []
  unview/all
  hide-popup
  view layout [button "butt" [request-list "req" [1 2 3]]]
Henrik
19-Dec-2008
[8405x2]
unview/all must go
(did not test, but hide-popup replaces unview)
Sunanda
19-Dec-2008
[8407]
Does not seem to work either :-(
Henrik
19-Dec-2008
[8408]
then perhaps we have a bug?
Gabriele
20-Dec-2008
[8409]
hide-popup first, then unview/all; but it is an unsupported thing 
you are doing, so you may actually need to reset the internal state. 
I can hunt it down for you if you need me to.
Sunanda
20-Dec-2008
[8410]
Thanks....But that still hangs for me under 2.7.6.

  rebol []
  hide-popup
  unview/all
  view layout [button "butt" [request-list "req" [1 2 3]]]


I'm actually tracking down a bug report from a live application .... 
I know it's an unlikely sequence of events, but someone out there 
tried it. It'd be good to have the magic to make it work when they 
try again :-)
Anton
20-Dec-2008
[8411x5]
I got it ! (this old $#%& of a bug.)
WAKE-EVENT DO EVENT is normally expected (via some GUI action) to 
do HIDE-POPUP, and WAKE-EVENT usually

straight afterwards fixes up SYSTEM/VIEW/POP-FACE (ie. setting it 
to NONE when all requestors are closed).

However, when this process is interrupted in DO EVENT (by pressing 
Escape in the console),
then this fix-up is skipped, and POP-FACE remains set.

So HIDE-POPUP, issued at the console, will not fix POP-FACE (eg. 
set it to NONE).

This means the next VIEW -> WAKE-EVENT will act as if there is a 
requestor open, and return the wrong

result (FALSE, because the incorrect POP-FACE is not found in the 
correctly empty POP-LIST),
and therefore WAIT will return immediately.


The one-line solution seems to be to patch WAKE-EVENT to fix POP-FACE 
when it's not found in POP-LIST,
just before POP-FACE is checked.


 if all [pop-face not find pop-list pop-face][pop-face: none] ; <--- 
 Added by Anton. Fix POP-FACE when it's not found in POP-LIST (eg. 
 HIDE-POPUP was done at the escaped console, not by WAKE-EVENT DO 
 EVENT, as usual, here).
	either pop-face [ ...
Here is the magic patch. Please test and see if it works for you. 
I've only tested it lightly.
system/view/wake-event: func [port /local event no-btn] bind [
    event: pick port 1
    if none? event [

        if debug [print "Event port awoke, but no event was present."]
        return false
    ]

 if all [pop-face not find pop-list pop-face][pop-face: none] ; <--- 
 Added by Anton. Fix POP-FACE when it's not found in POP-LIST (eg. 
 HIDE-POPUP was done at the escaped console, not by WAKE-EVENT DO 
 EVENT, as usual, here).
    either pop-face [

        if in pop-face/feel 'pop-detect [event: pop-face/feel/pop-detect 
        pop-face event]
        do event
        found? all [
            pop-face <> pick pop-list length? pop-list
            (pop-face: pick pop-list length? pop-list true)
        ]
    ] [
        do event
		empty? screen-face/pane
    ]
] system/view
A little bit of dancing is required here.