somando varios campos de horas

Delphi

13/10/2009

hrn1,hrn2,hrtotal : TTIME;

hrn1 := strtotime(speedbutton32.Caption)+strToTime(speedbutton33.Caption);
hrn2 := strtotime(speedbutton34.Caption)+strToTime(speedbutton35.Caption);

hrtotal := hrn1+hrn2;
OBS: se no hrn1 = 16:00 e no hrn2 = 16:00
quando jogo pra dentro do hrtotal fica 8:00 sempre 8:00 nao entendo

eu nao sei porke mas nao funciona.
Alguem pode me ajudar eu preciso somar 30 botoes desses cada um tem uma hora especifica HH:MM ae eu tenho ke juntar tudo dentro de uma variavel pra depois pegar apenas a HH e utilizar depois vou pegar os MIN totais e utilizalos tmb.

Estou no aguardo.


Thiago

Thiago

Curtidas 0

Respostas

Afarias

Afarias

13/10/2009

Opa,


Vc deve entender que o tipo TIME representa um MOMENTO no tempo e não uma quantidade de horas.

Sendo um momento no tempo, ele só pode representar uma hora entre 00:00 e 23:59 (uma vez q o dia tem apenas 24h)

Assim: 16:00 + 16:00 = 32h (q não existe) -- o q significa q o relógio volta para 00:00 (24) e anda mais 8h (=32-24) sacou?

Para tratar de QUANTIDADEs de tempo vc deve usar uma variável INTEIRA ou NUMÉRICA.

Alguns tb usam TDateTime mas tem q saber lidar com ele pois funciona de forma semelhante (mas soma o dia na parte inteira).


T+


GOSTEI 0
POSTAR