[RToolTips] Динамические подсказки v.1.2.3
Программирование - Работа с интерфейсом
Текст подсказки формируется подобно HTML странице и может включать форматирование с использованием различных шрифтов, цветов, графики.
Текст подсказки и картинки могут быть загружены из отдельных файлов, файлов, содержащих ресурсы, из библиотеки картинок конфигурации.
Окно подсказки может иметь округлую форму, хвост, тень, может быть полупрозрачным. Окно может появляться постепено и так же исчезать.
v.1.2.3
- Исправлена (еще раз) ошибка появления подсказок у невидимых реквизитов
v.1.2.1
+ Добавлен объект RMsgWindow2 аналог объекта в RWidjets, только с возможностью вывода в окно не просто текста, а форматированного текста.
- Решена проблема с чрезмерной загрузкой процессора
- Удалены лишние стандартные подсказки в многострочной части
Варианты применения или зачем нам это нужно.
1. Подсказки реквизитов формы как таковые. Наверняка, большинство разработчиков ленятся писать подсказки к атрибутам на форме, как ленятся писать комментарии в коде. И зря. Подсказки позволяют быстрее разбираться, где что на форме, в какой реквизит что нужно заносить, подобно тому, как комментарии позволяют быстрее разобраться в чужом коде. Это очевидно.
Динамические подсказки позволяют повысить эффективность работы с формой. В первую очередь, путем цветового выделения текста, таблиц, графики. Преимущества такого подхода перед простым текстом также очевидны. Во вторую очередь текст подсказки может меняться в зависимости от заполнения соседних реквизитов, от текущего пользователя и пр.
2. Подсказки табличных частей документов, журналов, справочников, таблиц значений. В стандартном варианте мы можем указать подсказки, которые будут показаны при наведении курсора на заголовок табличных частей (таблица значений исключение). В ячейках таблиц подсказки появляются с текстом самой ячейки. И то через раз.
С помощью динамических подсказок можно выводить текст ячейки под курсором. Например, строку неограниченной длинны можно увидеть полностью. Можно получать развернутые пояснения к иконкам в таблице или другим колонкам, в которых кратко указан какой-либо статус. Можно выводить подсказку для колонки таблицы, когда курсор находится не только над заголовком таблицы, но и над строками колонки.
3. Вывод содержимого реквизита. Часто реквизит слишком маленький в нем не прочитать весь текст полностью. В первую очередь это касается текстовых реквизитов неограниченной длины. Их можно прочитать, перемещая текст с помощью полосы прокрутки. А если это не многострочный текст и часть текста не видна, то вообще не удобно. В этом случае гораздо удобнее выводить весь текст в окне подсказки.
4. Реквизиты агрегатных объектов предоставляют скудную строку с видом, номером документа или наименованием, кодом элемента справочника. Можно, конечно, добавить на форму дополнительные реквизиты, в которые поместить всю необходимую информацию, но это не всегда удобно, занимает место на форме, трудоемко. Гораздо удобнее выводить такую информацию в подсказке.
Скачать файлы
| Наименование | Файл | Версия | Размер | |||
|---|---|---|---|---|---|---|
|
RToolTips v.1.2.3
.1193600399 224,43Kb
14.01.15
237
|
.1193600399 | 224,43Kb | 237 | Скачать |
См. также
Специальные предложения
конкурс надо объявить на самое нужное использование данной фичи...
помню как до этого мучился через AutoItX3.Control ... так теперь не поленился и все переписал под RToolTipsManager... намного убоднее и код выглядит красиво ...
Автору : так что не слушай тех кто говорит "у меня типа уже много ДЛЛ-ек подключено .. бла-бла-бла"... у меня их тож не много кто оценит - подключит еще одну .. вобщем отдельный респект ! и "+" однозначно ...
но вот хотелось бы еще одну фишечку ... дабы была возможность работы ПриВыводеПодсказкиТаблицы из глобального модуля ... т.к. формы диалога оч часто закрываются после вывода печатной формы ...
И еще замечена одна особеность .. если делать ЗагрузитьВнешнююКомпоненту("RToolTips.dll"); в ПриНачалеРаботыСистемы(), то при входе дает "Программа была завершена аварийно .. и т.д." но не всегда ..
закономерность еще не выявил ...
Но вообще за разработку 5 балов !
Решена v.1.2.1 Прошу заинтересованных товарищей потестировать
но вот хотелось бы еще одну фишечку ... дабы была возможность работы ПриВыводеПодсказкиТаблицы из глобального модуля
Есть такая фишечка. Используйте на здоровье.
Для этого лучше сделать одну глобальную переменную типа RToolTipsManager и привязывать таблицы к ней. В этом случае менеджер будет следить за таблицей независимо от наличие формы, из которой таблица сформирована. Процедура ПриВыводеПодсказкиТаблицы будет срабатывать только в глобальном модуле, если вы не будете привязывать менеждера к какой-либо форме.
Форма внешней обработки. 2 слоя. 2 закладки. На первом слое реквизиты, на втором - ТЧ.
Если в реквизите формы 1 слоя есть подсказка, то при переходе по закладке на второй слой подсказки строк ТЧ рушатся.
Если перейти на первый слой - появляются подсказки ТЧ второго слоя.
Беда. SOS!
претензия такая: нужна жесткая фиксация размера окна (сейчас при добавлении новой строки размер увеличивается), и собственно - прокрутка в этом окне (сейчас окно растет, растет, растет, уползает за пределы экрана)
и, наверное, не помешала бы прозрачность
>ПолучитьТекстЯчейки(пИмя, пСтрока, пКолонка);
>Примечание:
>Позволяет получить текст только видимых в данный момент строк и в любых >колонках, в т.ч. невидимых в данных момент, определенных невидимыми в >конфигураторе.
Вопрос:
Могу ли делать так:
На форме обработки есть табличная часть "ТЧ". В модуле формы:
Процедура ПриОткрытии()
..............
ТЧ.НоваяКолонка("Подсказка",,,,,);
ТЧ.ВидимостьКолонки("Подсказка",0,);
.............
КонецПроцедуры
Могу ли увидеть в качестве динамической подсказки - значение, присвоенное колонке "Подсказка" при наведении курсором на строку ТЧ ?
Пока у меня не получилось...
Было бы ОЧЕНЬ удобно!
Что касается ПолучитьТекстЯчейки.
С таблицей значений это фича. Если в многострочных частях скрытая колонка как бы есть, то в таблице значений ее как бы и нет ;)) это особенность реализации 1С.
Рекомендую как-нибудь извратиться. Например:
- добавить просто видимую колонку с текстом подсказки
- добавить просто видимую колонку с текстом в две строки; первая пустая, затем разделитель, вторая с текстом подсказки; вроде, в колонке отображается строка только до разделителя; надо проверить
- добавить зафиксированную строку, что бы не маячила просто строка
Столбец мизерной ширины. Пробелы или СимволТабуляции, чтобы не маячил текст для пользователя. Потом СокрЛ(ТЧ.Подсказка).
Интереснее вставлять разделители. Тогда при обработке строки "ТЧ.Подсказка" появляется возможность динамическую подсказку разделить на несколько строк.
Спасибо, что хоть помогли определиться с ситуацией ;-)
А как быть с слоями формы?
Результат тестирования: Исчезли ЛЮБЫЕ подсказки на реквизитах, визуально расположенных в одном и том же месте на разных слоях формы.
Отлично получилось просто : несколько пробелов + разделитель (у меня ";") + данные + разделитель + данные + разделитель и т.д.
Потом:
Функция ВозвратитьЭлемент(ТекСтр,Номер)
ВидОпер=ТекСтр;
Если Номер=1 Тогда
Для Н=1 По Номер Цикл
ТекН=Найти(ВидОпер,";");
ВидОпер=Лев(ВидОпер,СтрДлина(ВидОпер)-ТекН);
КонецЦикла;
ТекН=Найти(ВидОпер,";");
ВидОпер=Лев(ВидОпер,ТекН-1);
Иначе
Для Н=1 По Номер-1 Цикл
ТекН=Найти(ВидОпер,";");
ВидОпер=Прав(ВидОпер,СтрДлина(ВидОпер)-ТекН);
КонецЦикла;
ТекН=Найти(ВидОпер,";");
ВидОпер=Лев(ВидОпер,ТекН-1);
КонецЕсли;
Возврат ВидОпер;
КонецФункции
Процедура ПриВыводеПодсказки(пТекст, пИмяАтрибута, пХ, пУ, пСтрока, пКолонка)
......................
лТекст12=СокрЛП(мМенеджерПодск.ПолучитьТекстЯчейки("ТаблицаАнализа", пСтрока, 12));
.......................
Период_Анализа=ВозвратитьЭлемент(лТекст12, 1);
Дата_Первой_Партии=ВозвратитьЭлемент(лТекст12, 2);
.......................
Коэффициент_Ликвидности=ВозвратитьЭлемент(лТекст12, 14);
Коэффициент_Излишка_Товара=ВозвратитьЭлемент(лТекст12, 15);
........................
// Теперь выводим подсказку
пТекст=Шаблон("<body bgcolor=#99ccff> Артикул: [лТекст2]
// |Строка: [пСтрока] Колонка: [пКолонка]
|
Наименование: [лТекст3]
|<hr size=1>
| Период анализа: [Период_Анализа]
|
Дата первой партии: [Дата_Первой_Партии]
|
Дата конца продаж: [Дата_Конца_Продаж]
|
Продано количество: [Коэффициент_Излишка_Партий]
|");
.................
КонецПроцедуры
Процедура ПриВыводеПодсказки(пТекст, пИмяАтрибута, пХ, пУ, пСтрока, пКолонка)
....................
Если пИмяАтрибута="фл_ABC" Тогда
Попытка
пТекст=Шаблон("<body bgcolor=#9ccff gfc=white>
| Ранжирование асортимента по
|
доле в общей прибыли продаж.
|<hr size=1>
| А - товары, приносящие ВАЖНЫЙ результат
|
В - товары, приносящие СРЕДНИЙ результат
|
С - товары, приносящие СЛАБЫЙ результат
|");
Исключение
КонецПопытки;
КонецЕсли;
...............
КонецПроцедуры
[ДокПеремещениеСтарый.ДатаДок]</b> тогда всё ОК`.
Задолбался размышлять почему так. Причём похожие конструкции работают.
Функция Шаблон работает таким образом, что когда в нее передаешь строку, не содержащую ни одной пары квадратных скобок, то она возвращает пустую строку.
Например:
| Код |
|---|
Шаблон("йцукен[]") = "йцукен"
Шаблон("йцукен") = ""
Показать полностью |
Просто метод УстановитьФорму необходимо вызывать после того, как форма создана. 1С++ и FormEx генерируют специальное событие после создания формы. Без них тоже самое можно сделать через обработку ожидания или как-то еще.
{Îáðàáîòêà.Èçäåëèÿ.Ôîðìà.Ìîäóëü(132)}: Íåóäà÷íàÿ ïîïûòêà ñîçäàíèÿ îáúåêòà (RToolTipsManager)
короче неудачная попытка создать файл!
Регил я файл! только толку то...
МОжет это из за windows vista????
Загрузчик = СоздатьОбъект("ЗагрузчикВК");
Рез = Загрузчик.КодЗагрузки("RVXPLib.dll");
Если Рез.КодОшибки = 0 Тогда
Сообщить(Рез.Результат);
Иначе
Сообщить("Ошибка " + Рез.КодОшибки + РазделительСтрок + Рез.Результат);
КонецЕсли;
Ругается:
Ошибка 5
Не удалось получить идентификатор ВК
@#$, а?
Первое:
МегаОкноСообщ.Парсер.УстановитьТекст("Новый текст");
МегаОкноСообщ.Парсер.Переформировать();
Текст, пардон, не обновляется, пока не переключиться на другое приложение и не вернуться назад.
Второе: мона как-то сразу задавать координаты, в которых его выводить, а то оно мерцает сначала в центре, а потом где мне надо?
Третье: как-то считывать и запоминать текущие координаты окна мона, чтобы пользователь при каждом программном открытии окна не поминал меня незлым тихим, перемещая его в свое любимое место?
Свойство Прятать не работает (при установке в 0 подсказка исчезает при движении мыши).
Извиняюсь, неправильно пользовался.
Еще бывает выбивает 1с-ку. Может это быть связано с тем, что висит справочник товаров, где работает пользователь + он набивает накладные, а для подбора используется та же форма справочника товаров?
Использую эту ВК. На все машинах нормально, кроме одной - 1с-ка упорно валится при попытке СоздатьОбъект("RToolTipsManager"). RVXPLib.dll зарегистрированы, dep, uac, антивири - выключены. Windows 7 x32.
Пробовал даже на пустой базе создатьобъект (мало ли что-то мешает) - тоже не взлетает...
В чем может быть беда?
Сигнатура проблемы:
Имя события проблемы: BEX
Имя приложения: 1cv7s.exe
Версия приложения: 7.70.0.27
Отметка времени приложения: 4573fcd8
Имя модуля с ошибкой: StackHash_0a9e
Версия модуля с ошибкой: 0.0.0.0
Отметка времени модуля с ошибкой: 00000000
Смещение исключения: 041b04e0
Код исключения: c0000005
Данные исключения: 00000008
Версия ОС: 6.1.7601.2.1.0.256.1
Сигнатура проблемы:
Имя события проблемы: APPCRASH
Имя приложения: 1cv7s.exe
Версия приложения: 7.70.0.27
Отметка времени приложения: 4573fcd8
Имя модуля с ошибкой: RVXPLib.dll
Версия модуля с ошибкой: 1.2.3.0
Отметка времени модуля с ошибкой: 4776a34a
Код исключения: c0000005
Смещение исключения: 00014ca6
Версия ОС: 6.1.7601.2.1.0.256.1
Код языка: 1049
Дополнительные сведения 1: 0a9e
Дополнительные сведения 2: 0a9e372d3b4ad19135b953a78882e789
Дополнительные сведения 3: 0a9e
Дополнительные сведения 4: 0a9e372d3b4ad19135b953a78882e789
Вставляю "кнопку" в справочник и вешаю на нее процедуру:
Процедура ПоКнопкеПоказать()
мПодск=СоздатьОбъект("RToolTip");
мПодск.ИмеетТень=1;
мПодск.ИмеетХвост=1;
мПодск.Окружность=3;
мПодск.Прозрачность=210;
мПодск.ВремяПоявления=1000;
мПодск.ВремяИсчезновения=1000;
мПодск.Парсер.УстановитьФайлРесурсов(КаталогПрограммы()+"1crcrus.dll");
мПодск.Парсер.УстановитьТекст("<body bgcolor=#99ccff gfc=white>Для загрузки картинок используется файл ресурсов 1crcrus.dll
|
Картинка загружена по идентификатору IDR_DEL_MARKED
<img res='ico:IDR_DEL_MARKED'>
|
Картинка загружена по идентификатору 209
<img res='ico:#209'>
|");
мПодск.ПоказатьВТочке(100, 100);
КонецПроцедуры
Не чего не происходит. В чем может біть проблема?
Просмотры 25157
Загрузки 19
Комментарии 78
Создание 28.10.07 22:39
Обновление 14.01.15 20:40
№ Публикации 15212
Рубрики Работа с интерфейсом
Кому Программист
Тип файла Компонента, плагин (dll, vbs,..)
Платформа
Оперативный учет 7.7 ,
Бухгалтерский учет 7.7 ,
Расчет 7.7
Конфигурация Конфигурации 1cv7
Операционная система Не имеет значения
Страна Россия
Отрасль Не имеет значения
Налоги Не имеет значения
Вид учета Не имеет значения
Раздел учета Не имеет значения
Доступ к файлу Абонемент ($m)
Код открыт Не указано
|
Онлайн-касса для любой конфигурации 1С 7.7!
|
