不会卡的摄像头控件TesoSeeu.ocx调用

By admin at 2021-11-28 • 1人收藏 • 433人看过

最近发现videocapx控件调用摄像头会导致usb摄像头显示卡顿 , 以前一直以为usb摄像头电脑上插的多了就是这样, 偶然测试发现并不是, 是控件里面处理的时候貌似有问题.

于是想起来之前用过一个TesoSeeu.ocx控件 , 这个貌似不会卡, 

除了没有镜像翻转功能外, 显示是没问题的.

原帖子:https://bbs.aardio.com/forum.php?mod=viewthread&tid=22517

今天测试了下, 确实不会卡画面.... 可惜没有源码, 要不然试试加个镜像功能...

import win.ui;
/*DSG{{*/
mainForm = win.form(text="双摄像头显示演示";right=765;bottom=479)
mainForm.add(
VpWindow={cls="custom";text="custom";left=0;top=0;right=766;bottom=480;bgcolor=8421376;db=1;dl=1;dr=1;dt=1;z=1}
)
/*}}*/

import Vcapocx;
var vpW = Vcapocx(mainForm.VpWindow);
//获取摄像头数量
var cont = vpW.getDevCnt();
if(cont){
	vpW.openCapDev(1);
}

mainForm.onClose = function(hwnd,message,wParam,lParam){
    //关闭摄像头
    vpW.closeCapDev(1);
}

mainForm.enableDpiScaling();
mainForm.show();

return win.loopMessage();

摄像头ocx.zip


多个摄像头的话

import win.ui;
/*DSG{{*/
mainForm = win.form(text="双摄像头显示演示";right=1164;bottom=465)
mainForm.add(
VpWindow={cls="custom";text="custom";left=0;top=0;right=579;bottom=454;bgcolor=8421376;db=1;dl=1;dr=0.5;dt=1;z=1};
VpWindow2={cls="custom";text="custom";left=585;top=0;right=1164;bottom=454;bgcolor=8421376;db=1;dl=0.5;dr=1;dt=1;z=2}
)
/*}}*/

import Vcapocx;
var vpW = Vcapocx(mainForm.VpWindow);
vpW.openCapDev(1);

var vpW2 = Vcapocx(mainForm.VpWindow2);
vpW2.openCapDev(2);

//获取摄像头数量
var cont = vpW.getDevCnt();

mainForm.onClose = function(hwnd,message,wParam,lParam){
    //关闭摄像头
    vpW.closeCapDev(1);
    vpW2.closeCapDev(2);
}

mainForm.enableDpiScaling();
mainForm.show();

return win.loopMessage();


不想用库的简易用法:

import com.activeX;
try{
	com.CreateObject("{7EEAA4B5-DE19-493F-950C-4053B77195D2}");
}
catch(e){
	..com.activeX.appData("\aardio\TesoSeeu.ocx",$"\res\TesoSeeu.ocx")
}

var capx = mainForm.createEmbed("{7EEAA4B5-DE19-493F-950C-4053B77195D2}")._object;
capx.OpenCapDev(1,0);

mainForm.onClose = function(hwnd,message,wParam,lParam){
    //关闭摄像头
    capx.CloseCapDev(1);
}


1 个回复 | 最后更新于 2021-12-21
2021-12-21   #1

登录后方可回帖

登 录
信息栏
公告:
个人博客
专注分享
可在分享中适当提问
谢绝纯提问
否则不再提醒一律
删帖
谢谢合作!



本站域名:HtmLayout.Cn
aardio可以快速开发上位机,本站主要记录了学习过程中遇到的问题和解决办法及aardio代码分享

这里主要专注于aardio学习交流和经验分享.
纯私人站,当笔记本用的,学到哪写到哪.

Aardio 官方站:Aardio官方
Aardio最新功能:Aardio官方更新日志
本 站 主 站:Stm32cube中文网
Sciter中文在线文档Sciter在线学习文档
空间赞助:才仁机械
Loading...