当前位置：文档之家 › QQ摄像头压缩代码

QQ摄像头压缩代码

  • 格式：pdf
  • 大小：145.15 KB
  • 文档页数：7

最新QQ摄像头MPEG4视频压缩发表:sjw阅读:277次关键字：不详字体:[大中小]{最新更新，经过测试，QQ摄像头的帧率20fps，算是不错了。

实时性还可以，位率平均25k左右，完全可以网络传输，视频大小320*240，清晰度挺不错的。

xvid_encFrame.quant可以调整图像质量，数值越到位率越低，质量越差（1~31，最佳为4）}unit main;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,DSUtil,StdCtrls,DSPack,DirectShow9,Menus,ExtCtrls,lib_xvid;typeTVideoForm=class(TForm)FilterGraph:TFilterGraph;VideoWindow:TVideoWindow;MainMenu1:TMainMenu;Devices:TMenuItem;Filter:TFilter;Image:TImage;SampleGrabber:TSampleGrabber;SnapShot:TButton;CallBack:TCheckBox;mmo1:TMemo;lbl1:TLabel;tmr1:TTimer;procedure FormCreate(Sender:TObject);procedure FormCloseQuery(Sender:TObject;var CanClose:Boolean);procedure SnapShotClick(Sender:TObject);procedure SampleGrabberBuffer(sender:TObject;SampleTime:Double;pBuffer:Pointer;BufferLen:Integer);procedure tmr1Timer(Sender:TObject);private//XVID ENCODERxvid_gbl:xvid_gbl_init_t;xvid_enc:xvid_enc_create_t;xvid_encFrame:xvid_enc_frame_t;xvid_encStats:xvid_enc_stats_t;xVid_decode:xvid_dec_create_t;xvid_decFrame:xvid_dec_frame_t;xvid_decStats:xvid_dec_stats_t;publicprocedure OnSelectDevice(sender:TObject);end;constMaxPixelCount=65536;type//Pf24bit真彩色位图像素数据结构体pRGBTripleArray=^TRGBTripleArray;TRGBTripleArray=array[0..MaxPixelCount-1]of TRGBTriple;varVideoForm:TVideoForm;SysDev:TSysDevEnum;FrameBuf:array[0..352*288*3]of Byte;FrameImg:array[0..352*288*3]of Byte;FrameSequece:LongWord=0;spf:TFileStream;xvid_Version:Integer;FrameByteCount:LongWord=0;CurFrame:LongWord=0;implementation{$R*.dfm}procedure TVideoForm.FormCreate(Sender:TObject);vari:integer;Device:TMenuItem;beginxvid_Version:=XVID_MAKE_VERSION(1,1,0);SysDev:=TSysDevEnum.Create(CLSID_VideoInputDeviceCategory); if SysDev.CountFilters>0thenfor i:=0to SysDev.CountFilters-1dobeginDevice:=TMenuItem.Create(Devices);Device.Caption:=SysDev.Filters[i].FriendlyName;Device.Tag:=i;Device.OnClick:=OnSelectDevice;Devices.Add(Device);end;end;procedure TVideoForm.OnSelectDevice(sender:TObject);beginSelf.DoubleBuffered:=True;FilterGraph.ClearGraph;FilterGraph.Active:=false;Filter.BaseFilter.Moniker:=SysDev.GetMoniker(TMenuItem(Sender).tag); FilterGraph.Active:=true;with FilterGraph as ICaptureGraphBuilder2dobeginRenderStream(@PIN_CATEGORY_PREVIEW,nil,Filter as IBaseFilter,SampleGrabber as IBaseFilter,VideoWindow as IbaseFilter);end;try//XVID库初始化操作xvid_gbl.version:=xvid_Version;//Version:1.1.0xvid_gbl.cpu_flags:=Word(XVID_CPU_FORCE or XVID_CPU_ASM);//0:自动检查CPU，XVID_CPU_FORCE or XVID_CPU_ASM：强制使用ASM汇编优化xvid_gbl.debug:=0;//调试级别//初始化编解码xvid_global(nil,XVID_GBL_INIT,@xvid_gbl,nil);//XVID编码器初始化xvid_enc.version:=xvid_Version;//编码器参数xvid_enc.global:=XVID_GLOBAL_PACKED;//全局标志xvid_enc.width:=320;//压缩视频宽度xvid_enc.height:=240;//压缩视频高度xvid_enc.fbase:=3;//基本帧率/每秒=fbase*10=30xvid_enc.fincr:=1;//帧率增长步长，0：可变步长，>1实际增长步长xvid_enc.profile:=XVID_PROFILE_AS_L2;//压缩级别，MPEG4-ASP最高压缩级别xvid_enc.max_key_interval:=0;//最大关键帧间隔xvid_enc.frame_drop_ratio:=0;//丢帧率；0~100xvid_enc.max_bframes:=0;//是否采用B帧，一般采用I，P帧，如果1=PB帧xvid_enc.bquant_offset:=0;xvid_enc.bquant_ratio:=0;//创建编码器xvid_encore(nil,XVID_ENC_CREATE,@xvid_enc,nil);//初始化压缩数据帧结构xvid_encFrame.version:=xvid_Version;//---VOL FLAGSxvid_encFrame.vol_flags:=XVID_VOL_MPEGQUANT OR XVID_VOL_QUARTERPEL OR XVID_VOL_GMC;//---VOP FLAGSxvid_encFrame.vop_flags:=XVID_VOP_INTER4V or XVID_VOP_CHROMAOPT;xvid_encFrame.motion:=XVID_ME_HALFPELREFINE16or XVID_ME_CHROMA_PVOP or XVID_ME_ADVANCEDDIAMOND16;//运动估计xvid_encFrame.quant:=4;//质量控制=量化参数，0~31，数值越小质量越高和码率成反比xvid_encFrame.coding_type:=XVID_TYPE_AUTO;//XVID_TYPE_AUTO=让编码器自动决定，I帧编码是关键帧，P帧编码是帧内预测//XVID解码器初始化xVid_decode.version:=xvid_Version;xVid_decode.width:=320;xVid_decode.height:=240;//创建解码器xvid_decore(nil,XVID_DEC_CREATE,@xVid_decode,nil);spf:=TFileStream.Create('c:\test.mp4',fmCreate or fmOpenReadWrite);exceptExit;end;FilterGraph.Play;end;procedure TVideoForm.FormCloseQuery(Sender:TObject;var CanClose:Boolean); beginCallBack.Checked:=False;SysDev.Free;FilterGraph.ClearGraph;FilterGraph.Active:=false;//关闭编解码器if Assigned(xvid_enc.handle)thenxvid_encore(xvid_enc.handle,XVID_ENC_DESTROY,@xvid_enc,nil);if Assigned(xVid_decode.handle)thenxvid_decore(xVid_decode.handle,XVID_DEC_DESTROY,@xvid_decode,nil);end;procedure TVideoForm.SnapShotClick(Sender:TObject);beginSampleGrabber.GetBitmap(Image.Picture.Bitmap);end;procedure TVideoForm.SampleGrabberBuffer(sender:TObject;SampleTime:Double;pBuffer:Pointer;BufferLen:Integer);varSpBmp:TBitmap;BmpLineData:prgbtriplearray;yCount,uCount,vCount:Integer;Row,Col:Integer;Ret:Integer;beginif CallBack.Checked thenbegintmr1.Enabled:=True;tryxvid_encFrame.bitstream:=@FrameBuf[0];xvid_encFrame.length:=BufferLen;xvid_encFrame.input.csp:=XVID_CSP_BGR;//输入是rgb位图xvid_encFrame.input.plane[0]:=pBuffer;//RGB位图数据，每个像素有3个字节,(R,G,B) xvid_encFrame.input.stride[0]:=320*3;//每行字节数{FillChar(xvid_encStats,SizeOf(xvid_encStats),0);FillChar(xvid_decStats,SizeOf(xvid_decStats),0);xvid_encStats.version:=xvid_Version;xvid_decStats.version:=xvid_Version;}//开始压缩//Ret:=xvid_encore(xvid_enc.handle,XVID_ENC_ENCODE, @xvid_encFrame,@xvid_encStats);//返回编码之后的字节Ret:=xvid_encore(xvid_enc.handle,XVID_ENC_ENCODE,@xvid_encFrame,nil);//返回编码之后的字节//spf.Write(FrameBuf,Ret);mmo1.Lines.Add('Codec_num='+IntToStr(FrameSequece)+'Len='+IntToStr(Ret));Inc(FrameSequece);FrameByteCount:=FrameByteCount+Ret;//实时解码部分if Ret>0thenbegintrySpBmp:=TBitmap.Create;SpBmp.PixelFormat:=pf24bit;//初始化解码数据帧结构xvid_decFrame.version:=xvid_Version;xvid_decFrame.general:=0;xvid_decFrame.bitstream:=@FrameBuf[0];//输入解压的位流xvid_decFrame.length:=Ret;//输入位流长度xvid_decFrame.output.csp:=XVID_CSP_BGR;//色彩空间xvid_decFrame.output.plane[0]:=@FrameImg[0];//解压后输出的缓冲区xvid_decFrame.output.stride[0]:=320*3;//每行字节数//ret:=xvid_decore(xVid_decode.handle,XVID_DEC_DECODE,@xvid_decFrame, @xvid_decStats);ret:=xvid_decore(xVid_decode.handle,XVID_DEC_DECODE,@xvid_decFrame,nil); if ret>0thenbegintrySampleGrabber.GetBitmap(SpBmp,@FrameImg,320*240*3);//从解码出来的RGB缓冲区中画出原始bmp位图Image.Canvas.Draw(0,0,SpBmp);exceptend;end;finallySpBmp.Free;end;end else beginend;exceptend;end;end;procedure TVideoForm.tmr1Timer(Sender:TObject);beginCurFrame:=FrameSequece-CurFrame;lbl1.Caption:='bytes='+IntToStr(FrameByteCount div1024)+'k'+IntToStr(CurFrame) +'fps';CurFrame:=FrameSequece;end;end.上一篇：符合Web标准的web UI—来源、谬误与个人理解关于本站-广告服务-会员指南-联系方法Copyright © All RightsReserved 下一篇：实现环形缓冲区的通用类热门文章1.java 通过JNI 与delphi 交互2.利用客户应用程序通过远程服务器上的服务端...3.Delphi 利用SVGActiveX 3.0Type Library 监听...4.ClientDataSet 隐含功能5.Delphi 控制Excel6.DELPHI 用ADO 访问Excel 文件7.外壳搜索扩展8.判断程序是否无响应9.跟据方法名动态调用方法10.IE 异步可插入协议扩展11.RTTI 调用支持12.外壳执行操作记录器13.创建3721样式的Google 搜索扩展14.Delphi 的TService 的輸入桌面切換15.Delphi 外壳拖放控制扩展16.IE 菜单扩展17.API 函数抓取屏幕图像18.用Delphi4.0直接控制Word9719.Socket 封裝單元20.实现环形缓冲区的通用类推荐信息E-mail::9839046(请直接说明来意)。

