Jerfs 1 Denunciar post Postado Julho 26, 2007 Porque quando eu jogo uma hora quebrada para o campo para o dbedit ele tende a arredondar!?Ex:varv_tempo := TTime;dbedit1 := '10:00';dbedit2 := '12:30';v_tempo := strtotime(dbedit2) - strtoTime(dbedit1);dbedit3 := timetostr(v_tempo);O resultado mostrado no dbedit3 deveria ser 2:30 mas ele mostra 2:00 WHY ???????????? Compartilhar este post Link para o post Compartilhar em outros sites
Carlos Edu 0 Denunciar post Postado Julho 26, 2007 Olá Jerfs na verdade nao sei te dizer o certo por qual motivo esta acontecendo isso, mas para resolver o seu problema pode tentar esta função abaixo.function DifHora(Inicio,Fim : String):String;{Retorna a diferença entre duas horas}var FIni,FFim : TDateTime;beginFini := StrTotime(Inicio);FFim := StrToTime(Fim);If (Inicio > Fim) then begin Result := TimeToStr((StrTotime('23:59:59')-Fini)+FFim) endelse begin Result := TimeToStr(FFim-Fini); end;end; Compartilhar este post Link para o post Compartilhar em outros sites