Установка времени компиляции программы в диалоговом окне "О программе".

Я подразумаваю, что проблема состоит в получении времени компиляции?

Var
F : Integer; S : String; Begin
F:=FileOpen(ExpandFileName(Application.ExeName), 0); S:=TimeToStr(FileDateToDateTime(FileGetDate(F))); FileClose(F); End;

Взгляните на описание функции DateTime... в файле помощи. Вероятно, существует лучший способ получения времени без использования функции FileOpen.

Также можно использовать время файла (File Time) в качестве номера версии, так, время 6:02 обозначало бы версию 6.02, и устанавливать его чем-то типа Touch. [001712]

Содержание раздела