Acces Table, TADOBLOB and WAVE audio
- From: "DG" <oliverD@xxxxxxxxxxx>
- Date: Wed, 27 Apr 2005 18:21:00 -0700
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;
.
- Prev by Date: Re: stored proc RETURN_VALUE.... there it is, I want to use it !!!
- Next by Date: Re: stored proc RETURN_VALUE.... there it is, I want to use it !!!
- Previous by thread: linked tables in Access database
- Next by thread: MS Access and Delphi?
- Index(es):