550 horas correspondem a 22 dias e 22 horas! Cabalístico isso não?
Curiosidades a parte, de fato, esse range de horas pode até ser permitido a
nível de armazenamento dentro de um TDateTime, uma vez que um TDateTime é na
verdade um double e a parte fracionária de um double corresponde à parte do
horário. No entanto, as funções de formatação do Delphi só consideram a
faixa de horário compreendida entre 00:00:00 e 23:59:59, que é o range de
horas correspondente a um dia.

 

Se fosse você, não usaria TDateTime por conta da limitação já comentada. Eu
usaria uma variável inteira, com o valor inicial 5500000, e formataria essa
variável com a máscara !000:00:00;0;_’ usando a função FormatMaskText() da
unit MaskUtils. Daí, a contagem do cronômetro decrescente não seria
mistério: basta um TTimer da vida decrementando esse valor inicial no evento
OnTimer em uma unidade e mostrando o valor formatado conforme já explicado.

 

Sds.

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Alexandre - Yahoo
Enviada em: sexta-feira, 3 de setembro de 2010 10:31
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Cronometro Regressivo - Maior que 24 horas

 

  

Pessoal estou com um grande dilema, quero fazer um cronometro regressivo, só
que começa com 550:00:00
ou seja, 550 HORAS, mas óbviamente está dando pau, pois o padrão é 24 ao
dia, tem como fazer esse tipo de cronometro?começando por 550 horas?

Alex



 



[As partes desta mensagem que não continham texto foram removidas]

Responder a