Arquivos MP3... Firebird Embeded - Stream - MPlayer

Delphi

11/06/2006

Olá gente!

Achei esta função abaixo que armazena em um BD músicas em MP3 utilizando STREAM.
Utilizo DBEXPRESS + Firebird + Delphi 7.
A rotina abaixo adapta-se perfeitamente as minhas necessidades para o armazenamento.

Agora... Gostaria de saber como recuperar este arquivo MP3 que está no BD FIREBIRD em um BLOB e tocar direto utilizando MPLAYER da paleta SUSTEM do delphi...
ou seja, sem ter que armazenar no disco (tocar direto em memória).

Agradeço desde já pela ajuda.

Luciano-User-BA

//gravando blob
var stream : TMemoryStream;
begin
stream := tmemorystream.create;
stream.loadfromfile( ´c:\arquivo.mp3´ );
ibsql.sql.text := ´UPDATE TABELA SET CAMPO_TIPO_BLOB = :CONTEUDO WHERE CONDICAO´;
TBlobField( IBSQL.parambyname( ´CONDICAO´ ) ).LoadFromStream( Stream );
ibsql.execsql;
stream.free;
end;

* Arquivos MP3... FIREBIRD EMBEDED - Tocar em Memória - STREAM - MPLAYER


Userba

Userba

Curtidas 0
POSTAR