Поиск:

Ответ в темуСоздание новой темы Создание опроса
> копирование папки 
V
    Опции темы
Domain
Дата 30.4.2010, 10:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 170
Регистрация: 11.3.2010

Репутация: нет
Всего: нет



есть код для копирование папок и подкаталогов в них(вместе со вложенными файлами)
Код

void CopyDirectory (AnsiString Src, AnsiString Dest)
{
  TSearchRec sr;
  if (FindFirst(Src+"\\*", faAnyFile, sr) == 0)
     {
       do
         {
           if (sr.Attr & faDirectory) // directory
              {
                if (sr.Name!=".")
                if (sr.Name!="..")
                   {
                     AnsiString SubFld = Src+"\\"+sr.Name;
                     if (!DirectoryExists(Dest+"\\"+ sr.Name))
                         CreateDir(Dest+"\\"+ sr.Name);
                     CopyDirectory (SubFld, Dest+"\\"+ sr.Name);
                   }
              }
           else // file
              {
                if (sr.Name!=".")
                if (sr.Name!="..")
                   {
                     AnsiString OldName = Src+"\\"+ sr.Name;
                     AnsiString NewName = Dest+"\\"+ sr.Name;
                     CopyFile(OldName.c_str(), NewName.c_str(), TRUE);
                   }
              }
          } while (FindNext(sr) == 0);
    FindClose(sr);
  }
}


как сделать так чтобы в например в TLabel отражалось имя копируемого файла и процесс копирование текущего файла отображался в TProgressBar? 
PM MAIL   Вверх
xvr
Дата 30.4.2010, 11:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 7046
Регистрация: 28.8.2007
Где: Дублин, Ирландия

Репутация: 48
Всего: 223



Цитата(Domain @  30.4.2010,  10:21 Найти цитируемый пост)
как сделать так чтобы в например в TLabel отражалось имя копируемого файла
Перед CopyFile вставить 
Код

Label->Caption=OldName;
Label->Repaint();

Цитата

процесс копирование текущего файла отображался в TProgressBar?  
Заменить CopyFile на CopyFileEx и подать ей progress routine (3й параметр lpProgressRoutine)


PM MAIL   Вверх
Domain
Дата 30.4.2010, 11:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 170
Регистрация: 11.3.2010

Репутация: нет
Всего: нет



спасибо. ща попробую.
PM MAIL   Вверх
Domain
Дата 30.4.2010, 11:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 170
Регистрация: 11.3.2010

Репутация: нет
Всего: нет



CopyFileEx(OldName.c_str(), NewName.c_str(), lpProgressRoutine,NULL,TRUE,COPY_FILE_OPEN_SOURCE_FOR_WRIT); не работает . в чем проблема. а что должно быть в lpProgressRoutine. это типа переменная, которая будет меняться по ходу или что?
PM MAIL   Вверх
xvr
Дата 30.4.2010, 16:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 7046
Регистрация: 28.8.2007
Где: Дублин, Ирландия

Репутация: 48
Всего: 223



Цитата(Domain @  30.4.2010,  11:57 Найти цитируемый пост)
а что должно быть в lpProgressRoutine
Это указатель на функцию, которая будет вызываться в процессе копирования. Смотреть тут


PM MAIL   Вверх
SerK
Дата 1.5.2010, 09:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 263
Регистрация: 31.3.2007

Репутация: нет
Всего: нет



Посмотри здесь, может поможет:

http://www.dudarik.wallst.ru/dudarikfiles/...eashdelfile.php


--------------------
Пусть будет миру хорошо!
PM MAIL   Вверх
Domain
Дата 3.5.2010, 11:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 170
Регистрация: 11.3.2010

Репутация: нет
Всего: нет



все равно не доганяю как это сделать. если кто делал, киньте рабочий код.  smile 
PM MAIL   Вверх
smoke_man
Дата 3.5.2010, 17:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 447
Регистрация: 25.1.2007
Где: Рязань

Репутация: 9
Всего: 17



Посмотри тут.


--------------------
0x2b|~0x2b
PM MAIL ICQ GTalk   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »


 




[ Время генерации скрипта: 0.0523 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.