[roman]

Una forma de hacerlo es usando las propiedades MinDate y MaxDate del DateTimePicker. Por ejemplo:

Código Delphi [-]
var
  Date: TDate;
  Y, M: Integer;

begin
  Date := DateTimePicker1.Date; // Tomas la fecha del primer control
  Y := DateUtils.YearOf(Date); // Tomas el año
  M := DateUtils.MonthOf(Date); // Tomas el mes

  DateTimePicker2.MinDate := EncodeDate(Y, M, 1); // Restringes el segundo control al inicio del mes
  DateTimePicker2.MaxDate := EncodeDate(Y, M, DateUtils.DaysInMonth(Date)); // Ya al final del mes
end;

LineComment Saludos