Analitcs

Pesquisar no conteúdo do blog.atlabs.com.br

quinta-feira, 31 de janeiro de 2013

DELPHI - TDateTimePicker - DroppedDown - Exibir o Calendário

Reações: 


procedure TForm1.DateTimePicker1Click(Sender: TObject);
begin
  DateTimePicker1.Perform(WM_KEYDOWN, VK_F4, 0); // herdado do combo box
  DateTimePicker1.Perform(WM_KEYUP, VK_F4, 0);
end;

//OU

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
  DateTimePicker1.Perform(WM_KEYDOWN, VK_F4, 0);
  DateTimePicker1.Perform(WM_KEYUP, VK_F4, 0);
end;

Nenhum comentário:

Postar um comentário

Observação: somente um membro deste blog pode postar um comentário.

Max Gehringer