Delphi版本的VC4000采集卡Demo

  • q2_580306
    了解作者
  • 1.8MB
    文件大小
  • rar
    文件格式
  • 0
    收藏次数
  • VIP专享
    资源类型
  • 0
    下载次数
  • 2022-05-15 12:23
    上传日期
Delphi 7版本的VC4000采集卡Demo程序,经过自己修改,可实现4路显示
VC4000Demo-141225.rar
  • VC4000Demo
  • Mix-old.dll
    80KB
  • fAddTextSet.pas
    5.2KB
  • wmv9vcm.dll
    1.4MB
  • fAddVideoParm.pas
    2.1KB
  • fAddVideoParm.dfm
    5.8KB
  • VC4000DemoD7.skincfg
    85B
  • Blue.skinres
    336.2KB
  • NATSimulator.dll
    72KB
  • CapturePicture.dll
    132KB
  • xvidcore.dll
    572KB
  • Sa7134Capture.h
    14.2KB
  • VC4000DemoD7.cfg
    434B
  • VC4000DemoD7.res
    876B
  • VC4000DemoD7.dof
    2KB
  • Unit1.dfm
    3.9KB
  • CapturePicture.h
    518B
  • DelTmp_Dsk.bat
    108B
  • Photo.jpg
    1.5KB
  • VC4000DemoD7.exe
    1.1MB
  • VC404.pas
    19.5KB
  • Mix.dll
    80KB
  • MediaTransmit-NoUse.dll
    288KB
  • Sa7134Capture.dll
    212KB
  • Sa7134Capture-old.dll
    188KB
  • MediaTran-No.pas
    4.4KB
  • Unit1.pas
    15.1KB
  • fAddTextSet.dfm
    6.2KB
  • VC4000DemoD7.dpr
    455B
