Campos Blob con imagenes y stringgrid

[rruffino]

Mira, entre otras cosas he probado esto, dond Zquery_lectura es mi origen de donde tengo la imagen y quiero pasarla a mi tabla. Copia algo pero no lo puedo ver como imagen.

Código Delphi [-]
    bs:=TMemoryStream.Create;
    blobF:=TBlobField(DM.ZQuery_lectura.FieldByName('FOTO'));
    blobF.SaveToStream(bs);
    bs.Position:=0;

    with(DM.ManejaDatos)do
      begin
         SQL.Clear;
         SQL.Add('update rel_concepto_suministro set imagen=:ima where id_relacion=1');
         ParamByName('ima').AsBlob:=blobF.AsVariant;
         Open;
      end;

Gracias!!