"Детектор движений" - ActiveX-компонента для 1С
39Дополнительные возможности
Описание
Внешняя компонента для 1С: Предприятие 8.0, 1С: Бухгалтерия 7.7, 1С: Торговля и склад 7.7, 1С: Зарплата и кадры 7.7, ОС Windows, 1С: Предприятие 8.1
анализирует avi-файлы (должны быть установлены соответствующие кодеки).
При детекции движений записывает в видеофайл (avi). Поддерживает 4 алгоритма детекции.
*** Для работы компоненты потребуется установленный 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)
или использовать совместно с хранилищем внешних компонент: http://infostart.ru/projects/2863/
*** Добавление на форму 1С:
v7: Использовать 1С++:
Перем Детектор;
Процедура ПослеОткрытия()
Детектор = СоздатьОбъект("АктивИкс");
Детектор.УстановитьАтрибут(Форма, "АктХ");
//"АктХ" - идентификатор элемента диалога, на месте которого будет создан элемент ActiveX.
//только для реквизитов диалога типа "Текст".
Детектор.СоздатьЭУ("Душелов.ДетекторДвижений");
Детектор.УстановитьФокус();
КонецПроцедуры
Процедура АктХ_ПриВозникновенииОшибки(Сообщение)
Сообщить("Ошибка: " + Сообщение);
КонецПроцедуры
Процедура АктХ_ПриДетекцииДвижения(Время, Сообщение)
Сообщить("Зафиксировано движение: " + Время);
КонецПроцедуры
v8: Меню "Форма" - "Вставить ActiveX..." - Выбрать элемент "Душелов.ДетекторДвижений"
*** Параметры:
КАТАЛОГ, В КОТОРЫЙ ЗАПИСЫВАЮТСЯ ВИДЕОФАЙЛЫ:
- КаталогСохраненияВидео
*** Методы:
ЗАКРЫТЬ:
Закрыть(); //обязательно надо вызывать для прекращения работы с видеопотоком.
ВЫБРАТЬ КАМЕРУ:
ВыбратьКамеру(); //вызывает встроенный диалог
ВыбратьКамеру_2(ИндексУстройства);
ОТКРЫТЬ ССЫЛКУ JPG:
ОткрытьСсылкуJPG(); //вызывает встроенный диалог
ОткрытьСсылкуJPG_2(УРЛ);
ОТКРЫТЬ ССЫЛКУ MJPG (видеопоток):
ОткрытьСсылкуMJPG(); //вызывает встроенный диалог
ВОткрытьСсылкуMJPG_2(УРЛ);
ВЫБРАТЬ КАМЕРУ:
ОткрытьВидеоФайл(); //вызывает встроенный диалог
ОткрытьВидеоФайл_2(ПутьКФайлу);
ДЕТЕКЦИЯ:
ОтключитьДетектор();
ВключитьДетектор1();
ВключитьДетектор2();
ВключитьДетектор3();
ВключитьДетектор3Оптимизированный();
ВключитьДетектор4();
ЗАПИСЫВАТЬ ВИДЕО ПРИ ДЕТЕКЦИИ:
ВключитьЗаписьПриДетекцииДвижений();
ОтключитьЗаписьПриДетекцииДвижений();
ПРЕДУПРЕЖДЕНИЯ О ДЕТЕКЦИИ:
ВключитьПредупреждениеОДвижениях();
ОтключитьПредупреждениеОДвижениях();
*** События:
- ПриВозникновенииОшибки(Сообщение)
- ПриДетекцииДвижения(Время, Сообщение)
Скриншоты
Скачать
| Наименование | Размер | Скачиваний 242 |
Доступ |
| ДетекторДвижений | 90 kb | 243 | Зарегистрированные |
Оценка сообщества
|
Плюсы (+39):
, , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , , |
Добавить плюс Добавить минус
Комментарии (38)
Рекомендуется для совместного использования с конфигурациями для проходной: http://infostart.ru/projects/2617/ или http://infostart.ru/projects/2614/
Yahooeю, дорогая редакция...
+2!
еще бы при детекции движения определять "вектор" - тогда вход-выход можно будет определять автоматически...
..а, как я на "слабо" вас взялл????
;-)
Вектор вычислить можно... Вопрос в погрешности распознавания. На домашней вебкамере достаточно много погрешностей из-за искуственного света, соответственно блики на кожаном кресле распознаются, как движение. Хотя, за кошкой наблюдало. В принципе, есть же еще и камеры, которыми автоматически можно удаленно управлять - вращать за объектом.
Ну а вход-выход можно опеределить... Все зависит от того, под каким углом установлена камера, один или несколько проходов и т.д.
(7) Я думал на счет пары моментов, типа команды жестами ;) или автоматически сворачивать все окна, при приближении кого-то к твоему компьютеры ;)
Без активных зон, без регулирования чувтвительности,
без исходников -
скорее всего для программистов это просто забава.
Ни изменить, ни доработать, avi.
Если заказчик для автора только и найдется.
Хотя может и ошибаюсь.
Лет 5 назад в придачу к Studio видел.
Тогда интересно было. Но avi.
Сейчас из поля зрения выпало.
Хотя подборку публикаций делаю.
Много чего разработано.
Исходники - интересно глянуть.
>кому надо, подобных примеров в инете нароют тьму целую...
Суть тогда вложенного труда и рекоммендаций для применения.
Может отобрали наилучший образец ?
Думаю как направление для развития 1с.
Толчок для развития дали.
Сейчас жди, посыплются из рога изобилия.
(13) А что я? Просто встретил в инете идейку, захотелось реализовать, поковырялся до 4 утра и готово :)
(15) Ну если есть еще идеи, как доработать этот детектор - буду рад выслушать и дописать по возможности.
(11)> в инете нароют тьму целую...
Я имел ввиду, желающие рыть найдутся.
(16)Может Вы просто провоцируете программеров на азарт, на конкурентную борьбу.
В любом случае - достойно уважения!
(15) Ну если есть еще идеи, как доработать этот детектор - буду рад выслушать и дописать по возможности. а может можно научить еще не тока детектить движение но и распознавать картинки например, Автомобильные номера и прочее.
(18) Распощнавание - это уже ковырять надо в области нейронных сетей... Тут уже технология другая.
(18)
Доработать до уровня... Диапозон: для конечного потребителя -:- программера 1с?
(19)
Распознование цифровых не искаженных символов с нарушенной изометрией отображения проблем нет.
На практике уже применяется, например: роботы прописываются на форумах.
Проблема с точностью, если мусор и шумы.
Алгоритмы - множество. Привичная область - текущая. Восстанновление пакетов передачи данных.
--------------------------------------------------------------------------------------------------------------
Ставлю + "Душелов" за идейный толчок.
Ставлю + "Душелов" за взятие на себя руководящего и направляющего направления.



Как обычно, пример для 7.7 выложу позже, хотя те, кто хочет - может по описанию подключить, благо доступ ко всем методам есть в контекстном меню компоненты.