Datum und Uhrzeit - Zeit

[DelphiPeter]

Hallo!

Ich versuche eine Uhrzeit mit Datum zu berechnen, in dem ich z.B. 00:01:12 05.01.2008 Minus 2 Minuten rechne. Als Ergebnis möchte ich dann 23:58:12 04.01.2008 rausbekommen.

Kann mir jemand sagen wie ich das machen kann, hab nur selten mal mit Uhrzeit und Datum zu tun.

Danke an alle!

Gruß,
Peter

[Andreas Schilling]

Delphi-Quellcode:

procedure Subtrahiere_MIN;
  var Zeit : TDatetime;
begin
  Zeit := StrToDateTime('05.01.2008 00:01:12');
  // Zeit ist ein float- Wert , 1 Tag = 1, eine Stunden = 1 / 24 usw. 
  //              1 Tag / 24 Stunden / 60 Minuten * 2 Minuten
  Zeit := Zeit - (1 / 24 / 60 * 2);
  ShowMessage(datetimetostr(Zeit));
end;

[Sherlock]

Das wird mindestens an der Mathematik scheitern: denn 0:01 -2 Minuten ist 23:59 und nicht 23:58.... ;)

Aber ansonsten musst Du lediglich überlegen aus wievielen Minuten ein Tag besteht, und dann von Deiner Uhrzeit zwei /MinutenproTag abziehen.

Super: Ich liebe Fertiglösungen...viel Spaß damit.

Sherlock

[DeddyH]

Gibt es da nichts Fertiges in DateUtils?