پخش فایل صوتی از داخل بانک

سلام
چگونه میتونم یک فایل صوتی(wave) رو که توی یک بانک و فیلد از نوع blob است رو پخش کنم البته با تابع playsound خودم بلدم ولی در تابع playspund نمیتونم position فایل رو که در حال اجرا است تغییر بدم یعنی در حقیقت سوالم هم همین است . اگه برای فایلهای rm بگین خیلی بهتره .
با تشکر از همه
...............................

[hotice]

سلام
یک مثال اینجا هست http://delphi.about.com/cs/blob/
موفق باشی :)

[hotice]

سلام
یک مثال دیگه


// To save a file to BLOB:
procedure TForm1.Button1Click(Sender: TObject);
var
blob: TBlobStream;
begin
blob := yourDataset.CreateBlobStream(yourDataset.FieldByNa me('YOUR_BLOB'), bmWrite);
try
blob.Seek(0, soFromBeginning);
fs := TFileStream.Create('c:\your_name.wav', fmOpenRead or
fmShareDenyWrite);
try
blob.CopyFrom(fs, fs.Size)
finally
fs.Free
end;
finally
blob.Free
end;
end;
// To load from BLOB:

procedure TForm1.Button1Click(Sender: TObject);
var
blob: TBlobStream;
begin
blob := yourDataset.CreateBlobStream(yourDataset.FieldByNa me('YOUR_BLOB'), bmRead);
try
blob.Seek(0, soFromBeginning);

with TFileStream.Create('c:\your_name.wav', fmCreate) do
try
CopyFrom(blob, blob.Size)
finally
Free
end;
finally
blob.Free
end;
end;
موفق باشی :)