Скачать: 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.014 c