Tcalendar

06/03/2006

Amigos,

Boa tarde.

Estou usando o Tcalendar e gostaria de uma ajuda de vcs.
O meu objetivo é, ao dar dois cliques no dia do Tcalendar ele me retornar em um Tedit o dia, mes e ano.

Deu uma procurada e não encontrei muita referencia a este componente!

obrigado desde já!


Fernando_ramos

Respostas

06/03/2006

Delphi32

Para isso utilize o evento OnClick do componente:

   Edit1.Text := FormatDateTime(´dd/mm/yyyy´,MonthCalendar1.Date);


t+!


Responder Citar

06/03/2006

Fernando_ramos

amigo.

grato pela atenção.
mas não é o componente MonthCalendar e sim o TCALENDAR da paleta SAMPLES.

obrigado e fico no aguardo!


Responder Citar

06/03/2006

Paullsoftware

tente assim:
Edit1.Text := IntToStr(Calendar1.Day)+´/´+IntToStr(Calendar1.Month)+´/´+IntToStr(Calendar1.Year);

os valores do TCalendar1 retornam com Inteiros... :wink:


Responder Citar

06/03/2006

Fernando_ramos

funcionou legal, eu tinha feito a mesma coisa só que ao inves de inteiro eu coloquei como data datetostr(), ai nao funcionava.

aproveitando a deixa...

é possivel eu formatar o resultado para ´dd/mm/yyyy´.


abraços!


Responder Citar

06/03/2006

Techsoft

Bom amigo, não testei mas adaptando o q foi escrito nas respostas acima... fazendo akilo tu vai ter um string certo...

faça:
formatdatetime(´dd/MM/yyyy´,
strtodatetime(IntToStr(Calendar1.Day)+´/´+IntToStr(Calendar1.Month)+´/´+IntToStr(Calendar1.Year)));



Responder Citar

07/03/2006

Fernando_ramos

amigo.

Funcionou legal!

abraços!


Responder Citar