Acces Table, TADOBLOB and WAVE audio



Hi,
I'm trying to play a stream of audio on a BLOB field, looks like I can save
the sound stream as a long array but can't play it back

Help Please........

Procedure SaveWavToADOBlobField;
var b: TADOBLobStream;
begin
OpenDialog1.Execute;
ADOTable1.Edit;
b := TADOBlobStream.Create(ADOTable1psound, bmReadWrite);
b.LoadFromFile(OpenDialog1.FileName);
ADOTable1psound.LoadFromStream(b);
ADOTable1.Post;
b.Free;
end;

Procedure PlayWavFromADOBlobField;
var
BlobField: TADOBlobStream;
begin
BlobField := TADOBlobStream.Create(ADOTable1psound, bmRead);
PlaySound(BlobField.Memory, 0, SND_SYNC);
Stream.Free;
end;


.