[ALLY] Found the reason for "disappearing text"
From: peoyli::algonet::se at: 14-Nov-2000 23:46
Hi,
I recently found out what was causing my (am I the only one who got
this problem ?) texts in some layouts to disappear..
Setting the para/origin/x and para/origin/y values of at least a text
face (ie scrolling) affects every other object's para/origin values.
Now.. What can be done to stop this from happening ?
Is this a feature or a bug ?
/PeO
A small example to play around with:
;-
REBOL [
Title: "ViewTest"
Version: 0.0.3
Author: "PeO"
File: %viewtest.r
Email: [peoyli--algonet--se]
Purpose: {Just to test something}
Comment: {
Current problem:
Every face's para/origin/y and para/origin/x values is affected when
changing one of them.
The action block of the "+y" "-y" "+x" "-x" updates the affected faces
to make the bug more visible.
Remove the action blocks, and try hovering over the buttons down below,
and notice that the text has moved..
Bug or a feature ?
The problems exists at least on the Amiga and Solaris versions of View
0.10.38
}
]
appname: "ViewBug 0.0.3"
fsize: 14
tboxlines: 10
tboxwidth: 500
tboxsize: to-pair rejoin [tboxwidth "x" tboxlines * fsize]
iboxsize: to-pair rejoin [tboxsize/x "x" fsize + 9]
fontspec: [
color: 0.255.0
shadow: none
size: fsize
]
;---------------------------- Main layout ------------------------
main: layout [
backdrop 70.0.100
origin 10x15
at 10x10 ti1: title appname
at 10x30 te1: text "Is this a bug or a feature, and how do I get rid of that feature
?"
at 10x50
text-face: text tboxsize with [
para/origin/y: 0
text: rejoin ["Welcome to " appname]
color: 0.0.0 font: fontspec
]
across space 1
b1: button to-pair reduce [text-face/size/x - 200 24] "Text moves when text-face's origin
is changed"
button 50x24 "+y" [text-face/para/origin/y: text-face/para/origin/y + 5 show text-face
show b1 show ti1 show te1]
button 50x24 "-y" [text-face/para/origin/y: text-face/para/origin/y - 5 show text-face
show b1 show ti1 show te1]
button 50x24 "+x" [text-face/para/origin/x: text-face/para/origin/x + 5 show text-face
show b1 show ti1 show te1]
button 50x24 "-x" [text-face/para/origin/x: text-face/para/origin/x - 5 show text-face
show b1 show ti1 show te1]
]
;---------------------------- Display GUI ------------------------
view/title/offset main appname 500x500