内容介绍
#ifndef VC404_CAPTURE_SAA7134 #define VC404_CAPTURE_SAA7134 #ifdef SAA7134CAPTURE_EXPORTS #define SAA7134CAPTURE_API __declspec(dllexport) #else #define SAA7134CAPTURE_API __declspec(dllimport) #endif static const ULONG BrightnessDefault = 0x80; static const ULONG ContrastDefault = 0x44; static const ULONG SaturationDefault = 0x40; static const ULONG HueDefault = 0x00; static const ULONG SharpnessDefault = 0x00; #define MIN_VAMP_BRIGHTNESS_UNITS 0 #define MAX_VAMP_BRIGHTNESS_UNITS 255 #define MIN_VAMP_CONTRAST_UNITS -128 #define MAX_VAMP_CONTRAST_UNITS 127 #define MIN_VAMP_HUE_UNITS -128 #define MAX_VAMP_HUE_UNITS 127 #define MIN_VAMP_SATURATION_UNITS -128 #define MAX_VAMP_SATURATION_UNITS 127 #define MIN_VAMP_SHARPNESS_UNITS -8 #define MAX_VAMP_SHARPNESS_UNITS 7 /////////////////////////////////////////////////////////// //注意:VC枚举类型为32位,4字节;这里的枚举类型为4字节。 // C++ builder枚举类型为8位,1字节,要重定义,例如: //typedef int COLORCONTROL; //COLORCONTROL BRIGHTNESS = 0; //COLORCONTROL CONTRAST = 1; //COLORCONTROL SATURATION = 2; //COLORCONTROL HUE = 3; //COLORCONTROL SHARPNESS = 4; //描述:在VC中enum、ULONG、LONG、BOOL、DWORD 都为32位,4字节, //这里使用的是VC定义标准。 ///////////////////////////////////////////////////////////// typedef enum { //@enum Decoder control types BRIGHTNESS = 0, //@emem control for brightness CONTRAST = 1, //@emem control for contrast SATURATION = 2, //@emem control for saturation HUE = 3, //@emem control for hue SHARPNESS = 4 //@emem control for sharpness }COLORCONTROL; typedef enum { //@enum Decoder control types XVID_CBR_MODE = 0, XVID_VBR_MODE = 1//, }COMPRESSMODE; typedef enum{ COLOR_DECODER = 0, //解码器(包括视频预览和视频捕获) COLOR_PREVIEW = 1, //视频预览 COLOR_CAPTURE = 2 //视频捕获 }COLORDEVICETYPE; typedef enum{ VID_CAPTURE_EVENT = 0, AUD_CAPTURE_EVENT1 = 1, AUD_CAPTURE_EVENT2 = 2, IO_ALERT_EVENT = 3, MOTION_DETECT = 4, VID_PREVIEW_EVENT = 5 }EVENTTYPE; typedef enum { RGB32 = 0x0, RGB24 = 0x1, RGB16 = 0x2, RGB15 = 0x3, YUY2 = 0x4, BTYUV = 0x5, Y8 = 0x6, RGB8 = 0x7, PL422 = 0x8, PL411 = 0x9, YUV12 = 0xA, YUV9 = 0xB, RAW = 0xE }COLORFORMAT; typedef enum { CAP_NULL_STREAM = 0, //捕获无效 CAP_ORIGIN_STREAM = 1, /*原始流回调*/ CAP_MPEG4_STREAM = 2, /*Mpeg4流*/ CAP_MPEG4_XVID_STREAM = 3, CAP_ORIGIN_MPEG4_STREAM = 4, CAP_ORIGIN_XVID_STREAM = 5, CAP_WMV9_STREAM = 6, CAP_ORIGIN_WMV9_STREAM = 7 }CAPMODEL; typedef enum { MPEG4_AVIFILE_ONLY = 0, //存为MPEG文件 MPEG4_CALLBACK_ONLY = 1, //MPEG数据回调 MPEG4_AVIFILE_CALLBACK = 2 //存为MPEG文件并回调 }MP4MODEL; typedef enum { //@enum Field frequency FIELD_FREQ_50HZ = 0, //@emem source is 50 Hz (PAL) FIELD_FREQ_60HZ = 1, //@emem source is 60 Hz (NTSC) FIELD_FREQ_0HZ = 2 //@emem source is 0 Hz (NO SIGNL) }eFieldFrequency; typedef enum { //电平等级 HIGH_VOLTAGE = 0, //高电平 LOW_VOLTAGE = 1 //低电平 }eVOLTAGELEVEL; typedef enum { NOT_DISPLAY = 0, PCI_VIEDOMEMORY = 1, PCI_MEMORY_VIDEOMEMORY = 2 }DISPLAYTRANSTYPE; typedef enum { VideoStandard_None = 0x00000000, VideoStandard_NTSC_M = 0x00000001, VideoStandard_NTSC_M_J = 0x00000002, VideoStandard_NTSC_433 = 0x00000004, VideoStandard_PAL_B = 0x00000010, VideoStandard_PAL_D = 0x00000020, VideoStandard_PAL_H = 0x00000080, VideoStandard_PAL_I = 0x00000100, VideoStandard_PAL_M = 0x00000200, VideoStandard_PAL_N = 0x00000400, VideoStandard_PAL_60 = 0x00000800, VideoStandard_SECAM_B = 0x00001000, VideoStandard_SECAM_D = 0x00002000, VideoStandard_SECAM_G = 0x00004000, VideoStandard_SECAM_H = 0x00008000, VideoStandard_SECAM_K = 0x00010000, VideoStandard_SECAM_K1 = 0x00020000, VideoStandard_SECAM_L = 0x00040000, VideoStandard_SECAM_L1 = 0x00080000, } VideoStandard; typedef struct { LONG cfHeight; //字符高度 LONG cfWidth; //字符宽度 LONG cfWeight; //字符粗细 LONG cfSpacing; //字符间距 BOOL cfItalic; //斜体 BOOL cfUnderline; //下划线 BOOL cfStrikeOut; //删除线 BOOL bTransparent; //透明 COLORREF cfBkColor; //背景色 COLORREF cfTextColor; //前景色 TCHAR cfFaceName[32]; //字体名 }OSDPARAM; //error define area #define ERR_SUCCESS 0 //no error,success #define ERR_NODEVICEFOUND 1 //no device found in system #define ERR_UNSUPPORTFUNC 2 //unsupport func tempro? #define ERR_ALLOCRESOURCE 3 //alloc resource error #define ERR_INITDIRECTDRAW 4 //Init Directdraw error #define ERR_INITDIRECTSOUND 5 //Init Directdraw error #define ERR_NOT_10MOONSDEV 6 //it is not device of 10Moons ///////////////////////////////////////////////////////////////////////////////////////////////// //VC4000/VC8000/VC404P公有函数 ///////////////////////////////////////////////////////////////////////////////////////////////// //动态检测回调, //如果VCAEnableMotionDetect 参数nPersistTime = -1;则回调运动检测地图。取消(开始、停止)回调。bMove将无效。 //如果VCAEnableMotionDetect 参数nPersistTime != -1;则回调开始、停止运动检测;取消回调运动检测地图。pbuff、dwSize将无效。 typedef void (CALLBACK *PrcCbMotionDetect)( DWORD dwCard, BOOL bMove, BYTE *pbuff, DWORD dwSize, LPVOID lpContext ); //视频捕获原始数据回调 typedef void (CALLBACK *PrcVidCapCallBack)( DWORD dwCard, BYTE *pbuff, DWORD dwSize ); //视频MPEG压缩数据回调 typedef void (CALLBACK *PrcVidMpegCallBack)( DWORD dwCard, BYTE *pbuff, DWORD dwSize, BOOL isKeyFrm ); //音频捕获原始数据回调 //音频包原始大小16 Bit PCM格式,8080 BYTE,2声道,32000Hz typedef void (CALLBACK *PrcAudCapCallBack)( DWORD dwCard, BYTE *pbuff,DWORD dwSize ); //音频MPEG压缩数据回调 typedef void (CALLBACK *PrcAudMpegCallBack)( DWORD dwCard, BYTE *pbuff,DWORD dwSize ); //IO报警回调 typedef void (CALLBACK *PrcIoAlertCallBack)( DWORD dwCard ); //视频Mpeg处理回调 ,pPorcess 返回为TRUE 表示当前帧压缩;返回为FALSE 表示丢掉当前帧 typedef void (CALLBACK *PrcVidMpegPorCallBack)( DWORD dwCard, BOOL* pPorcess ); //音频Mpeg处理回调,pPorcess 返回为TRUE 表示当音频包压缩;返回为FALSE 表示丢掉当前音频包。 typedef void (CALLBACK *PrcAudMpegPorCallBack)( DWORD dwCard, BOOL* pPorcess ); //注册视频捕获原始数据回调 BOOL WINAPI VCARegVidCapCallBack( DWORD dwCard, PrcVidCapCallBack ppCall ); //注册视频MPEG压缩数据回调 BOOL WINAPI VCARegVidMpegCallBack( DWORD dwCard, PrcVidMpegCallBack ppCall ); //设置错误序号 void WINAPI VCASetLastError( DWORD dwError ); //得到错误序号 DWORD WINAPI VCAGetLastError(); //初始化SDK,hWndMain:overlay窗口句柄,overlay窗口就是包含多路显示小窗口的大窗口。overlay窗口必须有一个,多路显示小窗口必须包含再其内部。 //bInitVidDev:是否初始化视频设备用于预览,当视频不显示,只需视频录像或音频处理时可以设置为FALSE. //bInitAudDev:是否初始化音频设备用于声音播放,当不音频不需要播放,只需音频录像或视频处理时、或没有安装声卡,可以设置为FALSE. BOOL WINAPI VCAInitSdk( HWND hWndMain, DISPLAYTRANSTYPE eDispTransType = PCI_VIEDOMEMORY, BOOL bInitAudDev = FALSE ); //释放SDK资源 void WINAPI VCAUnInitSdk(); //得到设备总数 LONG WINAPI VCAGetDevNum(); //打开设备,hPreviewWnd为视频预览窗口的句柄,该窗口背景色用户必需设置为RGB(255,0,255) BOOL WINAPI VCAOpenDevice( DWORD dwCard,HWND hPreviewWnd ); //关闭设备 BOOL WINAPI VCACloseDevice( DWORD dwCard ); //开始视频预览 BOOL WINAPI VCAStartVideoPreview( DWORD dwCard ); //停止视频预览 BOOL WINAPI VCAStopVideoPreview( DWORD dwCard ); //更新视频预览,比如改变了显示窗口时,调用。 BOOL WINAPI VCAUpdateVideoPreview( DWORD dwCard, HWND hPreviewWnd ); //更新overlay窗口,当overl
评论
    相关推荐
    • Delphi 报关
      Delphi 报关 Delphi 报关 Delphi 报关
    • Delphi 记事本
      个人用Delphi软件做的一个简单的记事本工具,希望对Delphi初学者有帮助
    • delphi 皮肤
      delphi 皮肤控件使用的 delphi 皮肤控件使用的 delphi 皮肤控件使用的
    • delphi mqtt
      delphi mqtt客户端。支持delphi7,有心跳处理,包括发布和订阅。连接emq测试过。
    • delphi 5.0
      delphi 5.0delphi 5.0delphi 5.0delphi 5.0
    • delphi10.2.3
      delphi10.2.3(keygen) delphi10.2.3(keygen) delphi10.2.3(keygen)
    • delphi AESDemo
      delphi AESDemo delphi AESDemo delphi AESDemo delphi AESDemo delphi AESDemo delphi AESDemodelphi AESDemo delphi AESDemodelphi AESDemodelphi AESDemo
    • 介绍DELPHI
      简单介绍delphi。供初学都更好的了解delphi
    • Delphi Fetion
      Delphi编写的给Fetion发送短信的程序,这个是Delphi7 +Indy9版本。
    • delphi hint
      delphi hint 在Delphi中每个组件几乎都具有Hint属性,但是他们只是在鼠标移动到该组件的时候才显示Hint内容。幸运的是,Delphi为我们提供了一个THintWindow组件,这样就不需要我们手工封装一个组件了。为了实现我们...