Help with text scroll in /View
[1/3] from: carlos:lorenz:bol at: 10-Sep-2003 17:12
Hello list
I need a help to make the msg/text scroll up
when area is full of text.
Thank you
Carlos
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
REBOL[
]
loop: func[time][
msg/text: rejoin [msg/text time newline]
show msg
]
view layout [
title {Scrool ?}
msg: area 160x120
button "click me" [
loop now
]
]
__________________________________________________________________________
Acabe com aquelas janelinhas que pulam na sua tela.
AntiPop-up UOL - É grátis!
[2/3] from: antonr::iinet::net::au at: 11-Sep-2003 16:43
Just quick initial investigations...
Look into here:
print mold get in ctx-text 'edit-text
area/feel uses edit-text when keys are pressed,
so look how it handles down key, for example.
Also try this example, but you can see some
hardcoded stuff.
view layout [
a: area 200x40
button "add" [
append a/text rejoin [now/time/precise newline]
a/para/scroll: (size-text a) * 0x1 / 1x-1 + 12x46
show a
]
]
Better to try to see how edit-text works.
Anton.
[3/3] from: carlos:lorenz:bol at: 11-Sep-2003 8:54
Thank you very much Anton,
That what I was in need
Carlos
Em Qui 11 Set 2003 08:43, Anton Rolls escreveu:
> Just quick initial investigations...
> Look into here:
<<quoted lines omitted: 38>>
> > ]
> > ]
--
Carlos Lorenz
--
Kurumin é 10
www.kurumin.org
Notes
- Quoted lines have been omitted from some messages.
View the message alone to see the lines that have been omitted