[NumLock]

ну переобезопасился человек)

Код:

var
  FileTime: TFileTime;
begin
  FileTime.dwLowDateTime:=0;
  FileTime.dwHighDateTime:=$80000000;
  FileTimeToDateTime(FileTime);
end;