определить папку - Общие вопросы Delphi

мандарин · 12.05.2007, 21:34

в папке находятся папки мне нужно определить их имя, дату создания, путь к папке.

Viteef · 12.05.2007, 23:04

Могу сказать только для файлов:

FileAge(FileName); - Время и дата создания

RSLoader · 13.05.2007, 00:18

Цитата:

в папке находятся папки

Если в известной папке, тогда можно так:

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
  SR:TSearchRec;
begin
  if FindFirst('D:\*.',faAnyFile,SR)=0 then
  repeat
    if SR.Name[1]<>'.' then
    Memo1.Lines.Add(Path+' '+SR.Name+' '+
      DateTimeToStr(FileDateToDateTime(SR.Time)));
  until FindNext(SR)<>0;
end;

мандарин · 13.05.2007, 12:18

спасибо большое

мандарин · 13.05.2007, 16:16

а почему не определяет папку с именем 11.12.1999 или тому подобное

Alar · 13.05.2007, 17:20

http://delphibasics.ru/FindFirst.php

12.05.2007, 21:34	#1
мандарин Пользователь Регистрация: 22.04.2007 Сообщений: 31	определить папку в папке находятся папки мне нужно определить их имя, дату создания, путь к папке.

13.05.2007, 17:20	#6
Alar Александр Администратор Регистрация: 28.10.2006 Сообщений: 17,501	http://delphibasics.ru/FindFirst.php Купить рекламу на форуме за 42 тыс руб за месяц размещения

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Пароль на папку	FEAR	Помощь студентам	13	01.02.2010 07:53
как создать папку	мандарин	Общие вопросы Delphi	11	30.01.2009 15:18
Среди 20 введёных чисел определить чётные, распечатать их, определить min	Spade	Помощь студентам	4	15.06.2008 18:39
как создать папку	matus	Помощь студентам	2	05.11.2007 22:19
Как зашифровать папку	UnD)eaD)Snake	Общие вопросы Delphi	6	15.08.2007 17:14

12.05.2007, 23:04	#2
Viteef stopfake.org Участник клуба Регистрация: 03.05.2007 Сообщений: 1,927	Могу сказать только для файлов: FileAge(FileName); - Время и дата создания

13.05.2007, 12:18	#4
мандарин Пользователь Регистрация: 22.04.2007 Сообщений: 31	спасибо большое

13.05.2007, 16:16	#5
мандарин Пользователь Регистрация: 22.04.2007 Сообщений: 31	а почему не определяет папку с именем 11.12.1999 или тому подобное