Como separar linhas(texto) no MEMO

[piterog]

Seguinte pessoal, to fazendo um projetinho simples de horário de ônibus, tenho os horários em um arquivo texto que é carregado em um MEMO, o sistema está fazendo o seguinte, pega a hora atual, e vê qual o próximo horário de ônibus e te mostra, uma coisa que eu gostaria de adicionar é o tempo que falta para chegar neste horário, ou seja, quanto tempo falta para o ônibus sair.

 

A minha dúvida é:

 

Como faço essa diferença de tempo? visto que:

 

O formato de horario do arquivo texto é o seguinte:

 

08:40

09:10

09:50

 

e assim por diante, e o horário que está sendo pego pelo sistema para comparar e ver qual o próximo horário está no mesmo formato HH:MM

 

Como faço essa cálculo? Tem uma função que separar as HH dos MM?

 

Obrigado

[LNW]

@piterog

 

 

Se você tiver a string no formato 'HH:MM', poderia usar a função StrToTime() para fazer seus cálculos normalmente.

 

 

Por exemplo:

diferenca := StrToTime('18:30') - StrToTime('13:00');

sendo diferenca do tipo TDateTime.

 

 

[piterog]

@piterog

 

 

Se você tiver a string no formato 'HH:MM', poderia usar a função StrToTime() para fazer seus cálculos normalmente.

 

 

Por exemplo:

diferenca := StrToTime('18:30') - StrToTime('13:00');

sendo diferenca do tipo TDateTime.

 

 

Bá pode cre.. funcionou certinho! Vlwww velho \o>