Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c
3-29729
F1
2003-02-19 11:05
2003.03.10
AV при ADOQuery.ExecSQL


1-29828
TButton
2003-02-24 21:17
2003.03.10
динамические массивы и операции


14-30051
Владимир
2003-02-14 16:16
2003.03.10
Как узнать имена процедур и функций в чужой ДЛЛ?


14-30134
Anar
2003-02-23 00:06
2003.03.10
Стили XP в Windows 98


6-30000
Nick_N_A
2003-01-19 06:09
2003.03.10
iExplorer Автономный режим




   Наверх