Ir ao conteúdo
  • Cadastre-se
Entre para seguir isso  
jiz/df

Daas no delphi

Recommended Posts

COMO  USO DATAS NO DELPHI, PORQUE EU QUERO VER A DIFERENÁC ENTRE 2 DATAS, OUVI FALAR QUE você PODE TRANFORMAR AS DATAS EM NUMEROS E AI FAZER OS CALCULOS E DEPOIS TRANFORMA NOVAMENTE EM DATA. ME AJUDEM

Compartilhar este post


Link para o post
Compartilhar em outros sites

você tem que criar as variáveis como TDateTime (o formato já é um número, é igual ao Double), e para pegar a data e hora atual você usa a função Now, algo assim:

 T:=Now; (T: TDateTime)

Depois você pode subtrair assim:

D:=Now - T; (D: TDateTime);

Isso serve se for usar diferenças apenas na hora (isso porque zero significa ano 1900). Ai você pode usar a função TimeToStr que retorna uma string com o tempo decorrido (até 24hs).

Se for diferenças de dias você tem que fazer diferente na hora de pegar a segunda data.

você tem que quebrar a diferença em ano,mês,dia,hora,min,segundo e milisegundo (todos declarados como Word), assim:

D:=Now

DecodeDate(D,Ano2,Mes2,Dia2);

DecodeTime(D,Hora2,Min2,Segundo2,MSegundo2);

DecodeDate(T,Ano,Mes,Dia);

DecodeTime(T,Hora,Min,Segundo,MSegundo);

Ai você calcula a diferença com esses números.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora
Entre para seguir isso  





Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×