узнать сколько в n-минутах, часов, дней

← →
Nikolaich (2006-05-31 17:14) [0]

Приветсвую. Может кто знает как по-быстрому получить, к примеру из 1000 минут, сколько в них дней, часов и минут(до 60 минут) в нормальном виде. У меня исходный параметр это количество минут, мне нужно, так сказать в божеский вид привести это время.
Может где такая функция есть и я ее незнаю?

Спасибо.

← →
Desdechado © (2006-05-31 17:18) [1]

делить-умножать умеем?
24, 60, и т.п. еще в детсаду учат

← →
Nikolaich (2006-05-31 17:22) [2]

ага, ну давай попробуй, поглядим какого размера у тебя код получится. я тоже так вначале подумал.

← →
Джо © (2006-05-31 17:24) [3]

> [2] Nikolaich (31.05.06 17:22)
> ага, ну давай попробуй, поглядим какого размера у тебя код
> получится. я тоже так вначале подумал.

Кода бояться — в программисты не ходить (с).

← →
evvcom © (2006-05-31 17:25) [4]

1000 mod 60 = 40 (минут)
1000 div 60 = 16 (часов)

← →
Nikolaich (2006-05-31 17:25) [5]

Заново изобретать велосипед? (с)

← →
Nikolaich (2006-05-31 17:33) [6]

evvcom ©
Спасибо. Узнал что такое mod хоть ;) А другим тяжело было объяснить, лучше кучу всего написать, но не по делу.

← →
evvcom © (2006-05-31 17:34) [7]

"Слюшай, если ты такой умный, пачему такой бедный?" (с) не помню

← →
evvcom © (2006-05-31 17:34) [8]

а... так [5] не мне?

← →
Джо © (2006-05-31 17:34) [9]

> [6] Nikolaich (31.05.06 17:33)
> evvcom ©
> Спасибо. Узнал что такое mod хоть ;) А другим тяжело было
> объяснить, лучше кучу всего написать, но не по делу.

evvcom заоффтопил :) Ты же упорно искал готовую функцию, не так ли?

← →
Nikolaich (2006-05-31 17:54) [10]

> а... так [5] не мне?

неа, это для Джо было :)

← →
Nikolaich (2006-05-31 17:56) [11]

> evvcom заоффтопил :) Ты же упорно искал готовую функцию,
> не так ли?

ну а форум "для начинающих" или "для постебаться над новичками?"

var
T: TDateTime;
D: Integer;
H, M, S, MS: Word;
begin
T := 1000 / 60 / 24;
D := Trunc(T);
DecodeTime(T, H, M, S, MS)
end.

← →
Nikolaich (2006-05-31 18:10) [13]

узнать сколько в n-минутах, часов, дней Найти похожие ветки