[REBOL] write a text in vertical way ?
From: sdidierjean::yahoo::fr at: 10-Apr-2002 10:43
Hello,
I would like to know if it's possible to write a text
in vertical way.
What I want to do is to write a text for each value of
a table, but the text is too large. See the example of
what I want to do below.
I also don't understant why I can't change the
font-size option of the text in this draw fonction.
Thanks in advance for your help.
Stéphane
REBOL []
statistiques: layout/size [
tableau: box 550x500 coal effect [ draw [] ]
appel: button "Appel" [
clear tableau/effect/draw
for i 1 40 1 [
j: i * 10
k: i * 10 + 10
emp1: to-pair reduce [j random 470]
emp2: to-pair reduce [k 470]
append tableau/effect/draw reduce [
'fill-pen 'blue
'box emp1 emp2 'white
'text emp2 "text"
;This don't work ->
'text emp2 'font-size 5 "text"
]
]
show tableau
]
] 600x600
inform statistiques