Data Fixa

Delphi

04/10/2005

Pessoal eu tenho um campo tipo Date, eu gostaria de quando eu executa-se uma venda esse campo tipo Date recebe-se a data do dia 5 do mes seguinte ! Alguem poderia me ajudar ??

valew pela ajuda


Jrduran

Jrduran

Curtidas 0

Respostas

Motta

Motta

04/10/2005

http://forum.devmedia.com.br/viewtopic.php?t=66223&highlight=dia&sid=797aaa7286834f5c2fc9fb0a84f6b48e

Achei que já tinha visto algo assim ...


GOSTEI 0
Marcio.theis

Marcio.theis

04/10/2005

Uma outra forma seria:


var
    mesano, novaData: string;
begin
mesano:=copy(DateToStr(Date),4,7);
novaData:=DateToStr(IncMonth(StrToDate(´05/´ + mesano),1));


no caso a variável novaData ficaria com a nova data gerada;


GOSTEI 0
POSTAR