Отправляет email-рассылки с помощью сервиса Sendsay

Программирование. Форум !!!

Дата создания

Здравствуйте comp,
Помогите вытащить дату создания файла, желательно с примерчиком на
Delphi.

Ответить   Sat, 31 Jan 2004 12:49:41 +0200 (#67879)

 

Ответы:

FileAge('имя_файла')
функция описана в SysUtils.pas

Исходное сообщение От: "keel" <dima***@s*****.by>
Кому: "comp.soft.prog.prog" <philoso***@s*****.net>; <207775>
Отправлено: 31 января 2004 г. 13:49
Тема: Дата создания

Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

Ответить   "VladS" Sat, 31 Jan 2004 14:37:42 +0300 (#67918)

 

Я бы воспользовался функцией FindFirst('test.$$$', faAnyFile, f), где f
:TSearchRec. FileDateToDateTime(f.Time) даст дату.
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

Ответить   "Вадим Шешунов" Sat, 31 Jan 2004 13:55:46 +0200 (#67924)

 

Здравствуйте Вадим,

Saturday, January 31, 2004, 1:55:46 PM, вы писали:

Спасибо, проблема решена.

Ответить   Sat, 31 Jan 2004 20:20:05 +0200 (#68411)

 

FileAge(const FileName:String): Integer;
FileGetDate(Handle: Integer): Integer;
FileDateToDateTime(FileDate: Integer): TDateTime;
ну и
FindFirst и TSearchRec

С уважением,
Борис Сурин, surin_***@m*****.ru
Номер выпуска : 1668
Возраст листа : 134
Количество подписчиков : 378
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/69383
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

Ответить   Mon, 2 Feb 2004 16:07:03 +0300 (#69383)