FileAge unter Win8.1

[hathor]

Funktioniert mit WIN 8.1, XE7

Delphi-Quellcode:

var
  timeDate : TDateTime;
begin
  if FileAge(Application.ExeName, timeDate) then
  caption:= DateTimeToStr(timeDate);
end;