unit Video
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, stdctrls,
ExtCtrls, AVICap, mmsystem, dsgnintf
// Types for event-procedures
type
TCapStatusProc = procedure(Sender: TObject) of object
TCapStatusCallback = procedure(Sender: TObject nID: integer status: string)
of object
TVideoStream = procedure(sender: TObject lpVhdr: PVIDEOHDR) of object
TAudioStream = procedure(sender: TObject lpWHdr: PWAVEHDR) of object
// Property Editor for driver selection
type
TDrivereditor = class(TPropertyEditor)
function GetAttributes: TPropertyAttributes override
procedure GetValues(Proc: TGetStrProc) override
function GetValue: string override
procedure SetValue(const Value: string) override
end
标签：
interface
Messages
Graphics
Controls
上传时间：
2013-12-21
上传用户：heart520beat
Purpose:
--- --
This component is used for capturing staff from AVI to BMP.
Installation:
-------------
Extract the compiled units into your Lib directory or into
another directory that is listed in the Library path in your Delphi options.
Choose file AVICap.dcu for register.
description:
------------
AVICap V2.0 used for capturing frame from AVI without drawing on the screen, that is
essentially fast. It can be reached by using of avifil32.dll from MS Video For Windows.
New property: number of bits per pixel of bitmap.Now you can save BMP using next formats:
pf1bit, pf4bit, pf8bit, pf8bitGray, pf15bit, pf16bit, pf24bit, pf32bit, pfDevice.
See example to detail.
标签：
Installation
component
capturing
Purpose
上传时间：
2016-12-13
上传用户：TF2015
