*** Для работы компоненты потребуется установленный Microsoft .NET Framework 2.0, который можно скачать отсюда.
http://www.microsoft.com/downloads/details.aspx?displaylang=ru&FamilyID=0856eacb-4362-4b0d-8edd-aab15c5e04f5
и зарегистрировать компоненту в Windows - запустить reg.bat
(для удаления информации о компоненте в Windows - запустить unreg.bat)
или использовать совместно с хранилищем внешних компонент: //infostart.ru/projects/2863/
*** Добавление на форму 1С:
v7: Использовать 1С++:
Перем Часы;
Процедура ПослеОткрытия()
Часы = СоздатьОбъект("АктивИкс");
Часы.УстановитьАтрибут(Форма, "АктХ");
//"АктХ" - идентификатор элемента диалога, на месте которого будет создан элемент ActiveX.
//только для реквизитов диалога типа "Текст".
Часы.СоздатьЭУ("Душелов.АналоговыеЧасы");
Часы.УстановитьФокус();
КонецПроцедуры
Процедура АктХ_ПриАктивацииНапоминания(Время, Сообщение)
Сообщить(Строка(Время) + ": " + Сообщение);
КонецПроцедуры
Процедура АктХ_ПриДвойномЩелчкеМышки()
Сообщить("Двойной щелчок мышкой");
КонецПроцедуры
v8: Меню "Форма" - "Вставить ActiveX..." - Выбрать элемент "Душелов.АналоговыеЧасы"
*** Параметры
- ЦветЧасовойСтрелки
- ЦветМинутнойСтрелки
- ЦветСекунднойСтрелки
- ЦветДелений
- Показывать1МинутныеДеления //булево
- Показывать5МинутныеДеления //булево
*** Методы:
//ЗАПУСТИТЬ ЧАСЫ:
Старт();
//ОСТАНОВИТЬ ЧАСЫ:
Стоп();
//ДОБАВИТЬ НАПОМИНАНИЯ:
ДобавитьНапоминание(Время, Сообщение);
//УДАЛИТЬ НАПОМИНАНИЯ:
УдалитьНапоминания();
//ПОЛУЧИТЬ НАПОМИНАНИЯ
ПолучитьНапоминания(); //возвращает массив строк с напоминаниями
*** События:
- ПриАктивацииНапоминания(Время, Сообщение)
- ПриДвойномЩелчкеМышки()
*** ИСТОРИЯ:
20.05.2008:
- первая пробная версия
21.05.2008:
- добавлена работа с напоминаниями (будильник)
- добавлены события
- добавлено контекстное меню