In this thread, you suggested the following method of supplying the buffer data to the TLiveAudioPlayer component:
- Code: Select all
function TForm1.LiveAudioPlayer1DataPtr(Sender: TObject;
out Buffer: Pointer; var NumLoops: Cardinal;
var FreeIt: Boolean): Cardinal;
begin
FreeIt := False;
Buffer := WaveStorage1.Wave.Data;
Result := WaveStorage1.Wave.DataSize;
end;
Unfortunately, using v1.87 of your Wave Audio components, WaveStorage1.Wave.Data is invalid. What should I use instead of .Data, please?
Many thanks
Mervin