Subtrair Hora (Por favor me ajudem)....
26/02/2003
0
Ex.:
Hr Inicial : 22:00 Hr Final: 23:25 Qt Minutos: 85
Hr Inicial : 23:00 Hr Final: 01:00 Qt Minutos: 120
Thematrix:reloaded
Posts
26/02/2003
Anonymous
var
Resposta,ini,Fin:integer;
begin
// pega as horas e transforma em minutos e soma com os minutos
INi:= 22*60;
Fin:= 23*60 + 25;
resposta:= fin - ini;
end;
Mais Dicas em www.delphiexpert.hpg.com.br
27/02/2003
Anonymous
var data:string;
begin
data:=DateTimeToStr(StrToDateTime(´24/01/03 01:30´)-StrToDateTime(´24/01/03 07:15´));
ShowMessage(´TOTAL DE HORA(S): ´ + COPY(data,12,5))
end;
8)
27/02/2003
Okama
Converta tudo em padrão UNIX, não há como errar...
DateTimeToUnix( TDateTime );
UnixToDateTime( Int64 );
27/02/2003
Mozico
No Delphi, tem uma função chamada: DecodeTime
vc pode usa- la
Ex: DecodeTime (Variavel, Hour, Minutes, seconds)
onde: Variavel = contém a hora.
vc pode usar:
DecodeTime (Variavel1, Hour, Minutes, seconds)
minutos:= minutes;
DecodeTime (Variavel2, Hour, Minutes, seconds)
minutos1 := minutes;
x = minutes - minutes2;
OBS: também vc pode usar sql.
Me mande um e-mail, q eu te tirp as suas dúvidas.
wagner@edutec.srv.br
27/02/2003
Anonymous
Mas, obrigado assim mesmo....
Clique aqui para fazer login e interagir na Comunidade :)