Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];




Вниз

Как можно определить размер файла 


SVF   (2002-01-10 20:49) [0]

Привет Мастера!

Кто нибудь знает как определить размер файла?
Неоткрывая сам файл. Типа того как узнать Атрибуты файла.



Suntechnic   (2002-01-10 21:12) [1]

FindFirstFile



Dimka Maslov   (2002-01-11 12:21) [2]

procedure GetFileSizeAttr(FileName: string; var Size: Integer; var Attr: Integer);
var
SR: TSearchRec;
begin
if FindFirst(FileName, faAnyFile, SR) = 0 then begin
Size:=SR.Size;
Attr:=SR.Attr;
FindClose(SR);
end;
end;



SVF   (2002-01-12 15:41) [3]

Спасибо, за помощь! разобрался.




Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.026 c
1-22663           snoup                 2002-03-28 10:50  2002.04.08  
А как сделать так что бы например когда я запускаю таймер сек. ме


3-22550           Dok_3D                2002-03-14 15:18  2002.04.08  
Этот хитрый FOR XML AUTO .......


1-22630           Anton+                2002-03-27 17:36  2002.04.08  
Чем разделитель #10 отличается от #13?


14-22805          IronHawk              2002-02-26 12:57  2002.04.08  
Приветствую Мастеров & All ! Как оакитизировать части программы по ключу в коммандной строке ?


1-22760           Goblinus              2002-03-27 13:03  2002.04.08  
Загрузка файлов не из программы