Отображение информации при поиске файлов

[Аватар]

в строку статуса выводится имя каталога

Вот-вот. Можно еще мелькающее имя файла выводить. И не забывать ProcessMessages, а то не увидишь изменения

[botan32]

Я это в процедуре реализовал, там это написано. Просто хотелось реализовать через progressbar, так как я считаю, это лучшее визуальное средство отображающее ход работы.

[min@y™]

Просто хотелось реализовать через progressbar, так как я считаю, это лучшее визуальное средство отображающее ход работы.

Да пойми ты, ёмаё, что ProgressBar возможен, если количество (в данном случае - файлов) известно заранее.

[Stilet]

я считаю, это лучшее визуальное средство отображающее ход работы.

Лучшее средство это строка в лейбле в которой крутится набор символов "-\/" за которыми идет число пройденный файлов и имя текущего файла.

[FaTaL]

Сообщение от botan32

Узнать заранее размер папки, это не вариант. А если поиск будет осуществляться не в папке а на диске.... Программа просто будет висеть. Странно, но в других же прогах это как то реализовано.

Если на диске, то это проще, так как не нужно искать размер папки,а просто узнать размер занятого или свободного пространства всего логического диска.

[Stilet]

а просто узнать размер занятого или свободного пространства всего логического диска.

Все равно и это не выход. Как ты если будешь искать по маске определишь сколько таких по маске на диске?

[FaTaL]

Сообщение от Stilet

Все равно и это не выход. Как ты если будешь искать по маске определишь сколько таких по маске на диске?

В коде ТС в поиске участвуют все файлы FindResult := FindFirst(StartFolder + '*.*', faAnyFile, SearchRec);

P.S.Да я понимаю что это совершенно не нужно, просто предложил как вариант, раз ТСу так хочется.