Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Система";
Текущий архив: 2003.01.16;
Скачать: [xml.tar.bz2];

Вниз

Как узнать размер папки или количество файлов в ней без FindNext   Найти похожие ветки 

 
alexta   (2002-11-02 15:33) [0]

Привет всем!

Никто не знает как можно узнать размер папки или количество файлов в ней без FindNext? В принципе задача поставлена так: отображать процесс создания списка файлов из каталога (с подкаталогами). Возможно ли это в принцепе? Windows как-то умудряется считать размер папки очень быстро.

Заранее благодарю.


 
Marcus   (2002-11-04 12:00) [1]

Без FindNext никак. А винда так и считает, просто она считает в отдельном потоке. Замечал, наверно, если объемную папку откроешь, вся инфа уже видна, а байтики продолжают набегать...


 
Song   (2002-11-04 14:04) [2]

Why not?
LB_DIR+TListBox.Items.Count


 
Marcus   (2002-11-04 16:29) [3]

2 Song: А ListBox по-твоему чем пользуется? Тот же FindNext, как ни крути. А использование ListBox бодрости программе не прибавит


 
Song   (2002-11-05 08:54) [4]

2Marcus (04.11.02 16:29)
Раз попал впросак признай свою неправоту и не надо выворачиваться. TListBox не пользуется TSearchRec


 
Viktor Kushnir   (2002-11-05 09:14) [5]

TListBox, действительно не использует TSearchRec, так как просто не считывает файлы. Marcus наверное имел в виду TFileListBox, вот он действительно юзает и TSearchRec и все что с ним связанно.


 
Dimka Maslov   (2002-11-05 09:42) [6]

IShellFolder. Есть демонстрационная программа VirtualListView, входящая в комплект поставки Delphi, где показано как с ним работать.



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

Форум: "Система";
Текущий архив: 2003.01.16;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.007 c
1-49018
Song
2003-01-07 12:53
2003.01.16
Проблема: на событии onCreate формы1 надо отобразить


1-49082
kolega
2003-01-04 22:49
2003.01.16
как исправить иероглифы?


14-49226
В. М.
2002-12-26 02:07
2003.01.16
String


3-48846
Maks
2002-12-23 14:04
2003.01.16
Winwows


1-48972
dor
2003-01-06 10:51
2003.01.16
Прога такая





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский