Форум: "Система";
Текущий архив: 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]Спасибо, за помощь! разобрался.
Страницы: 1 вся ветка
Форум: "Система";
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.095 c