Class TWave (unit Waveplay)

Inherits from

TPersistent

Constructors


constructor Create;

TWave } { class instance constructor


Functions

procedure Assign(Source: TPersistent);

method to copy WavwAudio data when required

destructor Destroy;

destroy class instance

procedure LoadFromFile(const Filename: string);

method to read data from *.

procedure LoadFromStream(Stream: TStream);

method to load WaveAudio data from a stream - used by the library and by the LoadFromFile method

procedure SaveToFile(const Filename: string);

method to write data to *.

procedure SaveToStream(Stream: TStream);

method to save WaveAudio data to a stream - used by the library and by the SaveToFile method

procedure Changed(Sender: TObject);

method to indicate data has changed - triggers the OnChange method

procedure DefineProperties(Filer: TFiler);

method to allow "fake" data to be read and written by the library

procedure ReadData(Stream: TStream);

method for library to read data from stream - calls LoadFromStream

procedure WriteData(Stream: TStream);

method for library to write data to stream - calls SaveToStream

function GetEmpty: Boolean;

returns false if buffer is nil

procedure SetModified(Value: Boolean);

method to set modified flag

Properties

property Empty : Boolean


property Modified : Boolean


property WaveData : TMemoryStream


Events

event OnChange : TNotifyEvent


Variables

FModified : Boolean;


FOnChange : TNotifyEvent;


FWaveData : TMemoryStream;



Constructors


constructor Create;

TWave } { class instance constructor


Functions


procedure Assign(Source: TPersistent);

method to copy WavwAudio data when required


destructor Destroy;

destroy class instance


procedure LoadFromFile(const Filename: string);

method to read data from *.wav file - calls LoadFromStream


procedure LoadFromStream(Stream: TStream);

method to load WaveAudio data from a stream - used by the library and by the LoadFromFile method


procedure SaveToFile(const Filename: string);

method to write data to *.wav file - calls SaveToStream


procedure SaveToStream(Stream: TStream);

method to save WaveAudio data to a stream - used by the library and by the SaveToFile method


procedure Changed(Sender: TObject);

method to indicate data has changed - triggers the OnChange method


procedure DefineProperties(Filer: TFiler);

method to allow "fake" data to be read and written by the library


procedure ReadData(Stream: TStream);

method for library to read data from stream - calls LoadFromStream


procedure WriteData(Stream: TStream);

method for library to write data to stream - calls SaveToStream


function GetEmpty: Boolean;

returns false if buffer is nil


procedure SetModified(Value: Boolean);

method to set modified flag


Properties


property Empty : Boolean


property Modified : Boolean


property WaveData : TMemoryStream


Events


event OnChange : TNotifyEvent


Variables


FModified : Boolean;


FOnChange : TNotifyEvent;


FWaveData : TMemoryStream;