源: Delphi 如何访问监控摄像头?

/*Title:Delphi摄像头操作 *Author:Insun *Blog:http://yxmhero1989.blog.163.com *From:www.4safer.com */ 为了笔耕不辍,为了way out,为了Dota激情的时候不内疚,偶尔发发. 各种远控软件都有摄像头操作,其实编程起来没什么技术可言. DELPHI一般直接使用MS的AVICAP32.DLL就可轻松的实现对摄像头编程,一般不喜欢TVideoCap控件. 首先常量定义和函数定义: implementation

我的天哪,上一篇博文是2年前的事情了.看来又虚度了2年光阴,继续学习... 本文算是副产品,正品是利用FFmpeg从任意视频中生成GIF片段的小程序,等写完了再发.不为别的,只是为了给儿子做动图,且看不惯这种工具也要收费! 声明 本文是首先看到了求比Stretchblt方法更快的缩放算法的帖子,请参看其中署名为"张辉明"的回复.我做了优化和一些修正,但DrawDibDraw部分的调用是原文照录的.(其实上文就是我Bing了DrawDibDraw时搜到的.) 为什么要测试 Stretch

你的电脑有没有摄像头?看到别人用QQ玩视屏你会不会去想怎么实现的?这里介绍使用DELPHI使用MS的 AVICAP32.DLL就可轻松的实现对摄像头编程,如果再加上你的网络编程水平,实现一个视屏聊天就不成什么问题了. 看看下面代 码的代码: const WM_CAP_START = WM_USER; ; ; ; ; ; ; ; ; ; ; ; function capCreateCaptureWindowA(lpszWindowName : PCHAR; dwStyle : longint; x

Delphi利用avicap32.dll编程控制摄像头实现拍照.录制视频 项目需求:平板电脑(Windows系统)一维/二维码扫描功能: 需求分析: 需要扫描一维/二维码时,分两步实现. 第一步,avicap32.dll或者dspack技术实现静默打开摄像头拍照.保存BMP图片. 第二步,ZXing技术实现对一维/二维码的解析,最终获取到码值. 本篇是利用avicap32.dll技术实现拍照/录制视频的测试Demo. 请看代码: unit uMain; interface uses Window

最近在使用Usb摄像头做了个项目,其中写了一个操作usb摄像头类分享给大家 {*******************************************************} { } { 操作USB摄像头类 } { } { 作者:lqen } { 日期:2015.05.18 } { } {*******************************************************} unit untUsbCamera; interface uses Window

TakePhotoFromCameraAction1: TTakePhotoFromCameraAction; // 通过手机摄像头获取图片TakePhotoFromLibraryAction1: TTakePhotoFromLibraryAction; //获取手机已存在图片ShowShareSheetAction1: TShowShareSheetAction;//用其它程序分享图片(Bitmap.Assign();) 获取麦克风设置 FMX.MediaFMicrophone: TAudio

zw版·Halcon与delphi(兼谈opencv) QQ群 247994767(delphi与halcon) <Halcon与delphi>系列,早两年就想写,不过一方面,因为Halcon是售价高达数万欧元(不是人民币)的专业软件,知道的人不多,      另外一方面,个人琐事太多,一直没时间动笔,这次借国庆空闲,匆匆忙忙,开个头先.      标题本来准备用:<Halcon.opencv与delphi.python.vb.c++>      太杂,虽然现在流行长标题,还是简化

大家都知道 TVideoGrabber是一款支持包括C#..NET.VB.NET.C++.Delphi.C++Builder和ActiveX平台在内的视频处理控件,可以捕捉视频,也可以作为多媒体播放器.个人比较觉得不错的是视频源的选择还真挺丰富,能捕捉和记录多种视频捕捉设备上的视频和音频流,包括USB摄像头.USB模拟捕捉设备.网络摄像机.台式机以及用作视频源的各种位图. 要在在TVideoGrabber中如果要并行处理多摄像头以及执行多摄像头网络流,需要执行下面的步骤: 1.通过视频输入的一个

链接里默认的--------------------------- Error --------------------------- I/O error for file "C:\ProgramData\Embarcadero\InterBase\gds_db\examples\database\employee.gdb" Error while trying to open file 系统找不到指定的路径. . --------------------------- OK ----

完整的delphi拍照控件代码,实现利用摄像头进行拍照的功能.需要TVideoCap控件支持. procedure Tfrm1.Button2Click(Sender: TObject); Var jpeg: TJPEGImage; bmp: TBitmap; MyStm:TMemoryStream; strfilename,strcard:String; begin inherited; strfilename:=extractfilepath(Application.ExeName); wi

第一次编译时,设定android SDK: F:\RAD Studio XE6\PlatformSDKs\adt-bundle-windows-x86-20131030\sdk F:\RAD Studio XE6\PlatformSDKs\android-ndk-r9c C:\Program Files\Java\jdk1.7.0_40 SDK更新代理     XE6 不支持JStringToString.StringTojString.StrToJURI:use Androidapi.Help

XE6 不支持JStringToString.StringTojString.StrToJURI:use Androidapi.Helpers //Splash Image Delphi XE5,XE6,XE7编译的程序在Android下启动会有一段时间黑屏,以前需要用Java扩展Activity增加Splash显示, 现在Delphi XE7增加了Splash Image显示功能了. 步骤: .鼠标右键点击工程,选择Options, .进入Application分页 .勾选Include Sp

SQL Server2005中,我用image类型来存取图片,首先把数据库表设置好 例如我的pic表有如下两列:时间,图片. delphi中,我用ADOQuery来连接数据库,但是数据库中有好几张表,我只往其中一张表里存图片. 首先将摄像头传来的jpeg图片存入文件中,将路径设为全局变量以供后续使用.(当然你也可以用现成的jpeg图片) function/procedure 存入图片过程 var strmDB: TMemoryStream; begin strmDB:= TMemoryStrea

Zint用于产生二维码. Zxing用读取二维码. VFrames.pas和VSample.pas用于摄像头. 另附带摄像头相关的类库,也可用开源的dspack也可用于摄像头的需求. 以上为开源的信息,请在sourceforge.net上下载. 本例用zint.dll的版本为2.6.0. 请在项目根目录下如zxing中的Classes文件夹及里面所有的文件. 设置此项目引用的文件,由于zxing中区分vcl和fmx,本例用到VCL,故把USE_VCL_BITMAP的编译选项加上去: 项目层次:

用Delphi开发视频聊天软件 一.引言 我们知道视频聊天软件的关键技术在于采集视频,并实时传输给聊天软件在线的人.对于视频的采集,这里采用微软公司的关于数字视频的一个软件包VFW(Video for Windows).相信很多人对它都很熟习,VFW能使应用程序通过数字化设备从传统的模拟视频源得到数字化的视频剪辑,VFW的一个关键思想是播放时不需要专用硬件.为了解决数字视频数据量大的问题,需要对数据进行压缩,而VFW引进了AVI的文件标准.该标准未规定如何对视频进行捕捉.压缩及播放,仅规定视频和

在MSN.QQ等聊天类的应用程序中,都应用到了网络视频技术.Delphi使用Object Pascal语言是一种完全面向对象语言,可以开发出灵活强大的程序,开发网络视频程序也不在话下.一个完整的网络视频程序应包括以下几个关键技术:视频捕获.视频压缩与解压.数据传输. 一.视频获捕 1．基本概念 微软为软件开发人员提供了一个专门用于视频捕获的VFW (Video for Windows) SDK,为在Windows系统中实现视频捕获提供了标准的接口,从而大大方便了视频捕获程序的开发.由于VFW S

摘要:目前网上视频聊天软件.视频会议软件.可视IP电话软件随处可见,你是否想自己做一个玩玩?其实这类软件无非是视频加上网络而建成的.如果熟悉视频捕捉和网络传输技术,根本就难不倒你.微软为软件开发人员提供了一个专门用于视频捕捉的VFW SDK(Video for Windows SDK),用它实现视频捕捉很简单,至于网络传输嘛,Delphi更是提供了N多种网络组件,随你用了.本文详细介绍了如何利用Delphi中开发视频聊天软件,同时给出了两个程序示例. 关键词:Delphi VFW 视频 视频会议

Delphi 和 C++Builder XE2 更新摘要 XE2的关键特性如下: 1. FireMonkey Application Platform支持运行在Windows (32和64位),Mac OS X, 以及iOS上的跨平台应用程序. 2. VCL支持64位和32位Windows. 3. Delphi RTL现在支持Mac OS X 以及32位和64位Windows. 4. 跨平台应用程序开发 4.1Mac OS X应用程序开发 2个Mac OS X的交叉编译器: Delphi (DC

最近做个发邮件的功能,需要将日志文件通过邮件发送回来用于分析,但是日志文件可能会超级大,测算下来一天可能会有800M的大小.所以压缩是不可避免了,delphi中的默认压缩算法整了半天不太好使,就看了看7z,在windows下有dll那么就用它吧. 下载7z.dll,还有一个delphi的开发sdk文件,sevenzip.pas.有这两个就可以了. 压缩 使用超级简单 procedure TForm1.Button1Click(Sender: TObject); var Arch: I7zOutA

在我们以前的项目了,做摄像头的图片采集,我们一般还是需要做一个封装处理的,在较新版本的DevExpress控件里面,增加了一个CameraControl控件,可以直接调用摄像头显示的,因此也可以做头像采集等功能,本文介绍如何基于这个控件做相关的图像采集操作. 1.CameraControl控件介绍 该控件从15.1开始,就开始加入控件组了,控件的使用很简单,直接拖动到界面就可以在Winform界面上使用了.本案例基于16.1进行开发的,因此也都具有这些控件模块的. 例如我们直接把CameraCo