REBOL Изменить изображение и текст

REBOL В настоящее время я пытаюсь переделать небольшое приложение, которое я сделал в Delphi. Это приложение отображает фоновое изображение среди n и текст среди n, но я не могу изменить изображение или текст, изменение изображения и текста выполняется кнопкой >>.REBOL Изменить изображение и текст

Это упрощенный код без случайной части, потому что я узнал об этом:

Rebol[ 
Title: "You have a message !" 
Version: 1.0.0 
Needs: [1.2.115] 
] 

the-imag1: load %"/C/MyFile/Cours CD/Affiche/Images/Vague9.jpg" 
the-imag2: load %"/C/MyFile/Cours CD/Affiche/Images/Vague3.jpg" 
the-image: the-imag1 
text1: "Your banner text here" 

view xx1: layout [ 
size the-image/size 
b1: backdrop the-image 

at b1/offset + 110x120 
box 350x150 font-size 20 font-color black [align: 'center] text1 

    at b1/offset + 530x370 
    btn ">>" [the-image: the-imag2 ; new image 
       text1: "Hello"  ; new text 
       show xx1] effect [multiply 90] 
]

источник

2013-03-15 Georges Bordais

Вы пересматривают лицо, а не только содержание. Просто переопределите нужное вам поле. Попробуйте следующее:

Rebol[ 
    Title: "You have a message !" 
    Version: 1.0.0 
    Needs: [1.2.115] 
] 

the-imag1: load %"/C/MyFile/Cours CD/Affiche/Images/Vague9.jpg" 
the-imag2: load %"/C/MyFile/Cours CD/Affiche/Images/Vague3.jpg" 
the-image: the-imag1 
text1: "Your banner text here" 

view xx1: layout [ 
size the-image/size 
b1: backdrop the-image 

at b1/offset + 110x120 
t1: text text1 

    at b1/offset + 530x370 
    btn ">>" [ 
     b1/image: the-imag2  ; new image 
     t1/text: "Hello"  ; new text 
     show xx1 
    ] effect [multiply 90] 
]

источник

2013-03-15 12:40:39 rebolek

Спасибо, это работает, за исключением того, что я изменил: text1/text by b1/text. Но я заметил, что новый текст появляется за первым, когда он должен его заменить. Наверное, это то же самое с изображением, накапливающимся над первым ... Что можно сделать, чтобы этого избежать? –

А, я виноват, я думал, что ** text1 ** - текстовое лицо. Вы должны добавить имя для своего текстового лица (например, ** text-face: text1 **), а затем вы можете изменить текст, используя ** text-face/text: «Hello» **. Если вы установите текст в ** b1/text **, чем вы устанавливаете текст на фон (см. ** b1: фон-изображение **), вот почему он стоит за первым. – rebolek

Хорошо, но я изменил, потому что получаю эту ошибку с текстом1/text: ** Ошибка скрипта: Недопустимое значение пути: текст ** Где: func [номинал] [b1/image: the-imag1 text1/text : "Coucou" шоу xx1 ] ** Near: text1/текст: "Coucou" шоу xx1 >> –

REBOL Изменить изображение и текст

ответ

Смежные вопросы