Código Delphi [-] uses DateUtils; procedure TForm1.FormCreate(Sender: TObject); begin DateTimePicker1.Date := StartOfTheMonth(Date); DateTimePicker2.Date := EndOfTheMonth(Date); end;
uses DateUtils; procedure TForm1.FormCreate(Sender: TObject); begin DateTimePicker1.Date := StartOfTheMonth(Date); DateTimePicker2.Date := EndOfTheMonth(Date); end;