Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: grr.... Weltzeit Probleme...

    Delphi
    by shmia, 16. Jun 2004
  Klar die 2 Stunden waren ja nur als Beispiel gedacht.
  Noch geschickter geht es vielleicht so:
  // liefert die aktuelle Systemzeit in Coordinated Universal Time (UTC)
  function NowUTC: TDateTime;
  var
  SystemTime: TSystemTime;
  begin
  GetSystemTime(SystemTime);
  with SystemTime do
  Result := EncodeDate(wYear, wMonth, wDay) +
• Forum: Object-Pascal / Delphi-Language

  Re: grr.... Weltzeit Probleme...

    Delphi
    by shmia, 16. Jun 2004
  Also SysUtils.Now liefert die die aktuelle lokale Systemzeit.
  Wenn dir bekannt ist, dass wir in Deutschland gerade bei UTC+2 sind, dann musst du 2 Stunden
  abziehen um zur UTC zu kommen:
  // 2 Stunden zurück
  utczeit := SysUtils.Now - 2.0*(1.0/24.0);
  Auch die Datumsgrenze ist kein Problem, wenn man die Funktion Now() anstatt Time() verwendet.
  Bei der Ausgabe der Zeit hast du es in der Hand, ob...