Acrescentar mes a datas
E ai galera,
mais uma vez estou precisando da ajuda de voces, estou com problemas na hora de trabalhar com datas, pois estou fazendo algums teste e nao estou conseguindo obter um resultado favoravel..
O problema e o seguinte , eu tenho uma tela onde preciso colocar 4 datas e estas datas terao que ter o mesmo dia e tera que mudar somente o mes
Ex:
data da venda 18/03/2005 100,00
Obs.: Tudo que e vendido dentro do mes e jogado para o primeiro dia util do mes.
preencher os campos datas e valor com :
parcela 1 01/04/2005 25,00
parcela 2 01/05/2005 25,00
parcela 3 01/06/2005 25,00
parcela 4 01/07/2005 25,00
se alguem ja fez algo parecido, por favor me de uma dica como fazer...
obrigado
ate +
mais uma vez estou precisando da ajuda de voces, estou com problemas na hora de trabalhar com datas, pois estou fazendo algums teste e nao estou conseguindo obter um resultado favoravel..
O problema e o seguinte , eu tenho uma tela onde preciso colocar 4 datas e estas datas terao que ter o mesmo dia e tera que mudar somente o mes
Ex:
data da venda 18/03/2005 100,00
Obs.: Tudo que e vendido dentro do mes e jogado para o primeiro dia util do mes.
preencher os campos datas e valor com :
parcela 1 01/04/2005 25,00
parcela 2 01/05/2005 25,00
parcela 3 01/06/2005 25,00
parcela 4 01/07/2005 25,00
se alguem ja fez algo parecido, por favor me de uma dica como fazer...
obrigado
ate +
Chmelo
Curtidas 0
Respostas
Rodrigo Lima
18/03/2005
É o seguinte
Utilize a função IncMonth() do delphi, baseando-se sempre na 1ª data.
Exemplo:
1ª data: 30/01/2005
2ª data:= IncMonth(1ª data,1) = 28/02/2005
3ª data:= IncMonth(1ª data,2) = 30/03/2005
4ª data:= IncMonth(1ª data,3) = 30/04/2005
5ª data:= IncMonth(1ª data,4) = 30/05/2005
Valeu
Rodrigo
Utilize a função IncMonth() do delphi, baseando-se sempre na 1ª data.
Exemplo:
1ª data: 30/01/2005
2ª data:= IncMonth(1ª data,1) = 28/02/2005
3ª data:= IncMonth(1ª data,2) = 30/03/2005
4ª data:= IncMonth(1ª data,3) = 30/04/2005
5ª data:= IncMonth(1ª data,4) = 30/05/2005
Valeu
Rodrigo
GOSTEI 0
Chmelo
18/03/2005
valeu rodrigo, vou testar ...
ate +
ate +
GOSTEI 0