Форум: "Основная";
Текущий архив: 2002.09.05;
Скачать: [xml.tar.bz2];
ВнизПример из FAQ не работает (список файлов и каталогов ЭВМ) Найти похожие ветки
← →
Олеся (2002-08-26 13:28) [0]Здравствуйте.
Я только начинаю изучать Паскаль и среду программирования Delphi, а мне потребовалось написать программу, которая создает список файлов и каталогов компьютера пользователя.
Практически сразу я нашла решение, которое написано в разделе faq : http://delphi.mastak.ru/cgi-bin/faq.pl?look=1&id=1015254946&n=19
Когда я вставила пример в свою программу, то сначала я не заметила важной проблемы: если указать ScanDir("любой путь", "*.*", FileList.Items), то всё работает правильно, но если сделать вот так ScanDir("любой путь", "*.doc", FileList.Items), то программа просто просканирует корень указанного пути, не заходя в папки.
Как решить эту загвоздку моих знаний хватает, поэтому решила спросить у создателя этого применра - Анатолия Подгорецкого, которого судя по всему, затруднило дать мне ответ.
P.S. Когда я почитала сообщения на форуме, сложилось такое впечатление, что новичков здесь просто не любят, отправляя их во всякие MS SDK (хорошо преподаватель рассказал что это такое), FAQ и прочие. А как же быть таким как я, например - только 2 месяца как пользуюсь дома сетью интернет и не очень хорошо ориентируюсь где и что?
Спасибо.
← →
Skier (2002-08-26 13:32) [1]>Олеся
Дам здесь никогда не обижают.
Во всяком случае я такого не помню...
← →
Игорь Шевченко (2002-08-26 13:49) [2]И я не помню, чтобы дам обижали...
Но книжки читать даже дамам полезно :-)
Дело в том, что при задании маски "*.*" каталоги попадают в список найденных файлов, а при задании маски "*.doc" каталог попадет в список найденных файлов, только если он назнан, например MyDocs.Doc
Вам же надо вызвать поиск с маской "*.*" и выбрать все .doc -файлы самостоятельно, например
С уважением,
← →
Олеся (2002-08-26 14:00) [3]>>Дам здесь никогда не обижают.
Да нет, Вы меня неправильно поняли. Как я поняла дамы здесь вообще практически отсутствуют. Я имела ввиду вообще новичков, которые задают, по мнению большинства, глупые вопросы. Так ведь это для Вас они глупые, а для нас они непреодолимая проблема.
>>Вам же надо вызвать поиск с маской "*.*" и выбрать все .doc -файлы самостоятельно, например
Я так и сделала - создала объект TStrings и проверяю, если есть расширение .doc и если это не каталог, то всё в порядке. Но насколько я поняла, есть и другие способы, о которых пока не знаю, или я ошибаюсь?
← →
Игорь Шевченко (2002-08-26 14:11) [4]Есть.
Первым вызовом FindFirst/FindNext выбрать только каталоги. Процедуру, естественно, придется поменять.
Вторым вызовом пройти по выбранным каталогам, и в каждом искать файлы .doc
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.09.05;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.007 c