合集下载

qq视频摄像头被占用怎么解决

qq视频摄像头被占用怎么解决

qq视频摄像头被占用怎么解决工具/原料1方法一：重启电脑首先考虑到的.是摄像头正在被其他程序独占，无法同时开启QQ视频。

如果要使用QQ视频，应该关闭其他正在使用摄像头的程序后重试，其实最简单的方法就是重启；2方法二：检查是否是驱动问题打开设备管理器看有没有摄像头，如果有，使用qq视频测试下，那么说明驱动没有安装好，得重新安装驱动；3如果用户不知道该怎么安装驱动，那么建议使用驱动精灵或者驱动人生，智能匹配驱动下载，安装好驱动后，重启即可；4方法三：使用命令行解决如果打开QQ视频，还会提示摄像头被占用，那么请往下看：那么我们可以使用命令行的方式来解决，在电脑左下角的“开始”菜单里面，找到“运行”；5输入如下命令：regsvr32 Quartz.dll并回车；XP和WIN7的输入方式都基本相同，我们也可以使用使用windows键+R键打开运行窗口；6方法四：卸载一些占用摄像头的软件卸载电脑上一些虚拟摄像头软件，例如吉奥,9158等软件。

卸载电脑上的视频播放软件，例如暴风影音,pptv等软件。

