Получить дату создания нескольких файлов

Catdimon

Здравствуйте!Прошу помочь со следующим, необходимо получить с некой директории имена файлов и дату их создания, имена получаю так:
<b>procedure</b> TForm1.Button1Click(Sender: TObject);
<b>var</b>
z: TSearchRec;
d:<b>string</b>;
<b>begin</b>
d:=Directoryedit1.Text+'\'+Edit2.Text;
listBox1.Clear;
<b>if</b> FindFirst(d,faAnyFile,z) = <b>0</b>
<b>then</b>
<b>begin</b>
<b>repeat</b>
listBox1.Items.Add(z.Name);
<b>until</b> FindNext(z) <> <b>0</b>;
FindClose(z);
<b>end</b>;
Но мне так же нужно рядом с именами получить даты создания этих файлов,как получить дату создания одного файла я знаю, а вот нескольких ни как.Просьба,если знаете то пожалуйста применительно к вышеприведенному коду.Спасибо!
7 ответов

Catdimon

Э это у каждого файла своя дата, а не одна на всех.--http://www.podgoretsky.com


Catdimon

Catdimon> как получить дату создания одного файла я знаю,Catdimon> а вот нескольких ни как.А что такое "дата создания нескольких файлов" ?


Catdimon

О том и речь, что у всех файлов разная дата создания,поэтому разным файлам должна соответствовать именно их дата создания!


Catdimon

Catdimon> как получить дату создания одного файла я знаю,Catdimon> а вот нескольких ни как.А что такое "дата создания нескольких файлов" ?
сумма наверное


Catdimon

Catdimon> как получить дату создания одного файла я знаю,Catdimon> а вот нескольких ни как.А что такое "дата создания нескольких файлов" ?
Несколько файлов в директории, вот их даты создания и нужно получить вместе с именами в listbox!


Catdimon

TSearchRec + F1--http://www.podgoretsky.com


Catdimon

Усе,спасибо сам сообразил!