![]() |
|
Модераторы: Poseidon, Snowy, bems, MetalFan |
![]()
|
|
| Klio |
|
|||
![]() Шустрый ![]() Профиль Группа: Участник Сообщений: 111 Регистрация: 18.4.2008 Где: Харьков - СС_3 Репутация: нет Всего: 1 |
Помогите пожалуста сделать алгоритм по поиску файлов в определённой директории и во всех вложенных в неё подпапках (знаю это не сложно, такого хлама много), Но проблема в том что нужно это запихнуть в StringGrig:
1- каждая строка это один файл. 2- название папки записывать не нужно как отдельная запись. 3- в 1-й колонке имя файла (без расширения), во 2-й расширение (типа: "txt" "doc" "avi"), в 3-й- его полный адрес (путь) файла, в 4-й размер файла! Самая большая проблема у меня это отделить расширение, и вывести путь файла! Заранее спасибо! |
|||
|
||||
| DeadMage |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 13 Регистрация: 17.4.2008 Репутация: нет Всего: нет |
Функция для определения расширения - ExtractFileExt, путь файла - ExtractFilePath.
|
|||
|
||||
| volvo877 |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 2073 Регистрация: 15.11.2004 Репутация: 14 Всего: 116 |
Для удаления расширения из имени файла - ChangeFileExt(имя_файла, '')
|
|||
|
||||
![]()
|
| Правила форума "Delphi: Общие вопросы" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |