Здравствуйте.
Есть задача: в browse (список документов) необходимо выделять одинаковым цветом строки с документами за одну дату таким образом, чтобы при изменении даты группы документов цвет переключался. Ну что-то такое зеброобразное. Например 5 документов за 06.03.2008 - color:silver, 2 документа за 07.032.2008 color:none? потом перерыв в документах, 3 документа за 09.03.2008 - color:silver и т.д. Чет / нечет даты не годится из-за возможных разрывов, а также из-за стыка месяцев. Особенно неприятно обрабатывать всяческие скроллинги.
Пробовал ли кто-нибудь решить?
CW6.3 ABC
Спасибо
Александр Т.
Раскраска brows
Clarion, Clarion 7
Модератор: Дед Пахом
Правила форума
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
SSTA
-
- Ветеран
- Сообщения: 311
- Зарегистрирован: 08 Июль 2005, 22:04
lsgsoftware
- Admin
- Администратор
- Сообщения: 4012
- Зарегистрирован: 05 Июль 2005, 15:59
- Откуда: Хабаровск
- Благодарил (а): 53 раза
- Поблагодарили: 34 раза
- Контактная информация:
Re: Раскраска brows
типа вот так ... см. пример в атачеlsgsoftware писал(а):Посмотри примеры к клаше(examples).Там такого добра хватает
все очень просто. не учитывается добавление и удаление записей.
- Вложения
-
- demo.zip
- пример гринбара по датам
- (23.12 КБ) 253 скачивания
Рай совершает ошибки ничуть не реже чем ад. Просто у него хорошая пресса
Admin
Re: Раскраска brows
Вот как я сделал в CW 6.3 9056 ABC
Процедура Browse
Embeds -> Local Objects -> ABC Objects -> Browse on Table Using ?Browse:1 (BrowseClass) -> SetQueueRecord -> Code -> Parent Call -> Sounce (Priority 8000)
И тама пишем условие раскраски, например
if MAI:RLast=2
SELF.Q.ART:DisplayName_NormalFG = CSS:TzFore
----------------- ^ Это название поля
SELF.Q.ART:DisplayName_NormalBG = CSS:TzBack
--------------------------------^ а здесь автоматически добавляемые цветовые атрибуты Browse
SELF.Q.ART:DisplayName_SelectedFG = CSS:TzForeSel
---------------------------------------------------^ ну а здесь набор цветов из таблицы
SELF.Q.ART:DisplayName_SelectedBG = CSS:TzBackSel
... Такой же код и для всех других полей
Else
...
.
Вроде бы работает
Процедура Browse
Embeds -> Local Objects -> ABC Objects -> Browse on Table Using ?Browse:1 (BrowseClass) -> SetQueueRecord -> Code -> Parent Call -> Sounce (Priority 8000)
И тама пишем условие раскраски, например
if MAI:RLast=2
SELF.Q.ART:DisplayName_NormalFG = CSS:TzFore
----------------- ^ Это название поля
SELF.Q.ART:DisplayName_NormalBG = CSS:TzBack
--------------------------------^ а здесь автоматически добавляемые цветовые атрибуты Browse
SELF.Q.ART:DisplayName_SelectedFG = CSS:TzForeSel
---------------------------------------------------^ ну а здесь набор цветов из таблицы
SELF.Q.ART:DisplayName_SelectedBG = CSS:TzBackSel
... Такой же код и для всех других полей
Else
...
.
Вроде бы работает
Apron63
Вернуться в «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
- ↳ Ресурсы
- ↳ Работа
- ↳ Обо всем ...
- ↳ Обсуждение этого Форума (типа, Гостевая книга)