Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Копирование файлов [D5, D7, XP]


Александр10 ©   (2006-10-12 10:22:00) 

Здравствуйте уважаемые мастера, профессионалы.
У меня такой вопрос.
Путь куда нужно скопировать файл например C:\aaa\1\10.txt
А файл находится например на флешки. Ну или не важно где.
Вот только как сделать так, чтобы процедура копирования файла создавала каталоги, куда надо поместить файл сама автоматически.
Ну т.е. если каталога нет то она его создаст при копировании файла.
Просто надо скопировать очень много файлов 3000 шт и рассортеровать их по соответствующим каталогам. Каталогов очень большое разнообразие.
Помогите пожалуйста!
Зарание большое спасибо!


Александр10   (2006-10-12 15:51:00) [1]


> а еще может пригодиться memo.lines[].

Да я этим пользуюсь.
А насчёт чтения я этим и занимаюсь. Переворачиваю интернет!
Но пока такого примера не нашёл.


Barloggg   (2006-10-12 12:28:00) [2]

а еще может пригодиться memo.lines[].


Плохиш   (2006-10-12 11:07:00) [3]


> выделить - Extract


> файл - File


> путь - Path / Dir

имя - Name

PS. Составить названия функций будет твоим домашним заданием. Может всё-таки пойдёшь почитаешь чего-нибуть.


Palladin   (2006-10-12 11:07:00) [4]

ExtractFilePath


Александр10   (2006-10-12 11:00:00) [5]

ForceDirectories('C:\aaa\1\'); Да спасибо это помагло!
Только теперь такой вопрос.
Есть много путей к файлам. Ну например один из них - 'C:\aaa\1\10.txt'
Нужно создать много различных каталогов, потом файлу скопировать.
Все пути записаны в текстовом файле.
Ну я например этот файл загрузил в Memo1. А как мне теперь каждую строчку файла расчлинить. Ну в функцию ForceDirectories('C:\aaa\1\'); надо записовать с только с точностью до каталога. А у меня там пути (адреса) сточностью до файла. Как же выделить отдельно путь и сам файл???


unknown   (2006-10-12 10:39:00) [6]


> Александр10   (12.10.06 10:29) [3]

создаем каталогИ aaa и 1 :
ForceDirectories('C:\aaa\1\');
если нужен один каталог (\2\ например) и C:\aaa\ уже
существует, то как ни странно для этого есть есть ф-я MkDir('C:\aaa\2\');
ну и далее
CopyFile(...


Александр10   (2006-10-12 10:29:00) [7]


> см. ForceDirectories()

А по подробне. Если можно. Плиз!


Александр10   (2006-10-12 10:28:00) [8]

CopyFile(D:\1.txt), PChar('C:\aaa\1\10.txt'), True);
Этой не хитрой строчкой пользуюсь при копировании файлов!
Вот только каталоги она не умеет создавать!


unknown   (2006-10-12 10:26:00) [9]


> Александр10   (12.10.06 10:22)
> Вот только как сделать так, чтобы процедура копирования
> файла создавала каталоги
>

см. ForceDirectories()


Наверх

Титульная страница Поиск, карта сайта Написать письмо