как из кол. секунд (integer) получить время (TTime)

← →
SONY (2002-04-23 14:53) [0]

нужно например 125 секунд преобразовать в вид 00:02:05

← →
troits (2002-04-23 14:56) [1]

function EncodeTime(Hour, Min, Sec, MSec: Word): TDateTime;
function DateTimeToStr(DateTime: TDateTime): string;

← →
Anatoly Podgoretsky (2002-04-23 14:57) [2]

Sec/86400

← →
SONY (2002-04-23 15:05) [3]

а еще почему когда пишу так Caption := FormatDateTime("hh:mm:ss",Now); то все правильно а когда Caption := FormatDateTime("mm:ss",Now); пишет не правильно

← →
Johnmen (2002-04-23 15:05) [4]

В добавление к Anatoly Podgoretsky © (23.04.02 14:57) :

FormatDateTime("hh:mm:ss",Sec/86400)

← →
Johnmen (2002-04-23 15:08) [5]

mm воспринимается как месяц...

← →
Anatoly Podgoretsky (2002-04-23 15:11) [6]

Я вас всех дополню, формат .mm. не может быть правильным, зачем нужен месяц во времени :-)

← →
SONY (2002-04-23 15:15) [7]

а в справке так

The following example assigns "The meeting is on Wednesday, February 15, 1995 at 10:30 AM" to the string variable S.

S := FormatDateTime(""The meeting is on " dddd, mmmm d, yyyy, " at " hh:mm AM/PM",

StrToDateTime("2/15/95 10:30am"));

← →
troits (2002-04-23 15:16) [8]

попробуй
Caption := FormatDateTime("nn:ss",Now);

← →
SONY (2002-04-23 15:17) [9]

ок
HELP
nn Displays the minute with a leading zero (00-59).

← →
troits (2002-04-23 15:26) [10]

В хэлпе бывают ошибки - некоторые примеры просто не компилируются.

Еще один способ преобразования (конечно, не самый оптимальный по скорости):

TimeStampToDateTime(MSecsToTimeStamp(125 * 1000))

как из кол. секунд (integer) получить время (TTime) Найти похожие ветки