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

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

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 04.07.2011, 22:15   #1
Ира08
Пользователь
 
Регистрация: 03.04.2009
Сообщений: 17
По умолчанию Delphi. преобразование строки в путь к файлам

Всем добрый вечер.
Помогите пожалуйста с такой проблемой: у меня есть текстовый файл, в которым хранится путь к файлам в виде одной строки.
Мне надо считать его и ПРОЙТИ по этому пути, чтобы вывести содержимое файлов, которые находятся в папке, куда ведёт этот путь.
Содержимое первого файла с путём я могу считать, а вот как его преобразовать, чтоб компьютер понял, что это определённая директория?

заранее благодарю.
Ира08 вне форума Ответить с цитированием
Старый 04.07.2011, 22:31   #2
veniside
Старожил
 
Регистрация: 03.01.2011
Сообщений: 2,508
По умолчанию

> чтоб компьютер понял, что это определённая директория

вам нужны FindFirst(), FindNext(), FindClose(). Типа такого:

Код:
  {
    Reads all directories in ParentDirectory, adds their paths to
    DirectoryList,and returns the number added
  }
function TDirectoryListbox.ReadDirectoryNames(const ParentDirectory: string;
  DirectoryList: TStringList): Integer;
var
  Status: Integer;
  SearchRec: TSearchRec;
begin
  Result := 0;
  Status := FindFirst(SlashSep(ParentDirectory, '*.*'), faDirectory, SearchRec);
  try
    while Status = 0 do
    begin
      if (SearchRec.Attr and faDirectory = faDirectory) then
      begin
        if (SearchRec.Name <> '.') and (SearchRec.Name <> '..') then
        begin
          DirectoryList.Add(SearchRec.Name);
          Inc(Result);
        end;
      end;
      Status := FindNext(SearchRec);
    end;
  finally
    FindClose(SearchRec);
  end;
end;
только это по директориям ходит, а вам нужно по файлам. но смысл тот же.
"Когда приходит положенное время, человек перестаёт играть в пинбол. Только и всего."
veniside вне форума Ответить с цитированием
Старый 05.07.2011, 22:11   #3
Ира08
Пользователь
 
Регистрация: 03.04.2009
Сообщений: 17
По умолчанию

спасибо. попробую
Ира08 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
C++ Builder ListBox путь к файлам animalshadow C++ Builder 2 25.04.2010 17:57
Преобразование строки PeRt Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 0 23.04.2010 10:01
Доступ к файлам в Delphi Николай ПН Помощь студентам 5 25.03.2010 21:12
Преобразование строки Neeter Общие вопросы C/C++ 5 05.07.2009 16:25
Delphi,преобразование строки в выражение Chidory Помощь студентам 10 16.12.2008 02:18