Gibts sowas wie die UNIX Time bei Delphi?

[chrisw]

Delphi-Quellcode:

function GetSeconds : String;
var Hour, Min, Sec, MSec: Word;
begin
  try
    DecodeTime(Now, Hour, Min, Sec, MSec);
  except
  end;
  Result := Inttostr(Sec);
end;