Y
yxgszm
Unregistered / Unconfirmed
GUEST, unregistred user!
小弟用VFW软件包做了一个视频捕获程序,视频已成功预览,但是在视频保存的时候要出问题
程序如下:
procedure TForm1.BtnPlayClick(Sender: TObject);
begin
// Start CAP - Video
CapSetVideoArea( Video );
//.创建捕获窗口
CapSetInfoLabel( VideoLabel );
//创建激活信息
//capSetCallbackOnVideoStream(ghCapWnd,Longint(PChar(Mem)));
if CapOpenDriver then
//如果能连接上
begin
CapSetCapSec( 15 * 3 );
CapStart;
//保存AVI文件在本地
CapShow;
//预览
end;
end;
执行过程中没出现问题,在整个过程执行完毕后出现异常:
application-defined exception(code0x0eedfade) at 0x77e4d756
如果注释掉CapStart后,程序不会出错,错误就出在CapStart,但是单步跟踪Capstar发现没有问题,只是整个过程执行完毕后弹出异常。有这方面开发经验的师兄一定要帮帮我啊,小弟已经郁闷得快不行了。
注:引用了两个单元,AviCap和VideoCap,AviCap实现消息发送宏定义,VideoCap实现宏的引用,并完成相关功能。
程序如下:
procedure TForm1.BtnPlayClick(Sender: TObject);
begin
// Start CAP - Video
CapSetVideoArea( Video );
//.创建捕获窗口
CapSetInfoLabel( VideoLabel );
//创建激活信息
//capSetCallbackOnVideoStream(ghCapWnd,Longint(PChar(Mem)));
if CapOpenDriver then
//如果能连接上
begin
CapSetCapSec( 15 * 3 );
CapStart;
//保存AVI文件在本地
CapShow;
//预览
end;
end;
执行过程中没出现问题,在整个过程执行完毕后出现异常:
application-defined exception(code0x0eedfade) at 0x77e4d756
如果注释掉CapStart后,程序不会出错,错误就出在CapStart,但是单步跟踪Capstar发现没有问题,只是整个过程执行完毕后弹出异常。有这方面开发经验的师兄一定要帮帮我啊,小弟已经郁闷得快不行了。
注:引用了两个单元,AviCap和VideoCap,AviCap实现消息发送宏定义,VideoCap实现宏的引用,并完成相关功能。