[Casimiro Notevi]

Te pongo un ejemplo simple que carga una imagen en un campo blob.

Código Delphi [-]
procedure TFempresas.bt37Click(Sender: TObject);
begin
  if dlgLoadLogo.Execute then
  begin    
    TBlobField(DSconfig.DataSet.FieldByName('logotipo')).LoadFromFile(dlgLoadLogo.FileName);
    DSconfig.DataSet.Post;
    TpFIBDataSet(DSconfig.DataSet).Transaction.CommitRetaining;    
  end;
end;