Внести изменения в набор данных и не потерять текушей позиции

procedure
 TMyForm.MakeChanges;
var

  aBookmark: TBookmark;
begin

  Table1.DisableControls;
  aBookmark := Table.GetBookmark;
  try

    {ваш код}
  finally

    Table1.GotoBookmark(aBookmark);
    Table1.FreeBookmark(aBookmark);
    Table1.EnableControls;
  end
;
end
;

Другое по теме:

• BLOBFIELD как BITMAP
• Interbase BLOB-поля
• Загрузка изображений в Blob-поля