lunes primer dia de la semana
 

Hola amigos, otra vez recurro a ustedes.

Necesito cambiar o que me aparezca en un componente de tipo TDateTimePicker el lunes como el primer día de la semana. Será posible esto?

Gracias.

Hola, creo que predeterminado ya viene el lunes como primer dia de la semana pero si no con la propiedad FirstDayOfWeek estaria solucionado.

Código Delphi [-]
MonthCalendar1.FirstDayOfWeek:=dowMonday;

Un saludo.

Amigo creo que en un TDateTimePicker no puedo usar esa propiedad porque ha sido declarada como published en la clase superior.

Alguna otra recomendación?

Hola, puedes hacerlo utilizando las funciones de la unit DateUtils.

Código Delphi [-]
var
 FchActual : TDateTime;
begin
 FchActual := Date;
 DateTimePicker1.Date := IncDay(FchActual, - (DayOfTheWeek(FchActual)-1));

Saluditos

Puedes "desproteger" la propiedad y asignarla en el evento OnDropDown:

Código Delphi [-]
type
  TDateTimePicker = class(ComCtrls.TDateTimePicker);

procedure TForm1.DateTimePicker1DropDown(Sender: TObject);
begin
  TDateTimePicker(DateTimePicker1).FirstDayOfWeek := dowMonday;
end;

// Saludos

Román gracias a tu respuesta hice lo que quería hacer.
Muchas gracias.