Форум: "Начинающим";
Текущий архив: 2006.06.18;
Скачать: [xml.tar.bz2];
Вниз
суммирование времени Найти похожие ветки
← →
syte_ser78 © (2006-05-30 08:44) [0]Как выполнить сабж?
Допустим есть переменная
allTime :TDateTime
хранящая значение 23:50:10
прибавляем значение 1:00:00 получаем - 0:50:10 а хотелось бы или 24:50:10 или 1 0:50:10
← →
ЮЮ © (2006-05-30 09:02) [1]хотелось бы или 24:50:10
25 часов в сутках что ли?
или 1 0:50:10
а с чего ты взял, что 1 там нет?
TDateTime = вешественное число в формате <число дней>.<часть суток>
З.Ы. как выведешь, так и покажет, хоть и 24:50:10
← →
SergP © (2006-05-30 09:08) [2]
> хранящая значение 23:50:10
>
> прибавляем значение 1:00:00 получаем - 0:50:10
с чего ты это взял?
> а хотелось бы или 24:50:10 или 1 0:50:10
Ну это зависит от того как ты TDateTime в строку преобразовываешь...
← →
syte_ser78 © (2006-05-30 09:33) [3]делаю TimeToStr(allTime)
получаю 0:50:10
делаю DateTimeToStr(allTime)
получаю 1:1:1900 0:50:10
← →
ЮЮ © (2006-05-30 09:51) [4]для второго типа
Result := TimeToStr(allTime);
if allTime > 1 then
Result := FloatToStr(Int(allTime )) + " " + Result;
для первого типа разложить время на составляющие (DecodeTime) получить часы, как сутки * 24 * часы и вывести часы минути и секунду в нужном виде
← →
syte_ser78 © (2006-05-30 10:23) [5]ЮЮ © (30.05.06 9:51) [4]
Большое спасибо!
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.06.18;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.012 c
