Нашли или выдавили из себя код, который нельзя назвать нормальным,
на который без улыбки не взглянешь?
Не торопитесь его удалять или рефакторить, — запостите его на
говнокод.ру, посмеёмся вместе!
Function ms2Str(Миллисекунды) export
КолВоЧасов=Цел(Миллисекунды/(60*60*1000));
Остаток=Миллисекунды-КолВоЧасов*60*60*1000;
КолВоМинут=Цел(Остаток/(60*1000));
Остаток=Остаток-КолВоМинут*60*1000;
КолВоСекунд=Цел(Остаток/1000);
КолВоМиллисекунд=Остаток-КолВоСекунд*1000;
h=Формат(КолВоЧасов,"ЧЦ=3;ЧН=;ЧВН=")+":";
if КолВоЧасов=0 then
h="";
endif;
m=Формат(КолВоМинут,"ЧЦ=2;ЧН=;ЧВН=")+":";
if КолВоМинут=0 then
m="";
endif;
return h+m+Формат(КолВоСекунд,"ЧЦ=2;ЧН=;ЧВН=")+":"+Формат(КолВоМиллисекунд,"ЧЦ=3;ЧН=;ЧВН=");
endFunction
Перевод время в миллисекундах в строку. Автор: Жуков А.П.
Я не понимать. Почему одноэсники так любят изобретать велосипеды - кое-как доходит. Но почему такие кривые? Судя по тому, что семёрочный формат (according to my data) форматной строки без "ЧВН", это восьмёрка. Для восьмёрки же стоит запомнить, что там есть понятие "нулевая дата" с минимальной единицей измерения в секунду. Т.о., можно вообразить некую функцию секунды в формат ("00:00:00"), состоящую из одной строки.
Возврат Формат('00010101' + Сек, "ДФ=ЧЧ:мм:сс");
Немного одноэсной магии и грязных костылей и при Сек = 3599, получим ожидаемый результат.
С другой стороны, вся система, все конфигурации даже подземелья даже шайтан построены из спичек, говна и желудей.
Вспомнилось кц.
Немного одноэсной магии и грязных костылей и при Сек = 3599, получим ожидаемый результат.
С другой стороны, вся система, все конфигурации даже подземелья даже шайтан построены из спичек, говна и желудей.