É muito comum nos depararmos no dia a dia com a necessidade de manipular datas e horas, seja para um calculo de permanência, dias de atraso enfim, é praticamente escapar de alguma situação que necessite desse tipo de controle.
Assim como a necessidade e se utilizar algum recurso para manipular as datas e horas de alguma maneira e freqüente, as duvidas de como o faze-lo também é, basta um breve olhar em qualquer fórum especializado e lá está, alguma duvida relacionada, por isso decidi falar um pouco sobre uma unit muito poderosa chamada DateUtils para a manipulação de data e hora, com um grande numero de métodos e classes que facilitam a vida de qualquer um.
Alguns exemplos:
Assim como a necessidade e se utilizar algum recurso para manipular as datas e horas de alguma maneira e freqüente, as duvidas de como o faze-lo também é, basta um breve olhar em qualquer fórum especializado e lá está, alguma duvida relacionada, por isso decidi falar um pouco sobre uma unit muito poderosa chamada DateUtils para a manipulação de data e hora, com um grande numero de métodos e classes que facilitam a vida de qualquer um.
Alguns exemplos:
- CompareDate(constA, B: TDateTime): TValueRelationship;
Compara apenas a data de dois valores (do tipo TDateTime) retornando:
LessThanValue O primeiro valor é menor que o segundo
EqualsValue Os valores são iguais
GreaterThanValue O primeiro valor é maior que o segundo
LessThanValue O primeiro valor é menor que o segundo
EqualsValue Os valores são iguais
GreaterThanValue O primeiro valor é maior que o segundo
- CompareDateTime(const A, B: TDateTime): TValueRelationship;
O mesmo que o item anterior levando em consideração o horário também.
- CompareTime(const A, B: TDateTime): TValueRelationship;
O mesmo que o item anterior levando em consideração apenas o horário.
- IncDay(const AValue: TDateTime; const ANumberOfDays: Integer = 1): TDateTime;
Incrementa uma data de acordo com a quantidade de dias especificada.
- IsPM(const AValue: TDateTime): Boolean;
Indica se a porção hora da data ocorre após o meio-dia.
- DaySpan(const ANow, AThen: TDateTime): Double;
Retorna o numero de dias entre duas datas levando em consideração também as horas
- DaysBetween(const ANow, AThen: TDateTime): Integer;
Retorna o número de dias entre duas datas sem levar em consideração as horas.
- DateOf(const AValue: TDateTime): TDateTime;
Converte data e hora para apenas data.
- DayOfTheMonth(const AValue: TDateTime): Word
Retorna o dia do mês (1 a 31) de uma data.
- DayOfTheYear(const AValue: TDateTime): Word;
Retorna o numero de dias entre uma data e o dia 31 de dezembro do ano anterior
- DayOfTheWeek(const AValue: TDateTime): Word;
Retorna o dia da semana de uma data, onde 1 representa segunda e 7 domingo
- HourOf(const AValue: TDateTime): Word;
Retorna a quantidade de horas de uma data, variando de 0 a 23.
- TimeOf(const AValue: TDateTime): TDateTime;
Retorna a porção de tempo de uma data.
- WithinPastDays(const ANow, AThen: TDateTime; const ADays: Integer): Boolean;
Indica quando duas datas possuem o mesmo numero de dias.
- WithinPastYears(const ANow, AThen: TDateTime; const AYears: Integer): Boolean;
Indica quando duas datas possuem o mesmo numero de anos.
- YearsBetween(const ANow, AThen: TDateTime): Integer;
Retorna o numero aproximado de anos entre duas datas.
Bom caso haja alguma dúvida quanto a utilização das funções é só postar, abraços e até a próxima...
Opa, bom tópico, o dayspan resolveu meu problema, rsrs, valeu...
ResponderExcluirMuito interessante. Pergunta? tem que instalar este componente? onde consigo?
ResponderExcluirsergiopmattos@gmail.com
Olá anônimo, o DateUtils é uma biblioteca do próprio Delphi, não tem que instalar nada, apenas declarar.. , abraços...
ResponderExcluir