Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 26.11.2006, 04:49   #1
Simply-Art
Программист и
Участник клуба
 
Аватар для Simply-Art
 
Регистрация: 29.10.2006
Сообщений: 1,265
По умолчанию глобальный поиск по винтам

Как найти определенные файлы на всех винтах во всех папках. Все алгоритмы, которые я перепробовал либо работают не совсем нормально, либо вообще не работают.
Simply-Art вне форума Ответить с цитированием
Старый 26.11.2006, 13:28   #2
X=Vitamin=X
Пользователь
 
Аватар для X=Vitamin=X
 
Регистрация: 18.11.2006
Сообщений: 32
По умолчанию

что именно ты пробовал, и как???
приведи пример !
Незнание - рабство, знание - свобода ! ! !
X=Vitamin=X вне форума Ответить с цитированием
Старый 26.11.2006, 17:58   #3
Alar
Александр
Администратор
 
Аватар для Alar
 
Регистрация: 28.10.2006
Сообщений: 17,501
По умолчанию

Simply-Art, как старожилу сайта, надо знать о разделе Лабораторные работы на сайте.

Здесь есть решение всех элементарных задач.
Alar вне форума Ответить с цитированием
Старый 27.11.2006, 07:33   #4
Virtson
Владимир М.
Участник клуба
 
Аватар для Virtson
 
Регистрация: 30.10.2006
Сообщений: 1,289
По умолчанию

рекурсивный поиск работает. вызываешь его для дисков по очереди.
Берегите друг друга!
Virtson вне форума Ответить с цитированием
Старый 27.11.2006, 08:36   #5
execom
Редкий тунеядец
Форумчанин
 
Аватар для execom
 
Регистрация: 29.10.2006
Сообщений: 595
По умолчанию

Создаешь на всех локалах от C:\ до Z:\ пробный файл если файл создается осуществляешь рекурсивный поиск по маске (*.*-все, *.exe и т.д.).
execom вне форума Ответить с цитированием
Старый 27.11.2006, 17:02   #6
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Цитата:
Создаешь на всех локалах от C:\ до Z:\ пробный файл если файл создается
Список доступных логических дисков можно получить с помощью виндовой функции GetLogicalDrives:
Код:
function LogicalDrives: String;
var drives: set of 0..25;
    drive: integer;
begin
Result:='';
DWORD(drives):=Windows.GetLogicalDrives;
for drive:=0 to 25 do
if drive in drives then
Result:=Result+Chr(drive+Ord('A'));
end;
Результат - строка вида "CDEF"

Последний раз редактировалось mihali4; 02.11.2010 в 19:53.
mihali4 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Глобальный хук на мышь не глобальный О_о JTG Общие вопросы Delphi 3 05.06.2008 17:41
Поиск по FTP Averss PHP 4 04.09.2007 20:37
Поиск Andr Microsoft Office Excel 2 18.07.2007 11:49
поиск Lonix Общие вопросы Delphi 2 04.04.2007 01:59
глобальный хук & событие отжатия клавиши Nowichok Общие вопросы Delphi 9 24.11.2006 17:51