mit Zeiten Rechnen

[RX3]

Hallo ich möchte mit Zeiten rechnen und bräuchte bisl Hilfe,

Ich habe eine Zahl (Minutenanzahl), die in eine Zeitangabe umgerechnet werden soll
bsp. 135,5 min = 2:15:30 (2h15min30s)
diese Minutenanzahl wird durch 2 Editfelder berechnet. (Time2)

Nach dieser Berechnung wird in ein drittes Editfeld eine weitere Zeitangabe (Format hh:mm:ss) eingegeben. (Time1)
Von dieser Zeitangabe sollen die vorherigen Minuten abgezogen werden (Time3 = Time1-Time2)

Kann mir da irgendjemand weiterhelfen?
Irgendwie krieg ich das mit den Encode/DecodeTime-Funktionen nich ganz hin.

Folgenden Code habe ich bisher

Delphi-Quellcode:

  a := StrToInt64(Edit1.Text);       //a = Ressis vorhanden
  b := StrToInt64(Edit2.Text);       //b = Ressiproduktion pro h
  h := Trunc(a/b);                 //h = Stundenanzahl seit Verlassen der Flotte
  m := Round(h/60);                //m = Minutenanzahl seit Verlassen der Flotte
  s := Round(m/60);
  ss:= Round(S/100);

  TimeSeparator := ':';
  ShortTimeFormat := 'hh:mm:ss';
  Time1 := StrToTime(Edit3.Text);   //Time1 = Spionagezeitpunkt
  TryEncodeTime(h,m,s,ss,Time2);    //Time2 = berechnete Flugzeit aus Ressiproduktion
  Time3 := Time1-Time2;

  DecodeTime(Time3,h3,m3,s3,ss3);
  Label1.Caption := IntToStr(h3) + ':' + IntToStr(m3) + ':' + IntToStr(s3);

(bitte keine professionellen Code-Vorschläge, sondern einfachen simplen Code, damit ich es auch selber verstehe *gg*)