Программы   Загрузка Партнерство   О компании Контакты  
 
                    
  Карта Сайта   
   





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


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

           




Программы  |  Загрузка  |  Партнерство  |  О компании  |  Контакты

Copyright © LSD Software 2006 - 2011