![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Перевод секунд [D2005, XP]
ГореПрограммер © (2006-09-22 18:17:00)Здравствуйте.
У меня есть некое кол- во секунд, можно ли эту цифру быстро каким- нибудь образом перевести в строку вида: 0h12m32s для примера ? и если можно то как ?
Palladin (2006-09-22 18:36:00) [21]как енто не нужно... очень даже нужно... если пользоваться делением... :)
ну а div mod то кнечно не нужно...
Ega23 (2006-09-22 18:28:00) [22]
> начальная школа, деление/вычитание, и знаниче сколько чего
> в чем...
вычитание и не нужно... :о)
Правильный Вася (2006-09-22 18:28:00) [23]http://www.delphimaster.ru/cgi-bin/forum.pl?id=1158926772&n=18
гы
Ega23 (2006-09-22 18:27:00) [24]
function SecondsToStr(const Value:Integer):String;
var
h, m, s : Integer
begin
h:=Value div 3600;
m:=(Value mod 3600) div 60;
s:=Value mod 60;
Result:=IntToStr(h)+'h'+IntToStr(m)+'m'+IntToStr(s)+'s';
end;
ГореПрограммер (2006-09-22 18:27:00) [25]ясно, то есть функции такой нет, ок.
Palladin (2006-09-22 18:22:00) [26]начальная школа, деление/вычитание, и знаниче сколько чего в чем...