Como abrir o calendario do DateTimePicker

Question

Ol�,Como eu fa�o pra abrir o calendario do DateTimePicker no evento clique de um bot�o qq do meu form?Desde ja agrade�o.Renato...

Renato.pavan · Answer

Up...

Adriano Santos · Answer

Cara, fiz m� gambis aki. Se algu�m souber algo melhor, postai.
No evento onEnter do DateTimePicker vc simula o pressionamento das teclas Alt + Seta_Pra_Baixo e no onClick do bot�o vc chama o evento.
S� que toda vez que o cara der um tab e entrar no DateTimePicker o calend�rio vai abrir automaticamente, dai se n�o quiser isso vc faz um esquema pra s� abrir quando chamar pelo bot�o.

[quote:39c8d75564=�Evento onEnter do DateTimePicker�]

    procedure TForm1.DateTimePicker1Enter(Sender: TObject);
    begin
      Keybd_Event(VK_F2,0,0,0);
      Keybd_Event(VK_F2,0,KEYEVENTF_KEYUP,0);
      Keybd_Event(VK_MENU,0,0,0);
      Keybd_Event(VK_DOWN,0,0,0);
      Keybd_Event(VK_DOWN,0,KEYEVENTF_KEYUP,0);
      Keybd_Event(VK_MENU,0,KEYEVENTF_KEYUP,0);
      Keybd_Event(VK_DOWN,0,0,0);
    end;

[/quote:39c8d75564]

[quote:39c8d75564=�Evento onClick do Button�]

    procedure TForm1.Button1Click(Sender: TObject);
    begin
      DateTimePicker1.OnEnter(Sender);
    end;

[/quote:39c8d75564]

Renato.pavan · Answer

Valeu Adriano, vou testar sua dica.ObrigadoRenato....

F�rum Como abrir o calendario do DateTimePicker #323312