Data (Inserir dias)

Delphi

03/08/2005

Pessoal, eu tenho um formulario com um DateTimePicker e MaskEdit com formato de Data ´ / / ´, quando o usuario selecionar uma data no DateTimePicker que igual ou antes do dia 15/08/2005, o MaskEdit ira mostrar a data 30/08/2005, agora se o usuario selecionar uma data depois do 15/08/2005,(Ex: 20/08/2005) o MaskEdit irá mostrar 15/09/2005, parece facil mais estou tendo difilcudades para emplementar isso no meu sistema.

Obrigado


Leandrosl

Leandrosl

Curtidas 0

Respostas

Kenio_c

Kenio_c

03/08/2005

Leandro, eu nao utilizo esses componentes, utilizo os Componentes Orpheus da Turbo Power, faço da sequinte maneira

para incrementar dias em uma data ComponenteData := IncDay(ComponentedeData,TantodeDias)

com isso resolvo o meu problema, no seu caso, faça um teste de para ferificar se a data é >= dia 15 ai implemente o valor desejado


GOSTEI 0
POSTAR