Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.06;
Скачать: CL | DM;

Вниз

как из кол. секунд (integer) получить время (TTime)   Найти похожие ветки 

 
SONY   (2002-04-23 14:53) [0]

нужно например 125 секунд преобразовать в вид 00:02:05


 
troits ©   (2002-04-23 14:56) [1]

function EncodeTime(Hour, Min, Sec, MSec: Word): TDateTime;
function DateTimeToStr(DateTime: TDateTime): string;


 
Anatoly Podgoretsky ©   (2002-04-23 14:57) [2]

Sec/86400


 
SONY   (2002-04-23 15:05) [3]

а еще почему когда пишу так Caption := FormatDateTime("hh:mm:ss",Now); то все правильно а когда Caption := FormatDateTime("mm:ss",Now); пишет не правильно


 
Johnmen ©   (2002-04-23 15:05) [4]

В добавление к Anatoly Podgoretsky © (23.04.02 14:57) :

FormatDateTime("hh:mm:ss",Sec/86400)




 
Johnmen ©   (2002-04-23 15:08) [5]

mm воспринимается как месяц...


 
Anatoly Podgoretsky ©   (2002-04-23 15:11) [6]

Я вас всех дополню, формат .mm. не может быть правильным, зачем нужен месяц во времени :-)


 
SONY   (2002-04-23 15:15) [7]

а в справке так

The following example assigns "The meeting is on Wednesday, February 15, 1995 at 10:30 AM" to the string variable S.

S := FormatDateTime(""The meeting is on " dddd, mmmm d, yyyy, " at " hh:mm AM/PM",

StrToDateTime("2/15/95 10:30am"));


 
troits ©   (2002-04-23 15:16) [8]

попробуй
Caption := FormatDateTime("nn:ss",Now);


 
SONY   (2002-04-23 15:17) [9]

ок
HELP
nn Displays the minute with a leading zero (00-59).


 
troits ©   (2002-04-23 15:26) [10]

В хэлпе бывают ошибки - некоторые примеры просто не компилируются.

Еще один способ преобразования (конечно, не самый оптимальный по скорости):

TimeStampToDateTime(MSecsToTimeStamp(125 * 1000))



Страницы: 1 вся ветка

Текущий архив: 2002.05.06;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.016 c
1-17541
Kuks
2002-04-24 03:33
2002.05.06
Как выделить создать массив на n указателей?


1-17608
Новенький в Делфи
2002-04-22 02:23
2002.05.06
Програмку в Menu Windows прописать?


1-17585
Stan Orlov
2002-04-22 15:35
2002.05.06
Подскажите компонент типа MDI-Tab ...


3-17470
AlexA
2002-04-12 10:30
2002.05.06
IBQuery.Modifiеd


1-17610
sssa
2002-04-22 19:10
2002.05.06
Как добавить свой курсор?