Форум программистов, компьютерный форум, киберфорум
Наши страницы
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Navelion
0 / 0 / 0
Регистрация: 17.12.2017
Сообщений: 10
1

Прочитать название файлов из папки

17.12.2017, 17:09. Просмотров 141. Ответов 4
Метки нет (Все метки)

Написать программу, которая считает названия текстовых файлов из папки и дату их создания.
Вывести в другой текстовый документ или просто на экран, не важно.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.12.2017, 17:09
Ответы с готовыми решениями:

Прочитать названия текстовых файлов из папки и дату их создания
Написать программу, которая считает названия текстовых файлов из папки и дату...

Изменение стандартной папки для сохранения всех файлов (Ubuntu)
ОС: Linux Ubuntu ПО: Free Pascal Вопрос: FP изначально своей рабочей папкой...

Объявить класс «Вокзал» с указанием полей: название вокзала, местонахождение (название города), число направлений, поток пассажиров.
Объявить класс «Вокзал» с указанием полей: название вокзала, местонахождение...

Получить название файлов с 1-ой папки , со 2-ой папки и вывести. Неправильный вывод
Есть такая задача: получить название файлов с 1-ой папки , со 2-ой папки и...

В определенной директории, прочитать все имена файлов и создать папки, с названиями этих файлов
В общем Моя задача, в определенной директории, прочитать все имена файлов и...

4
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
4004 / 2939 / 3685
Регистрация: 05.06.2014
Сообщений: 14,519
17.12.2017, 17:20 2
Прочитать названия текстовых файлов из папки и дату их создания
0
Navelion
0 / 0 / 0
Регистрация: 17.12.2017
Сообщений: 10
17.12.2017, 23:00  [ТС] 3
А не подскажете как дописать ее, чтоб имя файла узнать.
0
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
4004 / 2939 / 3685
Регистрация: 05.06.2014
Сообщений: 14,519
18.12.2017, 09:04 4
Цитата Сообщение от Navelion Посмотреть сообщение
чтоб имя файла узнать.
Есть уже.
Pascal
1
WriteLn(sr.name,
Добавлено через 16 минут
Или полное имя файла нужно?

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
uses
  sysutils, windows;
 
var
  t1: TFILETIME;
  t2: TSYSTEMTIME;
  path:string;
  sr: TSearchRec;
 
begin
  path:='c:\windows\*.*';
  if FindFirst(path, faAnyFile and faDirectory, sr) = 0 then
  begin
    repeat
      FileTimeToLocalFileTime(sr.FindData.ftCreationTime, t1);
      FileTimeToSystemTime(t1, t2);
      WriteLn(ExtractFilePath(path)+sr.name, ' ', DateTimeToStr(SystemTimeToDateTime(t2)));
    until FindNext(sr) <> 0;
  end;
  readln;
end.
1
Navelion
0 / 0 / 0
Регистрация: 17.12.2017
Сообщений: 10
18.12.2017, 14:03  [ТС] 5
Ааа спасибо все понял, простите не заметил сразу
0
18.12.2017, 14:03
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
18.12.2017, 14:03

Вывод название файлов из папки в таблицу
Здравствуйте, мне нужно сделать что бы с папки выводило все названия файлов и...

Изменить название файлов загруженных из папки
Есть у меня макрос который меняет названия, с расширением txt все гладко, а вот...

Как получить название файлов из папки
Возникла необходимость сравнить найти лишний файл в папке. Как себе это...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru