Smart Zoom

Программы на Clarion, шаблоны, библиотеки и пр.

Модератор: Дед Пахом

Правила форума
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
Аватара пользователя
Игорь Столяров
Ветеран движения
Сообщения: 7327
Зарегистрирован: 07 Июль 2005, 10:19
Откуда: г. Ростов-на-ДоМу
Благодарил (а): 13 раз
Поблагодарили: 48 раз

Smart Zoom

Сообщение Игорь Столяров »

Дед Пахом писал(а): 07 Январь 2019, 21:27есть продукты SysList, SysTree, вот с ними полная совместимость.
Есть небольшой вопрос по совместимости со штатным EIP - не устанавливает текущий размер шрифта LIST. Пардон ! :)

EIP.jpg
За теми кто отстал - не возвращаться. (С) Кодекс
Аватара пользователя
Дед Пахом
Старичок
Сообщения: 3131
Зарегистрирован: 07 Июль 2005, 16:51
Откуда: Москва, Россия
Благодарил (а): 10 раз
Поблагодарили: 28 раз
Контактная информация:

Smart Zoom

Сообщение Дед Пахом »

Игорь Столяров писал(а): 10 Январь 2019, 17:30Есть небольшой вопрос по совместимости со штатным EIP
Так штатный EIP и сам по себе плюёт на размер шрифта в листе, без всякого Smart Zoom.
С уважением, ДП
Аватара пользователя
Игорь Столяров
Ветеран движения
Сообщения: 7327
Зарегистрирован: 07 Июль 2005, 10:19
Откуда: г. Ростов-на-ДоМу
Благодарил (а): 13 раз
Поблагодарили: 48 раз

Smart Zoom

Сообщение Игорь Столяров »

Дед Пахом писал(а): 10 Январь 2019, 17:50Так штатный EIP и сам по себе плюёт на размер шрифта в листе
Оно как бы да, но !
Если размер шрифта в списке фиксированный, то можно настройки выставить в EditInPlace::MyColumn.Init и нет вопросов.

Но если шаблон меняет размер шрифта LIST по некому алгоритму, то по нему же надо пересчитывать и используемые стили
для ?List и EIP соответственно, т.к. простая вставка:

Код: Выделить всё

  Self.FEQ{Prop:FontSize} = ?List{Prop:FontSize}
уже не решит вопрос.
За теми кто отстал - не возвращаться. (С) Кодекс
Аватара пользователя
Дед Пахом
Старичок
Сообщения: 3131
Зарегистрирован: 07 Июль 2005, 16:51
Откуда: Москва, Россия
Благодарил (а): 10 раз
Поблагодарили: 28 раз
Контактная информация:

Smart Zoom

Сообщение Дед Пахом »

Я в EIP не очень разбираюсь, умозрительно надо бы задавать размер шрифта каждый раз, когда EIP активируется.
С уважением, ДП
Аватара пользователя
Дед Пахом
Старичок
Сообщения: 3131
Зарегистрирован: 07 Июль 2005, 16:51
Откуда: Москва, Россия
Благодарил (а): 10 раз
Поблагодарили: 28 раз
Контактная информация:

Smart Zoom

Сообщение Дед Пахом »

Посмотрел, как EIP устроено, по мне так достаточно в .CreateControl() после PARENT.CreateControl задать все нужные свойства:

Код: Выделить всё

Self.FEQ{Prop:FontSize} = ?List{Prop:FontSize}
!и все другие, какие требуются.
С уважением, ДП
Аватара пользователя
Игорь Столяров
Ветеран движения
Сообщения: 7327
Зарегистрирован: 07 Июль 2005, 10:19
Откуда: г. Ростов-на-ДоМу
Благодарил (а): 13 раз
Поблагодарили: 48 раз

Smart Zoom

Сообщение Игорь Столяров »

Дед Пахом писал(а): 11 Январь 2019, 11:40по мне так достаточно
Да - это очевидное решение … но не совсем верное. Для LIST ещё ведь могут применяться стили оформления.
За теми кто отстал - не возвращаться. (С) Кодекс
Аватара пользователя
Дед Пахом
Старичок
Сообщения: 3131
Зарегистрирован: 07 Июль 2005, 16:51
Откуда: Москва, Россия
Благодарил (а): 10 раз
Поблагодарили: 28 раз
Контактная информация:

Smart Zoom

Сообщение Дед Пахом »

Дед Пахом писал(а): 11 Январь 2019, 11:40и все другие, какие требуются.
вот тут и стили, и всё остальное.
С уважением, ДП
Аватара пользователя
RaFaeL
✯ Ветеран ✯
Сообщения: 1376
Зарегистрирован: 24 Март 2009, 17:59
Откуда: НН
Благодарил (а): 7 раз
Поблагодарили: 1 раз
Контактная информация:

Smart Zoom

Сообщение RaFaeL »

Потестировал
При использовании XPTheme не меняется размер шрифта в заголовке (в данных меняется)
Кроме этого, приложение не собирается, если на экране текстовый контрол задан как Group.str (через точку), валится в ошибки (это с XPTheme не связано)
Аватара пользователя
Игорь Столяров
Ветеран движения
Сообщения: 7327
Зарегистрирован: 07 Июль 2005, 10:19
Откуда: г. Ростов-на-ДоМу
Благодарил (а): 13 раз
Поблагодарили: 48 раз

Smart Zoom

Сообщение Игорь Столяров »

RaFaeL писал(а): 02 Февраль 2019, 15:33шрифта в заголовке (в данных меняется)
Упс ! А разве существует раздельная установка размера для шрифта заголовка и собственно самой тушки LIST ?!
За теми кто отстал - не возвращаться. (С) Кодекс
Аватара пользователя
Дед Пахом
Старичок
Сообщения: 3131
Зарегистрирован: 07 Июль 2005, 16:51
Откуда: Москва, Россия
Благодарил (а): 10 раз
Поблагодарили: 28 раз
Контактная информация:

Smart Zoom

Сообщение Дед Пахом »

RaFaeL писал(а): 02 Февраль 2019, 15:33если на экране текстовый контрол задан как Group.str (через точку)
Насчёт этого - лечится добавлением 3-го параметра (вместо точки двоеточие) в USE:
USE(Group.str,,?Group:str)
С уважением, ДП
Аватара пользователя
RaFaeL
✯ Ветеран ✯
Сообщения: 1376
Зарегистрирован: 24 Март 2009, 17:59
Откуда: НН
Благодарил (а): 7 раз
Поблагодарили: 1 раз
Контактная информация:

Smart Zoom

Сообщение RaFaeL »

Игорь Столяров писал(а): 02 Февраль 2019, 17:08Упс ! А разве существует раздельная установка размера для шрифта заголовка и собственно самой тушки LIST ?!
Тут надо понимать, как работает XPTheme ) Там идет переопределение контролов, они рисуются как бэ независимо от кларионовского рантайма, поэтому там может быть все что угодно ) Я собственно поэтому сразу про XPTheme и спросил, тут как бэ получается "кто кого" ))
Аватара пользователя
Дед Пахом
Старичок
Сообщения: 3131
Зарегистрирован: 07 Июль 2005, 16:51
Откуда: Москва, Россия
Благодарил (а): 10 раз
Поблагодарили: 28 раз
Контактная информация:

Smart Zoom

Сообщение Дед Пахом »

Выяснилось, что до версии Clarion 10.12211 был косяк с PROP:WndProc применительно к контролам drop list:
readme_10.0.12211.txt писал(а):FIX: Dropped list sub-control subclassed by setting the PROP:WndProc property instead of entire control
Исправил в последней версии.
С уважением, ДП
Ответить