Unterschied berechnen

[bixi400]

hi!

Wie kann ich den unterschied zwischen Zwei zeiten berechnen?
Zeit: Stunde : Minuten : Sekunden : Hunderstelsekunden

Zeit1: 01:26:55:85
Zeit2: 03:44:13:02

Mit was für einem Script kann ich den
unterschied der beiden Zeiten berechnen?
:gruebel:

[lordcroc]

Hallo,

du kannst die Zeiten einfach von einander subtrahieren

mfg
lordcroc

[neolithos]

Schau mal in der OH unter

Datum/Zeit

[neolithos]

ODE verwende r := SecondsBetween und rechne dann Systemmatisch runter

Delphi-Quellcode:

sec := r mod 60;
r := r / 60;
min := r mod 60;
r := r / 60;
hour := r mod 24;
days := r / 24;

ab da wird es kompliziert

[Meflin]

du könntest das ganze noch in unix timestamps umrechnen, die voneinander abziehen
und zurückúmwandeln :-D

[Sharky]

Hai bixi400,

zumindest bei Delphi 7 gibt es diese Funktionen:

• YearsBetween
• MonthsBetween
• WeeksBetween
• DaysBetween
• HoursBetween
• MinutesBetween
• SecondsBetween
• MiliSecondsBetween

Ob diese bei D6 schon vorhanden sind kann ich aber leider nicht sagen.

[himitsu]

EncodeTime müßte in D6 dabei sein.


Differenz = Zeit2 - Zeit1;

Delphi-Quellcode:

Differenz{TTime oder TDateTime} := EncodeTime(Hour, Min, Sec, MSec) - EncodeTime(Hour, Min, Sec, MSec);

Wie du deine Zeiten zerlegen kannst, das solltest du ja wissen ^^

Notfalls kannst du ja danach mit DecodeTime oder TimeToStr das Ergebnis in ein passenderes Format umwandeln.

[bixi400]

Danke es funktioniert!

[Xeno-Sebi]

eine frage:
erzeugt diese EncodeTime() funktion nen unixtimestamp???

[himitsu]

Laut Hilfe kommt da was mit TDateTime bzw. TTime raus :zwinker: