Как выяснить размер BLOB-поля

function GetBlobSize(Field: TBlobField): LongInt;
begin
  with TBlobStream.Create(Field, bmRead) do
    try
      Result := Seek(0, 2);
    finally
      Free;
    end;
end;

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

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