Tcalendar

Delphi

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

Fernando_ramos

Curtidas 0

Respostas

Delphi32

Delphi32

06/03/2006

Para isso utilize o evento OnClick do componente:

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


t+!


GOSTEI 0
Fernando_ramos

Fernando_ramos

06/03/2006

amigo.

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

obrigado e fico no aguardo!


GOSTEI 0
Paullsoftware

Paullsoftware

06/03/2006

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

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


GOSTEI 0
Fernando_ramos

Fernando_ramos

06/03/2006

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!


GOSTEI 0
Techsoft

Techsoft

06/03/2006

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)));



GOSTEI 0
Fernando_ramos

Fernando_ramos

06/03/2006

amigo.

Funcionou legal!

abraços!


GOSTEI 0
POSTAR