Class TAviCap (unit AviCap)

Inherits from

TCustomPanel

This code was written by : A. Waintrub email: awaint1102@aol.com This code is copyright 1997 by A. Waintrub +++++++++++++++++++++++++++++++++++++++++++++++++++ + NUR FÜR PRIVATE NUTZUNG!!! + +++++++++++++++++++++++++++++++++++++++++++++++++++

Constructors


constructor Create(AOwner: TComponent);



Functions

destructor Destroy;


procedure paint;


procedure StartCapture;


procedure StopCApture;


procedure Connect(b:Boolean);

Protected Declarations

procedure Disconnect;


Procedure DlgCompression(B:Boolean);


Procedure DlgDisplay(B:Boolean);


Procedure DlgFormat(B:Boolean);


Procedure DlgSource(B:Boolean);


procedure SetAviFileName(S:String);


procedure SetOverlay(b:boolean);


procedure SetScale(b:boolean);


Properties

property cap_AviFileName : String


property cap_Connected : boolean


property cap_DlgVideoCompression : boolean


property cap_DlgVideoDisplay : boolean


property cap_DlgVideoFormat : boolean


property cap_DlgVideoSourece : boolean


property cap_OptAbortLeftMouse : Bool


property cap_OptAbortRightMouse : Bool


property cap_OptAudioBufferSize : dword


property cap_OptAVStreamMaster : Word


property cap_OptCaptureAudio : LongBool


property cap_OptChunkGranularity : dword


property cap_OptDisableWriteCache : Bool


property cap_OptIndexSize : dword


property cap_OptKeyAbort : Word


property cap_OptLimitEnabled : Bool


property cap_OptMakeUserHitOKToCapture : Bool


property cap_OptMCIControl : Bool


property cap_OptMCIStartTime : dword


property cap_OptMCIStopTime : dword


property cap_OptNumAudioRequested : Byte


property cap_OptNumVideoRequested : dword


property cap_OptPercentDropForError : Byte


property cap_OptRequestMicroSecPerFrame : DWORD


property cap_OptStepCaptureAt2x : Bool


property cap_OptStepCaptureAverageFrames : Byte


property cap_OptStepMCIDevice : Bool


property cap_OptTimeLimit : Byte


property cap_OptUsingDOSMemory : Bool


property cap_OptYield : Bool


property cap_Overlay : Boolean


property cap_Scale : Boolean


property cap_DriverDescripton : TStringList


property cap_WndHandle : THandle


Events

Variables

DC : HDC;

Public Declarations

AbortLeftMouse : bool;


AbortRightMouse : bool;


AudioBufferSize : dword;


CaptureAudio : Bool;


capturing : boolean;


ChunkGranularity : dword;


DisableWriteCache : bool;


dummy : Boolean;


FAviFileNAme : String;


FCaptureParms : TCaptureParms;


FCapWndHandle : THandle;


FConnected : boolean;


FDriverDescripton : TStringList;


FOverlay : boolean;


FScale : boolean;


IndexSize : dword;


KeyAbort : Word;


LimitEnabled : bool;


MakeUserHitOKToCapture : LongBool;


MCIControl : bool;


MCIStartTime : dword;


MCIStopTime : dword;


NumAudioRequested : Byte;


NumVideoRequested : dword;


PercentDropForError : Byte;


RequestMicroSecPerFrame : dword;

Private Declarations

StepCaptureAt2x : bool;


StepCaptureAverageFrames : Byte;


StepMCIDevice : bool;


StreamMaster : Word;


TimeLimit : Byte;


UsingDOSMemory : Bool;


Yield : bool;



Constructors


constructor Create(AOwner: TComponent);


Functions


destructor Destroy;


procedure paint;


procedure StartCapture;


procedure StopCApture;


procedure Connect(b:Boolean);

Protected Declarations


procedure Disconnect;


Procedure DlgCompression(B:Boolean);


Procedure DlgDisplay(B:Boolean);


Procedure DlgFormat(B:Boolean);


Procedure DlgSource(B:Boolean);


procedure SetAviFileName(S:String);


procedure SetOverlay(b:boolean);


procedure SetScale(b:boolean);


Properties


property cap_AviFileName : String


property cap_Connected : boolean


property cap_DlgVideoCompression : boolean


property cap_DlgVideoDisplay : boolean


property cap_DlgVideoFormat : boolean


property cap_DlgVideoSourece : boolean


property cap_OptAbortLeftMouse : Bool


property cap_OptAbortRightMouse : Bool


property cap_OptAudioBufferSize : dword


property cap_OptAVStreamMaster : Word


property cap_OptCaptureAudio : LongBool


property cap_OptChunkGranularity : dword


property cap_OptDisableWriteCache : Bool


property cap_OptIndexSize : dword


property cap_OptKeyAbort : Word


property cap_OptLimitEnabled : Bool


property cap_OptMakeUserHitOKToCapture : Bool


property cap_OptMCIControl : Bool


property cap_OptMCIStartTime : dword


property cap_OptMCIStopTime : dword


property cap_OptNumAudioRequested : Byte


property cap_OptNumVideoRequested : dword


property cap_OptPercentDropForError : Byte


property cap_OptRequestMicroSecPerFrame : DWORD


property cap_OptStepCaptureAt2x : Bool


property cap_OptStepCaptureAverageFrames : Byte


property cap_OptStepMCIDevice : Bool


property cap_OptTimeLimit : Byte


property cap_OptUsingDOSMemory : Bool


property cap_OptYield : Bool


property cap_Overlay : Boolean


property cap_Scale : Boolean


property cap_DriverDescripton : TStringList


property cap_WndHandle : THandle


Events


Variables


DC : HDC;

Public Declarations


AbortLeftMouse : bool;


AbortRightMouse : bool;


AudioBufferSize : dword;


CaptureAudio : Bool;


capturing : boolean;


ChunkGranularity : dword;


DisableWriteCache : bool;


dummy : Boolean;


FAviFileNAme : String;


FCaptureParms : TCaptureParms;


FCapWndHandle : THandle;


FConnected : boolean;


FDriverDescripton : TStringList;


FOverlay : boolean;


FScale : boolean;


IndexSize : dword;


KeyAbort : Word;


LimitEnabled : bool;


MakeUserHitOKToCapture : LongBool;


MCIControl : bool;


MCIStartTime : dword;


MCIStopTime : dword;


NumAudioRequested : Byte;


NumVideoRequested : dword;


PercentDropForError : Byte;


RequestMicroSecPerFrame : dword;

Private Declarations


StepCaptureAt2x : bool;


StepCaptureAverageFrames : Byte;


StepMCIDevice : bool;


StreamMaster : Word;


TimeLimit : Byte;


UsingDOSMemory : Bool;


Yield : bool;