|
|
|||
|
wm-help.net -> Электронная библиотека -> Delphi -> 39 советов по Delphi -> Размер BLOB-поля.Размер BLOB-поля.
Function GetBlobSize(Field: TBlobField): LongInt;
begin
with TBlobStream.Create(Field, bmRead) do
try
Result := Seek(0, 2);
finally
Free;
end;
end;
|