На этой неделе пытался разобраться с Детектором лиц ...
Код для дельфи брал тут
https://sourceforge.net/p/delphi-opencv ... 0969c0aaf3
Конвертировал в лазарус, поправил библиотеки,собрал пример но пока не работает ...
Показывает один кадр при старте а дальше окно просто виснет ...
(Думаю дело в том что вместо таймера юзается Idle + мьютекс при старте зачем-то мучат... )
Есть код прямо на лазарусе но там но он для простого примера переусложнен и компонентов для сборки хочет .
Код тут https://forum.lazarus.freepascal.org/in ... ic=31851.0
точнее тут https://github.com/six1/Laz_OpenCV_2
Вообщем кто-то эти примеры в Лазарусе собирал
(Готовый бинарник с Laz_OpenCV_2 не шатко не валко работает но интересует именно возможность собрать / модифицировать )
Добавлено спустя 16 часов 43 минуты 41 секунду:
"Оптимизм наше все!"
Собрал рабочую версию с дополнительным ускорением за счет изменения разрешения рабочего битмапа...(То что было в заложено в примере было не доделано и вообще не работало...)
Прикол моего способа в том, что я масштабирую кадр/картинку средствами канваса.
FaceDetect.7z
Главный интерес этого примера в том что там есть возможность использовать множество разных "каскадов" для распознавания чего угодно, а не только лиц.
Зы
В который раз удивляюсь "странной" работе с данными Битмапа в LCL вон в OpenCV нет никаких блокировок и все прекрасно работает . Так КАКОГО извините черта нужна вся эта возня с блокировками?