Zeitdifferenz bzw. dauer berechnen

[Stecky2000]

So, dann Danke an alle, speziell an DeddyH.
Ich habe es jetzt so gelöst:

Delphi-Quellcode:

d := (t2+(1.0-t1))*1440/60;
x := SecondsBetween(t2, t1);
If RadioGroup6.ItemIndex <> 4 then
begin
//if (d > 6) then
if (x > 21600) then
    d := d - 0.5;
end;