7还有一种情况就是，安全类软件的干扰，其实用上面的方法基本都可以解决问题，如果还是没解决问题，也有可能是金山毒霸，360安全管家等软件的摄像头隐私保护功能造成的，关闭就行了，如下图所示：8如果按照以上方法一一试过，那么我们可以尝试着重新安装QQ，或者重装系统；方法/步骤QQ视频摄像头注意事项本__为求助__，为__作者为解决网友所遇问题撰写，如果你喜欢本__，请继续关注本系列文档，后期将会推出更多优秀的__。

如果你觉得本篇__对你有帮助，请关注下作者，谢谢! 文字原创，图片原创，经本人亲测后编写，转载请注明！。

手机当电脑摄像头

手机当电脑摄像头

手机变身高清摄像头DroidCamX完全使用教程一、软件安装下载地址：点击下载需要用到的文件已经全部整理好，所以下载回来是一个压缩包，共包含如下三个文件：首先安装手机端——1.4.2，apk的安装过程大家都已经熟悉，就不在多说。

再安装PC端，打开1.4.2，直接运行Droid 。

一路点击下一步，即可安装完成。

默认安装目录为C:\Program Files \DroidCam（32位系统）或C:\Program Files (x86)\DroidCam（64位系统），为了使用更方便，将“电脑端汉化覆盖.zip”中的覆盖掉安装目录下的同名文件，软件界面即变成中文。

到此为止，所有安装工作已经做完了。

可以为建立一个桌面快捷方式，因为它是DroidCam客户端的主程序。

二、WiFi无线摄像头当无线摄像头来使用是最简单的，先打开手机WiFi并连接上无线路由，然后在手机上启动DroidCamX，看到如下画面。

显示IP：端口：4747。

再启动PC端，连接方式选择WiFi/LAN，再将手机IP和DroidCam端口填上在手机端界面看到的即可。

点击Connect，手机现在的画面已经变成摄像头显示画面了。

手机端的画面可能是左右相反的，没关系，先不用理会。

这个界面有三个按钮，右上方是自动对焦，中间是亮度节能开关，下方是退出。

虽然手机界面上显示是左右反的，但在电脑上显示出来其实是正常的，如果部分用户仍然不正常可以勾选pc端的“镜像网络视频”。

要使用该摄像头，在视频设备里选择DroidCam 就可以了，QQ、Skype等各种需要使用摄像头的软件都完美兼容。

至此WiFi无线摄像头的方式介绍完成。

三、USB摄像头这是笔者比较推荐的方式，速度快，而且一边使用一边充电，不用担心手机电量被短时间用完。

使用USB连接要稍微麻烦一点，先做一点准备工作：下载adb客户端及驱动，解压缩后，把里面和两个文件（搜索一下你的电脑，一般用安卓手机的电脑里都有这东西）放到系统盘的 windows/system32 文件夹里就可以了。

视频格式和压缩标准大全

视频格式和压缩标准大全

网络摄像机和视频服务器作为网络应用的新型产品，适应网络传输的要求也必然成为产品开发的重要因素，而这其中视频图像的技术又成为关键。

在目前中国网络摄像机和视频服务器的产品市场上，各种压缩技术百花齐放，且各有优势，为用户提供了很大的选择空间。

