╩αΩ Γ√ ±φΦ≥ⁿ ≡ατ∞σ≡ BLOB-∩εδ ?

╤δσΣ≤■∙α  ⌠≤φΩ÷Φ  ∩ε∞εµσ≥ ε∩≡σΣσδΦ≥ⁿ ≡ατ∞σ≡ BLOB-∩εδ . 

Function GetBlobSize(Field: TBlobField): LongInt;

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




╤εΓσ≥√ φα≈Φφα■∙Φ∞