如何用Delphi将HH:MM:SS格式的时间转换为总秒数或分钟数？

本文共计232个文字，预计阅读时间需要1分钟。

关于将HH:MM:SS格式转换为秒的最佳方法，你可以使用以下代码：

pythondef time_to_seconds(hh, mm, ss): return int(hh) * 3600 + int(mm) * 60 + int(ss)

示例time_str=00:01:49hours, minutes, seconds=map(int, time_str.split(:))seconds=time_to_seconds(hours, minutes, seconds)print(seconds)

输出结果为：109秒。

有人可以告诉我关于将持续时间格式化HH：MM：SS转换为秒或分钟的最佳方法吗？

即. 00:01:49 = 109secs

我正在使用此代码但不起作用

var i: real; j: integer; begin i := frac(real(StrToTime('00:00:01'))); j := trunc(frac(real(StrToTime('01:00:00'))) / i ); memo2.lines.add(inttostr(j));

当我用00:10:00尝试代码返回599

谢谢

用于处理持续时间的非常灵活的工具是在System.TimeSpan单元中找到的TTimeSpan.您可以以不同的单位(秒,分钟,小时……)获得结果,并根据您的需要进行格式化.

var timeSpan: TTimeSpan; begin timeSpan := TTimeSpan.Parse('00:01:49'); memo2.lines.add(Format('%1.1f min', [timeSpan.TotalMinutes])); end;