[n03l]

Hola gracias por responder,
Fijate q me fije este post
http://www.clubdelphi.com/foros/showthread.php?t=80380

e ise esto

Código Delphi [-]
FileName, FieldName: string;
BLOB:TSTREAM;
STREAM:TSTREAM;
begin


Filename:='D:\AAA.txt';

 BLOB:=TFILESTREAM.Create(Filename,FMOPENREAD); //Asignamos el archivo abierto al //stream blob.
    Opciones.Edit;; // Insertamos un nuevo registro.
   STREAM:=Opciones.CreateBlobStream(Opciones.FieldByName('PRUEBA'), bmWrite); //Preparamos el campo blob para escritura.
   STREAM.CopyFrom(BLOB,BLOB.Size); //Copiamos el archivo que hemos abierto al Stream //para que el query lo guarde.
 
   BLOB.DESTROY;
   STREAM.DESTROY;
   Opciones.Post; //guardo el registro.
  IBTransaction.CommitRetaining;

pero me aparecen puros ?????????????????? signos de interrogacion en el campo

tambien e sustituido esta linea

Código Delphi [-]
 BLOB:=TFILESTREAM.Create(Filename,FMOPENREAD);

por esta otra

Código Delphi [-]
BLOB:=TStringStream.Create('uno dos tres');

y pasa lo mismo guarda puros signos de interrogacion???

saludos