Somar minutos a uma determinada hora

Delphi

01/12/2007

Olá,

Como faço para somar minutos a uma hora? Por exemplo, como faço para somar 45 minutos a hora 12:30? Obrigado.

Luiz


L_carlos

L_carlos

Curtidas 0

Melhor post

Renan.cb

Renan.cb

04/12/2007

IncMinute(dateTime, minutos)

tem que incluir DateUtils na uses


GOSTEI 1

Mais Respostas

Steve_narancic

Steve_narancic

01/12/2007

a partir do delphi 6 ou 7 existe uma unit DateUtils, com varias funções para trabalhar com data e hora


GOSTEI 0
L_carlos

L_carlos

01/12/2007

Olá,

Eu achei a função abaixo mas não sei como usa´la.

function AdicionaMinuto (const DT: TDateTime; const Mnts: Extended): TDateTime;
begin
Result := (DT + Mnts / 1440.0);
end;

Como eu uso essa função para por exemplo, a partir de uma hora informada em um edit1 e um numero de minutos informado em um edit2,ao clicar em um button apareça num edit3 a soma da hora com os minutos?

Luiz


GOSTEI 0
L_carlos

L_carlos

01/12/2007

Consegui resolver usando o codigo abaixo:

Var
hora1: TDateTime;
hora2: TDateTime;
total: TDateTime;
begin
hora1 := StrToTime(Edit1.Text);
hora2 := StrToTime(Edit2.Text);
total := Hora2 - Hora1;
Label1.Caption := FormatDateTime(´hh:nn:ss´,total);
end;


Luiz


GOSTEI 0
POSTAR