[firebase-br] Armazenar documento do Word !?

[Jorge Santos]

Caro Luís, este código abaixo serve para consegurimos colocar qualquer 
uma imagem em qualquer formato em um TImage. Mas com uma pequena 
adaptação tu podes colocar o Stream em um campo Blob, vou tentar mostrar 
como ficaria esta rotina:
*uses *axCtrls
    ...*procedure *TForm1.Button1Click(Sender: TObject);
*var
  *OleGraphic: TOleGraphic;
  fs: TFileStream;
*begin
  try
    *OleGraphic := TOleGraphic.Create;
    fs         := TFileStream.Create('C:\...\test.doc', fmOpenRead *or *fmSharedenyNone);
    OleGraphic.LoadFromStream(fs);
    TBlobField(CampoBlob).Assign(OleGraphic);
  *finally
    *fs.Free;
    OleGraphic.Free
  *end*;
*end*;


Este código acima deve funcionar.
J. Luís Schiavo wrote:

> Alguém sabe se é possível Armazenar documentos do Word em campos blob 
> do firebird? Ou melhor, armazenar texto com a formatação do word?
>
> Programando em Delphi consigo interagir com o Word editando texto de 
> um blob e gravando novamente, porém, não guarda a formatação do texto 
> (negrito, sublinhado, ect). Tentei com Blob tipo zero(binário) e 
> 1(texto) e não funcionou.
>
> Alguém já teve alguma experiência semelhante, e que tenha dado certo?
>
> Desde já agradeço.
>
> J.Luís Schiavo
> SysBase Informática Ltda.
> Santa Rosa - RS
>
>
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.com.br
> Para editar sua configuração na lista, use o endereço 
> http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>
>