работа с датами

[kolduev]

есть пароль! при создании пароля в файл заносится дата!
var f2: TextFile;

пароль действует 10 дней, когда остаёстся 5 дней и меньше, выдаётся сообщение!

как осуществить всю эту тему с датой?

[matus]

Могу посоветовать TRegistry или TRegIniFile, с их помощью можно создать файл в системном реестре и оттуда нужным тебе образом считывать данные пароля и т.д. Или ещё есть TIniFile.

[kolduev]

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

[pu4koff]

ну раз уж у вас храница в текстовике, то пользуйте DateToStr и StrToDate. кажецо так называюца

[kolduev]

а какой командой узнать дату можно?

[Stilet]

Не командой а функцией - Date()

[Alter]

Если надо в виде строки, типа String:

...............................
var S :string;
begin
 S := DateToStr( Date ); // Дату в строку
 S := TimeToStr( Time ); // Время в строку
end;
...............................

Может пригодиться куда-нибудь.