Hallo Daniel,
die Funktion TimeToStr() erwartet einen TDateTime-Wert als Argument und liefert die String-Repräsentation des gebrochenen Anteils. Der Ganzzahlige Anteil sind die Tage seit dem Referenzdatum. In deinem Code bildest du mit der Funktion HourOf() den Stundenanteil der aktuellen Zeit - eine Ganzzahl. Der gebrochene Anteil ist dann 0.
Delphi-Quellcode:
edEnde.Text := Format('%.2d', [HourOf(Now)]);
// ...
Grüße vom marabu