Вот динамически создал create:string
PROP:Use сделал, пишу:
feq{prop:text}=pictvalue
естественно, на экране вместо текста переменной с форматом pictvalue само значение pictvalue
а вот как динамически формат менять?
Поменять picture элементу STRING
Clarion, Clarion 7
Модератор: Дед Пахом
Правила форума
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
AnDS
OVV
AnDS
Admin
потому, что должно.Admin писал(а):А по чему оно должно меняться? По моему ты сам его ДОЛЖЕН менять...
я меняю значение переменной, а display отображает это изменение на экране.
Вот:
Код: Выделить всё
STRING(@s60),AT(145,47,165,10),USE(loc:JQ:ActionName),TRN,FONT(,,COLOR:Blue,,CHARSET:ANSI), #ORIG(?String3)
Какой формат? Я хочу поменять @s60 на @s100, например.Admin писал(а): А вот то что тебе хотелось я понял. Как и сказали, юзай FORMAT
Или вообще на @N020
Само значение формата хранится в переменной типа STRING
?loc:JQ:ActionName{prop:text}=formatstring
Ну, может ты имеешь ввиду prop:format? Так этот проп вроде для List используется?
Мне кажется, что мы друг-друга не понимаем.

AnDS
- Admin
- Администратор
- Сообщения: 4010
- Зарегистрирован: 05 Июль 2005, 15:59
- Откуда: Хабаровск
- Благодарил (а): 53 раза
- Поблагодарили: 33 раза
- Контактная информация:
Может и я туплю... х.з.
Вот так попробовал - все работает.
Вот так попробовал - все работает.
Код: Выделить всё
PROGRAM
MAP
END
LOC:Format STRING(10)
LOC:String STRING(100)
DIN:String EQUATE(10)
Window WINDOW('Caption'),AT(,,191,122),FONT('MS Sans Serif',8,,FONT:regular),CENTER,GRAY,DOUBLE
ENTRY(@s100),AT(69,18,47,11),USE(LOC:Format)
BUTTON('Change format'),AT(47,84,97,14),USE(?Button1)
END
CODE
LOC:Format = '@S10'
OPEN(Window)
CREATE(DIN:String,CREATE:ENTRY)
SETPOSITION(DIN:String,27,38,137,12)
(DIN:String){PROP:Text} = '@S2'
(DIN:String){PROP:Use} = LOC:String
(DIN:String){PROP:Hide} = FALSE
ACCEPT
CASE ACCEPTED()
OF ?Button1
DIN:String{PROP:Text} = LOC:Format
END
END
MESSAGE(LOC:String)
CLOSE(Window)
Рай совершает ошибки ничуть не реже чем ад. Просто у него хорошая пресса
Admin
Вернуться в «CLARION for Windows»
Перейти
- CW
- ↳ CLARION for Windows
- ↳ CLARION for Internet
- ↳ Clarion.NET
- Эксклюзив
- ↳ Приват
- CLARION и...
- ↳ Reports
- ↳ Железо
- ↳ Готовые программы, шаблоны, библиотеки...
- ↳ cJSON
- ↳ LibCurl
- ↳ MAV
- ↳ SQL, Oracle, ...
- ↳ Multi-программирование(Pascal/Delphi, и т.д.)
- ↳ WinDev
- DOS
- ↳ CLARION for DOS
- Разное
- ↳ Новости
- ↳ English
- ↳ Ресурсы
- ↳ Работа
- ↳ Обо всем ...
- ↳ Обсуждение этого Форума (типа, Гостевая книга)