*** Для работы компоненты потребуется установленный Microsoft .NET Framework 2.0, который можно скачать отсюда.
и зарегистрировать компоненту в Windows - запустить reg.bat
или использовать совместно с хранилищем внешних компонент: //infostart.ru/projects/2863/
В архиве примеры для 1С 7.7 и 8.1
*** Подключение:
Перем Трей;
ПОДКЛЮЧЕНИЕ КОМПОНЕНТЫ В 1С 7.7:
ИмяВК="AddIn.Tray1C";
Попытка
ПодключитьВнешнююКомпоненту(ИмяВК);
Исключение
Сообщить("Не удалось подключить компоненту "+ИмяВК);
КонецПопытки;
Попытка
Трей = СоздатьОбъект(ИмяВК);
Исключение
Сообщить("Ошибка создания объекта внешней компоненты: "+ ИмяВК);
КонецПопытки;
ПОДКЛЮЧЕНИЕ КОМПОНЕНТЫ В 1С 8.x:
ИмяВК="AddIn.Tray1C";
Попытка
ПодключитьВнешнююКомпоненту(ИмяВК);
Исключение
Сообщить("Не удалось подключить компоненту " + ИмяВК);
КонецПопытки;
Попытка
Трей = Новый(ИмяВК);
Исключение
Сообщить("Ошибка создания объекта внешней компоненты: " + ИмяВК);
КонецПопытки;
*** Свойства:
- Заголовок //текст, отображающийся при наведении мышкой на значок
- МигатьВТрее //булево
- МигатьВПанелиЗадач //булево
- ПоказыватьВПанелиЗадач //булево
- Иконка //путь к файлу *.ico
- НомерСтандартнойИконки //число, от 1 до 7
- ВыводитьЯзыкВвода //булево
- ВыводитьСлужебныеСообщения //булево
*** Методы:
ИНФОРМАЦИЯ О ВЕРСИИ КОМПОНЕНТЫ:
Трей.ОКомпоненте();
СИСТЕМНЫЙ ТРЕЙ:
Трей.Показать();
Трей.Скрыть();
РАБОТА С ОКНОМ 1С:
Трей.УстановитьЗаголовокОкна(ЗаголовокОкна); //устанавливает произвольные текст в заголовок окна 1С
Трей.ПоказатьОкно();
Трей.СкрытьОкно();
Трей.РазвернутьОкно();
Трей.СвернутьОкно();
Трей.ВосстановитьОкно();
УВЕДОМЛЕНИЯ:
Трей.Мигать(ИспользоватьМигание); //ИспользоватьМигание - булево
Трей.Сообщить(ТекстСообщения, ТекстЗаголовока, НомерИконки, Таймаут); //НомерИконки - от 0 до 3
Трей.ВсплывающееСообщение(ТекстСообщения, ТекстЗаголовока, Таймаут, Линк); //Линк - строка, которая будет передана в событии нажатие на сообщение
Трей.ВсплывающееОкно(ЗаголовокОкна, Таймаут, Линк); //Линк - строка, которая будет передана в событии нажатие на сообщение
МЕНЮ:
Трей.ОчиститьМеню();
Трей.ДобавитьПодменю(Заголовок, ТекстПодменю); //если заголовок будет равен "-", то вставится разделитель
Трей.ДобавитьВМеню(Заголовок, ТекстПодменю); //если заголовок будет равен "-", то вставится разделитель
*** ВНЕШНЕЕ СОБЫТИЕ (Источник = "Tray1C", отрабатываются в обработке внешнего события):
События окон (Событие = "Окно")
- Свернуто
- Восстановлено
- Развернуто
- Скрыто
- Открыто
События меню (Событие = "Меню"):
- Открыть (по-умолчанию, при открытии окна 1С)
- <произвольная строка> (как задана в методе "ДобавитьВМеню")
События сообщения (Событие = "ВсплывающееСообщение"):
- <произвольная строка> (как задана в параметре "Линк" метода вызовы сообщений)
События сообщения (Событие = "ВсплывающееСообщениеЗакрыто"):
- <произвольная строка> (как задана в параметре "Линк" метода вызовы сообщений)
Использованы иконки, взятые тут, спасибо автору: //infostart.ru/projects/2328/
ИСТОРИЯ:
29.06.2009:
- добавлена возможность вывода языка ввода в строке состояния 1С 8.х
30.01.2009:
- добавлено всплывающее окно (любое окно из 1С) (пока для 1С 8.х)
- добавлен показ окна служебных сообщений при появлении в нем сообщений (пока для 1С 8.х)
29.01.2009:
- добавлено всплывающее сообщение и изменение заголовка окна 1С
