Форум: "Основная";
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];
ВнизНе могу разобраться, как определить размер файла??? Найти похожие ветки
← →
Fast (2002-01-14 20:16) [3]Пердлагаю так.
var
Sr:TsearchRec;
Size:integer;
Time:TDateTime;
begin
if FindFirst("C:\AUTOEXEC.BAT",FaAnyFile,Sr) = 0 then
begin
Size:=sr.Size;
Time:=FileDateToDateTime(sr.time);
FindClose(sr);
end;
end;
Ну конечо путь к файлу тебе надо знать.
Чем удобно: получишь почти всю инфу по файлу сразу.
TSearchRec также будет содержать и аттрибуты, если если они тебе нужны.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.005 c