VPF::[C++/Winapi] Работа с дисками - Форум программистов

Bondleha

Дата 16.5.2010, 12:16 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

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

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

Суть проблемы такова!! Вот задание!
Найти в текущем каталоге все файлы с расширением txt и переписать их содержимое в один файл – resume.txt. Считать поочередно содержимое каждого из найденных файлов, а затем полученного файла.
Вот что получилось!!

Код


WIN32_FIND_DATA FileData;/*Структура с информацией о поиске */
  HANDLE hSearch;/* дескриптор поиска */
  BOOL fFinished = FALSE;/* флаг завершения поиска */
 
  /* Поиск первого .cpp файла в текущем каталоге */
  hSearch = FindFirstFile("*.txt", &FileData);
   /* Если файл не найден*/
  if (hSearch == INVALID_HANDLE_VALUE)
   Memo1->Lines->Add("No .txt files found");
  /*Если файл найден, вывод его имени */
  else
     Memo1->Lines->Add(FileData.cFileName);
  /* Поиск последующих .txt файлов в текущем каталоге */
  while (!fFinished)
  {
   /* Если файл найден, вывод его имени*/
    if (FindNextFile(hSearch, &FileData) != 0 )
       Memo1->Lines->Add(FileData.cFileName);
   /* Если файл не найден вывод информации об ошибке */
    else
       if (GetLastError() == ERROR_NO_MORE_FILES)
        {
            Memo1->Lines->Add("No more .txt files.");
             fFinished = TRUE;
        }
  }
  /* Закрытие дескриптора поиска */
  if (FindClose(hSearch))
      Memo1->Lines->Add("Close search handle");

Т.е. Файлы я нашел а как их записать и считать потом я не пойму!! Помогите! За ранее спасиб!

586

Дата 16.5.2010, 12:45 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2243
Регистрация: 8.5.2006

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

Как-то так наверно:

Код

void __fastcall TForm1::Button1Click(TObject *Sender)
{
WIN32_FIND_DATA FileData;/*Структура с информацией о поиске */
  HANDLE hSearch;/* дескриптор поиска */
  BOOL fFinished = FALSE;/* флаг завершения поиска */
  TStringList *sl = new TStringList;

  /* Поиск первого .cpp файла в текущем каталоге */
  hSearch = FindFirstFile("*.txt", &FileData);
   /* Если файл не найден*/
  if (hSearch == INVALID_HANDLE_VALUE)
   Memo1->Lines->Add("No .txt files found");
  /*Если файл найден, вывод его имени */
  else
  {
     sl->Add(FileData.cFileName);
     Memo1->Lines->Add(FileData.cFileName);
  }
  /* Поиск последующих .txt файлов в текущем каталоге */
  while (!fFinished)
  {
   /* Если файл найден, вывод его имени*/
    if (FindNextFile(hSearch, &FileData) != 0 )
    {
       sl->Add(FileData.cFileName);
       Memo1->Lines->Add(FileData.cFileName);
    }
   /* Если файл не найден вывод информации об ошибке */
    else
       if (GetLastError() == ERROR_NO_MORE_FILES)
        {
            Memo1->Lines->Add("No more .txt files.");
             fFinished = TRUE;
        }
  }
  /* Закрытие дескриптора поиска */
  if (FindClose(hSearch))
      Memo1->Lines->Add("Close search handle");

  sl->SaveToFile("resume.txt");

  TStringList *slData = new TStringList,
      *slTmp = new TStringList;
  for(int i = 0, n = sl->Count; i < n; ++i)
  {
      slTmp->LoadFromFile(sl->Strings[i]);
      slData->AddStrings(slTmp);
  }
  slTmp->LoadFromFile("resume.txt");
  slData->AddStrings(slTmp);

  Memo1->Lines->AddStrings(slData);
  delete slData;
  delete slTmp;
  delete sl;
}

Bondleha

Дата 16.5.2010, 12:50 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

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

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

спасибо все так но!! и переписать их содержимое в один файл – resume.txt.

Добавлено через 7 минут и 11 секунд
все работает спасибо чувак ты гений smile

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