![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
перевести TTime в количество секунд [D7, XP]
Dmitry_177 © (2007-10-29 02:03:00)Подскажите как перевести TTime в секунд?
Германн (2007-10-29 02:21:00) [1]
> Dmitry_177 (29.10.07 02:12) [3]
>
> т.е. будет в переменной типа t: TTime к примеру "1 ч. 28
> м. 20 с."
Такого в переменной TTime не было, нет и не будет никогда.
Dmitry_177 (2007-10-29 02:19:00) [2]получилось:
Edit1.Text := IntToStr(Round(Frac(DateTimePicker1.Time) * 86400));
boa_kaa (2007-10-29 02:14:00) [3]20 + 28 * 60 + 1 * 3600
Dmitry_177 (2007-10-29 02:13:00) [4]Германн, на 86400?
Dmitry_177 (2007-10-29 02:12:00) [5]т.е. будет в переменной типа t: TTime к примеру "1 ч. 28 м. 20 с." это будет 5300 секунд.. на скольколь нужно умножить t?
Германн (2007-10-29 02:11:00) [6]
> boa_kaa © (29.10.07 02:08) [1]
>
> умножить
>
На количество секунд в сутках.
boa_kaa (2007-10-29 02:08:00) [7]умножить