Fórum Subtrair data #326117
26/07/2006
0
Pessoal
Como faço para subtrair data, tipo tenho a data da máquina e quero pegar a data do mes passado, retroceder 30 dias dias
Sou usuário do Delphi 6
Rogério
Como faço para subtrair data, tipo tenho a data da máquina e quero pegar a data do mes passado, retroceder 30 dias dias
Sou usuário do Delphi 6
Rogério

Rogeranalista
Curtir tópico
+ 0
Responder
Post mais votado
26/07/2006
uses DateUtils;
Data := IncMonth(DataAtual, -1);
ou
Data := IncDay(DataAtual, -30);
esssa funcoes tem IncDay, IncMonth, IncYear (tem todas as partes da data) recebem no segundo parametro o quantidade de tempo a ser somado, ou diminuido.
Soh um detalhe diminuir 1 mes é direferente de subtrair 30 dias
Data := IncMonth(DataAtual, -1);
ou
Data := IncDay(DataAtual, -30);
esssa funcoes tem IncDay, IncMonth, IncYear (tem todas as partes da data) recebem no segundo parametro o quantidade de tempo a ser somado, ou diminuido.
Soh um detalhe diminuir 1 mes é direferente de subtrair 30 dias
Night_man

Responder
Gostei + 1
Mais Posts
26/07/2006
Marco Salles
existem funçoes [b:706817196a]próprias[/b:706817196a] para isto. Mas eu uso assim
Código:
var
datanova:Tdate;
begin
dataNova:=Date-30;
[b:706817196a]sem delongas[/b:706817196a].
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)