Hi,
I have the same bug with SDK.
Here is a quick patch to activate Didier's patch. (area-scroll)
That's work now ?
-------
if true [;change here
;all [system/version/1 =3D 1 system/version/2 =3D 2 system/version/3 < 16=
] [
if not find svv/vid-styles 'scroller [
alert "Sorry, area-scroll needs 'scroller style not available in=20
this Rebol/View version !" quit
]
ctx-access: context [
field: context [
-------
Charles.
Yvan a =E9crit :
>Hello Anton and Josh,
>
>both scripts (Didiers and yours) stop at the same place (access has no
>value), see output below.
>
>What is this access thing? Something my Rebol Core misses? I have Core 2=
.5
>
>
>
> =20
>
>>>do %demo-scroll-area.r
>>> =20
>>>
>** Script Error: access has no value
>** Where: stylize
>** Near: access: make access [
> set-face*: func [face value] [
> if face/area/para [face/area/para/scroll: 0x0]=20
> face/area/text: form value=20
> face/area/line-list: none=20
> face/feel/resize face none
> ]=20
> get-face*: func [face] [face/area/text]=20
> clear-face*: func [face] [
> if face/area/para [face/area/para/scroll: 0x0]=20
> face/area/text: attempt [clear face/area/text]=20
> face/area/line-list: none=20
> face/feel/resize face none
> ]=20
> reset-face*: func [face] [clear-face* face]
>]
>
>
>On 11.01.2005, you wrote:
>
> =20
>
>>Some other people have competing scrolling area
>>styles, like me :)
>>
>>do load-thru http://www.lexicon.net/antonr/rebol/gui/demo-scroll-area.r
>>
>>I believe last time the issue was hot, that Didier's
>>style became superior to mine when he added the
>>"drag from inside to outside causes scroll" feature.
>>
>>Anton.
>>
>> =20
>>
>>>The 'FIELD style does not have scroll bars. You will have to use a
>>>style that has them. One example of this is Didier's area style.
>>>
>>>http://www.cs.grin.edu/~shirema1/codedb/rebol/scrollers.r
>>>
>>>Hopefully that helps
>>>
>>>josh
>>>
>>>
>>>On Mon, 10 Jan 2005 17:56:06 +0100, Yvan <[EMAIL PROTECTED]> wrote:
>>> =20
>>>
>>>>The content is to large to be displayed completely. I would=20
>>>> =20
>>>>
>>>expect that I
>>> =20
>>>
>>>>should be able to open a text field with scrollbars to allow me=20
>>>> =20
>>>>
>>>to scroll
>>> =20
>>>
>>>>with the mouse through the text field, but I don't see how.
>>>>
>>>>Can somebody give me a hint?
>>>>
>>>>Cheers
>>>>Yvan
>>>> =20
>>>>
>Regards
>
> =20
>
--
To unsubscribe from the list, just send an email to rebol-request
at rebol.com with unsubscribe as the subject.
