PC Toledo

Pessoal criei estas funções e coloco aqui a disposição dos colegas:

HoraPeriodo() : retorna a contagem do tempo entre duas datas informadas.

Exemplo

HoraPeriodo("17:13:50","21:52:43","02/07/2012","03/07/2012")

Contagem de Tempo
Anos.: 0
Meses: 0
Dias.: 1
Horas: 4:8:53
Tempo total HH:MM:SS = 28:8:53

Outras funcoes:

HH2SS() : retorna o numero de segundos de uma hora

SS2HH() : retorna uma hora de acordo com os segundos informado

Exemplo

HH2SS("46:10:25") = 166225 segundos

SS2HH(166255) = 46:10:25

Exemplo de Calculo de Horas
a="46:10:25"
b="49:01:49"
Soma: ss2hh(hh2ss(a)+hh2ss(b)) = 95:12:14
Subtracao: ss2hh(hh2ss(b)-hh2ss(a)) = 2:51:24

Apos criar as funcoes acima eu comentei no codigo onde estava usando as funcoes da Catools, então não precisa da LIB para linkar.

Alterem a gosto!

Ate+