Estatística

Tenho a seguinte situação:

tabela condicoesdotempo

DataHora fenomeno

00:00 nevoa úmida

01:00 nevoa úmida

01:30 trovoada

02:00 trovoada

02:30 Nevoa seca 30' (de 01:30 ate 02:00) + 30' (de 02:00 a 02:30) = total = 1 HORA

03:00 Nevoa seca

03:20 Nevoa seca

04:00 Nevoa seca

05:00 Chuva Intensa

06:00 Chuva Intensa

07:00 Chuva Intensa

08:00 Chuva Intensa

09:00 Chuva Intensa

10:00 trovoada

11:00 trovoada

11:30 trovoada

11:35 trovoada

11:45 Nevoa seca 1 HORA (de 10:00 as 11:00) + 45' (de 11:00 as 11:45) = total = 1 h 45 minutos

12:00 Nevoa seca

13:00 Nevoa seca

14:00 Nevoa seca

15:00 nevoa úmida

16:00 nevoa úmida

17:00 nevoa úmida

18:00 nevoa úmida

19:00 nevoa úmida

20:00 trovoada

21:00 trovoada

22:00 trovoada

23:00 Nevoa úmida 3horas (de 20:00 as 21:00 de 21:00 as 22:00 e de 22:00 as 23:00)

Observem, vou calcular as horas de trovoada.

Em NEGRITO esta a hora onde começou a TROVOADA e em vermelho a hora onde Terminou a TROVOADA.

Total de horas de trovoada = 5 HORAS

Como faria um código em DELPHI 5 para somar isto?

Um select na tabela resolveria?

alguem pode me ajudar?