Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Перевод секунд [D2005, XP]


Страницы:   1 2

ГореПрограммер ©   (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]

начальная школа, деление/вычитание, и знаниче сколько чего в чем...


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо