Time to string function

Here is a very simple time to string function.


function TimeToStr(dTime: Double): string;
begin
  Result := Format('%4.2f', [dTime]);
end;