JPEG 、M-JPEG有相当一部分国内外网络摄像机和视频服务器都是采用JPEG，Motion-JPEG压缩技术，JPEG、M-JPEG采用的是帧内压缩方式，图像清晰、稳定，适于视频编辑，而且可以灵活设置每路的视频清晰度和压缩帧数。

另外，因其压缩后的格式可以读取单一画面，因此可以任意剪接，特别适用与安防取证的用途。

Wavelet Transform小波变换也属于帧内压缩技术，由于这种压缩方式移除了图像的高频成分，仅保留单帧图像信号，特别适用于画面变更频繁的场合，且压缩比也得到了一定的提高，因此也被一些网络摄像机和视频服务器所采用，例如，BOSCH推出的NetCam-4系列数字网络摄像机，深圳缔佳生产的NETCAM系列网络摄像机等。

H.263H.263是一个较为成熟的标准，它是帧间预测和变换编码的混合算法，压缩比较高，尤其适用低带宽上传输活动视频。

采用H.263技术生产的网络型产品，其成本较为适中，软/硬件丰富，适合集中监控数量较多的需求，如深圳大学通信技术研究所开发的SF－10网络摄像机和SF-20视频服务器，深圳新文鼎开发的W750视频服务器和W74GM网络摄像机等采用的都是这一压缩技术。

MPEG-4MPEG-4的着眼点在于解决低带宽上音视频的传输问题，在164KHZ的带宽上，MPEG-4平均可传5－7帧/秒。

采用MPEG-4压缩技术的网络型产品可使用带宽较低的网络，如PSTN，ISDN,ADSL等，大大节省了网络费用。

另外，MPEG-4的最高分辨率可达720×576，接近DVD 画面效果，基于图像压缩的模式决定了它对运动物体可以保证有良好的清晰度。

MPEG-4所有的这些优点，使它成为当前网络产品生产厂商开发的重要趋势之一。

台式机摄像头的打开方法

台式机摄像头的打开方法

台式机摄像头的打开方法台式机摄像头的打开方法首先安装好摄像头，然后打开计算机，接着在网络位置中找到摄像头，最后双击打开摄像头，这就是台式电脑摄像头怎么打开的方法，以下是店铺为大家整理的台式机摄像头的打开方法，欢迎阅读，希望大家能够喜欢。

打开方法如下：一、首先进入设备管理器，看有没有摄像头这一设备，如果有，进入我的电脑就会看到这个图标，双击它就会打开；如果没有，那么需要安装摄像头的驱动。

驱动安装好后，在我的电脑中就会看到它了。

这样就可以打开了。

二、运行QQ软件来打开Win7摄像头这个软件大家最熟悉不过了，可以通过其视频设置来打开摄像头。

运行QQ软件，打开“系统设置”，在“好友和聊天”选项卡下选择语音视频，点击“视频设置”按钮，这个时候便会弹出视频设置窗口，选择好视频设备，就可以看到摄像头的预览画面了，通过“画质调节”按钮将画面调整到自己满意的效果即可。

这个方法麻烦在要安装QQ软件，但QQ软件应该是许多人必备的软件吧。

一些其他的通信软件也是具备这项功能的.，比如Msn等。

三、下载AMcap来打开Win7摄像头Win7 没有摄像头预览软件，预览功能要借助第三方软件，在网上下载一个AMcap，大约300K，安装好后将AMcap快捷方式放到C：用户本机用户名AppdataRoamingMicrosoftWindowsNetwork shortcuts目录下，这样就可以在“我的电脑”中找到这个图标。

四、从Windows Vista 开始，系统就没有摄像头快捷方式了。

所以，在Win7中，即使摄像头已经装载完好，能正常使用，也看不到它的图标或快捷方式。

如果想在“计算机”中看到摄像头怎么办？只能试试：把摄像头程序的快捷方式放到“计算机”中。

1、打开开始菜单，右键“计算机”选择“管理”。

2、在“计算机管理”窗口左边一栏，双击“设备管理器”。

然后，从右边栏中找到“图像设备”，点开。

在摄像头设备上右键鼠标，选择“属性”。