Class TAudioPlay (unit AviPlay)

Inherits from

TObject

Constructors



Functions

procedure AudioPlayMessage(W : PWAVEHDR);

--------------------------------------------------------------

destructor Destroy;

------------------------------------------------------

function Play(W : HWND; pAvi : Pointer; lStart, lEnd : longint) : boolean;

--------------------------------------------------------------

procedure Stop;

--------------------------------------------------------------

function FillBuffer : boolean;

--------------------------------------------------------------

function OpenDevice(W : HWND; pAvi : pointer) : boolean;

--------------------------------------------------------------

Properties

Events

Variables

fAVI : pointer;


fBegin : integer;


fBufferSize : integer;


fCurrent : integer;


fEnd : integer;


fPlaying : boolean;


fSampleSize : integer;


fWaveOut : HWAVEOUT;



Constructors


Functions


procedure AudioPlayMessage(W : PWAVEHDR);

--------------------------------------------------------------


destructor Destroy;

------------------------------------------------------


function Play(W : HWND; pAvi : Pointer; lStart, lEnd : longint) : boolean;

--------------------------------------------------------------


procedure Stop;

--------------------------------------------------------------


function FillBuffer : boolean;

--------------------------------------------------------------


function OpenDevice(W : HWND; pAvi : pointer) : boolean;

--------------------------------------------------------------


Properties


Events


Variables


fAVI : pointer;


fBegin : integer;


fBufferSize : integer;


fCurrent : integer;


fEnd : integer;


fPlaying : boolean;


fSampleSize : integer;


fWaveOut : HWAVEOUT;