var bm := TIEBitmap.Create;
    try
      bm.Width := 512;
      bm.Height := 512;
      bm.Read(dlgOpenImage.Filename);
      fDBMultiBitmap.AppendImage( bm );
    finally
      bm.Free;
    end;

var
  fs: TFileStream;
begin
  fs := TFileStream.Create(FileName, fmOpenRead or fmShareDenyWrite);
  try
    fs.Position := 0;
    // Transfer from the memory stream to the blobstream
    aBlobStream := BlobField.DataSet.CreateBlobStream( BlobField, bmWrite );
    try
      aBlobStream.CopyFrom( fs, fs.Size );
    finally
      aBlobStream.Free;
    end;
  finally
    fs.free;
  end;

var
  bmp: TIEBitmap;
begin
  bmp := TIEBitmap.Create;
  try
    bmp.ParamsEnabled := True;
    bmp.Params.LoadToWidth  := 1000;
    bmp.Params.LoadToHeight := 1000;
    bmp.Params.AutoScaleImport := True;
    bmp.Read('input.svg');

    ... Do something with bmp...

  finally
    bmp.Free;
  end;
end;

var
  fs: TFileStream;
begin
  fs := TFileStream.Create(FileName, fmOpenRead or fmShareDenyWrite);
  try
    fs.Position := 0;
    // Transfer from the memory stream to the blobstream
    aBlobStream := BlobField.DataSet.CreateBlobStream( BlobField, bmWrite );
    try
      aBlobStream.CopyFrom( fs, fs.Size );
    finally
      aBlobStream.Free;
    end;
  finally
    fs.free;
  end;