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

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

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 17.12.2013, 20:01   #1
Konstantin_ua
Не судите строго
Форумчанин
 
Аватар для Konstantin_ua
 
Регистрация: 31.03.2011
Сообщений: 202
По умолчанию копирование файлов

как в опендиалог выбрать несколько файлов(тима мультиселект) и как то скопировать их в указную папку?
вот как я копирую 1 файл.
Код:
 SysUtils.createdir(dir+'\'+edt2.Text);
              
              CopyFile(Pchar(edt5.Text), Pchar(dir+'\'+edt2.Text+'\'+ namee), true);
Konstantin_ua вне форума Ответить с цитированием
Старый 17.12.2013, 23:11   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
как в опендиалог выбрать несколько файлов
Код:
OpenDialog.Options:=OpenDialog.Options+[ofAllowMultiSelect];
Цитата:
как то скопировать их в указную папку?
Каждый файл выбирается из массива:
Код:
with OpenDialog.Files do
 for i:=0 to Count-1 do
  Копируем с именем из Strings[i];
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 19.12.2013, 17:29   #3
Konstantin_ua
Не судите строго
Форумчанин
 
Аватар для Konstantin_ua
 
Регистрация: 31.03.2011
Сообщений: 202
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Код:
OpenDialog.Options:=OpenDialog.Options+[ofAllowMultiSelect];
Каждый файл выбирается из массива:
Код:
with OpenDialog.Files do
 for i:=0 to Count-1 do
  Копируем с именем из Strings[i];
спасибо очень помогли
Konstantin_ua вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Копирование файлов xAVATARx Мультимедиа в Delphi 5 08.06.2012 14:08
Копирование файлов marat58172 C# (си шарп) 2 22.04.2011 23:48
Копирование файлов ARXangel Общие вопросы Delphi 5 30.10.2008 12:29
копирование файлов matus Общие вопросы Delphi 2 07.11.2007 21:57