title: Set date on TDateTimePicker On drop down
body: <p>I have a DateTimePicker on a Delphi 6 form with a default date of 30/12/1899. I want users to be able to click on it or open the dropdown calendar and it select the current date. Using the OnClick procedure with:</p>
  
  <blockquote>
    <p>DateTimePicker.Date := Date</p>
  </blockquote>
  
  <p>sets the date in the editable part to Date when the users click on it or the calendar dropdown button but will not force the calendar to automatically select today's date. The result is the same if I use this code in the DateTimePicker's OnDropDown procedure.</p>
  
  <p>Do I need to use something like <a href="https://stackoverflow.com/questions/7210565/how-do-you-programmatically-mark-a-date-in-delphis-tdatetimepickers-calendar">in this post</a> to manipulate the calendar? Or is there a simple property that I've missed?</p>
  
  <p>Thanks
  Matt</p>