 |
| faire défiler un texte horizontalement | |
| sebastien | 11-Jan-2008/22:01:03+1:00 |
| Bonjour je suis actuellement sur un projet ou je dois faire défiler un texte en continue horizontalement J'ai trouvé en cherchant cela REBOL [ ] text: "mon texte qui doit defiler en continue " b: length? text c: 0 roller: layout [ credits: text white bold center 240x200 rate 100 para [origin: 200x+100] feel [engage: func [f a e] [ if a = 'time [f/para/origin: f/para/origin - 1x0 show f c: c + 1 if c > b [f/para/origin: 0x+100 show f]] ] ] ] credits/text: text view roller mais le resultat n'est pas concluant quelqu'un aurait une idée merci d'avance | |
| sebastien | 11-Jan-2008/22:02:26+1:00 |
| j'ai oublié c'est en rebol 1.3 | |
| guest2 | 11-Jan-2008/23:30:06+1:00 |
Ce code marche en 1.3.2
REBOL [
]
texte: {le texte qui doit defiler en continue...
Un frame rate de 100 fps
ça fait un peu beaucoup.
Le truc c'est de faire varier l'offset de la face
et non le margin du texte.
Fait gaffe à l'absence du mot clé as-is aussi,
ça modifie quelque peu le contenu du texte.
}
roller: layout [
credits: text as-is texte white bold rate 50
feel [engage: func [f a e] [
f/offset: f/offset - 1x0
if f/offset/x + roller/size/x < 0 [
f/offset/x: roller/size/x
]
show f
]]
]
credits/offset/x: roller/size/x
view roller
| |
| guest2 | 11-Jan-2008/23:34:21+1:00 |
| Tant que j'y pense et avant d'aller en week-end, il me semble qu'un type a fait un roller à la Star Wars. Il me semble que ça doit trainer sur rebol.org quelque part, ptet bien dans les demos. | |
| sebastien | 12-Jan-2008/0:13:13+1:00 |
| merci cela ce rapproche de ce que je veux mais je desire n'avoir qu'une ligne et que la taille de la fenetre soit fixe et ne change pas selon le texte | |
| Guest2 | 12-Jan-2008/0:44:10+1:00 |
REBOL [
]
texte: {Le texte qui doit defiler en continue... En gros si je comprends bien, faut tout te faire.}
roller: layout/size [
credits: text texte as-is 5000 white bold rate 50
feel [engage: func [f a e] [
f/offset: f/offset - 1x0
if f/offset/x + f/size/x < 0 [
f/offset/x: roller/size/x
]
show f
]]
] 200x100
credits/offset/x: roller/size/x
credits/size: 10x0 + size-text credits
credits/color: roller/color: black
view roller
| |
| Guest2 | 12-Jan-2008/0:50:29+1:00 |
Je parie que ça ne va pas encore être ça  | |
| sebastien | 12-Jan-2008/9:29:07+1:00 |
| et non c'est exactement ce que je recherchait merci pour ton aide | |
|
Login required to Post. | |