如果是wav文件,你可以用PlaySound()办法;
例:
use mmSystem;
Procedure TForm1.button1click(Sender:Tobject);
var
Mem:Tmemorystream;
begin
mem:=Tmemorystream.create;
Tblobfield(adoquery1.FieldByName('声音文件').savetoStream(Mem);
PlaySound(Mem.Memory,0,SND_MEMORY);
Mem.free;
end;