Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.03.10;
Скачать: CL | DM;

Вниз

Размер файла, не открывая.   Найти похожие ветки 

 
Zn   (2003-02-26 17:08) [0]

Подскажите, пожалуйста, ссылочку, где можно найти функции для работы с файлами для небольшого файлового менеджера. Нужна функция, возвращающая размер файла и функция, возвращающая размер файлов каталога.


 
Clickmaker ©   (2003-02-26 17:15) [1]

FindFirst/FindNext


 
Zn   (2003-02-26 17:34) [2]


> Clickmaker © (26.02.03 17:15)

Остроумно...


 
Zn   (2003-02-26 17:50) [3]

Да неужели ж VB круче Дельфи? Даже там есть FileLen(filename)...


 
blackman ©   (2003-02-26 18:13) [4]

Ничего смешного. Правильно написано.
fi: TSHFileInfo;
....
ShGetFileInfo(PChar("*" + ext), 0, fi, SizeOf(fi),
SHGFI_SMALLICON or SHGFI_SYSICONINDEX or SHGFI_TYPENAME)
...


 
Clickmaker ©   (2003-02-26 18:16) [5]

Честно говоря, не пытался тебя рассмешить...
Если внимательно посмотреть хелп по FindFirst и структуре TSearchRec, то можно найти там поле Size, а если сказать так

var SR: TSearchRec;
FileSize: integer;
if (FindFirst("c:\folder\file.doc", faAnyFile, SR) = 0) then begin
FileSize := SR.Size;
FindClose(SR);
end;

то можно найти размер файла, не открывая его

PS. Подозреваю, что FileLen в VB делает тоже самое, только это скрыто от юзера


 
Zn   (2003-02-26 18:20) [6]

Вот теперь понятно, спасибо!



Страницы: 1 вся ветка

Текущий архив: 2003.03.10;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.02 c
3-29785
vell
2003-02-18 14:23
2003.03.10
SQL


4-30182
Max2002
2003-01-21 12:10
2003.03.10
Отправка сообщения


1-29952
@_Piotr
2003-02-27 15:36
2003.03.10
Имя компонента в процедуру для обработки???


6-29972
Vvedensky
2003-01-10 21:29
2003.03.10
Быстрый пинг


1-29914
dimich1978
2003-02-26 17:11
2003.03.10
Прогрмма для компьютерного клуба