Fórum Armazenar vídeo em tabela Interbase #45417

09/07/2004

0

Olá pessoal,

Estou precisando saber como armazenar um vídeo ou um gif animado em um campo (blob) de uma tabela Interbase, e como eu faço para recuperar esse vídeo (ou gif animado) e apresentá-lo em uma janela de uma aplicação desenvolvida em Delphi.

Obrigado a todos,


Edbertof

Edbertof

Responder

Posts

12/07/2004

Afarias

carregue o arquivo em um Stream (TFileStream) e então jogue no campo BLOB (BlobField.LoadFromStream(Stream)) .. ex::

var
  Stm: TStream;

begin
  
  Stm := TFileStream.Create(´arquivo.avi´, fmOpenRead);
  try
    Stm.Position := 0;
    CampoBlob.LoadFromStream(Stm); 
  finally
    Stm.Free;
  end;

end;
 


e, para carregar de volta é só fazer a operação contrária.. é a mesma coisa q carregar figuras (jpg)


T+


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar