DateTimePicker + Label

[krem]

У меня проблема с DateTimePicker. Я не знаю, как сделать так, чтобы в label прописывался день недели соответствующий календарю. Какое свойство ковырять? Подскажите пожалуйста.

[Баламут]

Не знаю на счет свойства. По-моему такого там просто нет. Но вот такой кусок кода тебе поможет:

procedure TForm1.DateTimePicker1Change(Sender: TObject);
begin
case DayOfWeek(DateTimePicker1.Date) of
  1: Label1.Caption := 'Воскресенье';
  2: Label1.Caption := 'Понедельник';
  3: Label1.Caption := 'Вторник';
  4: Label1.Caption := 'Среда';
  5: Label1.Caption := 'Четверг';
  6: Label1.Caption := 'Пятница';
  7: Label1.Caption := 'Суббота';
end;
end;

[Shuraken]

Label1.Caption := FormatDateTime('DDDD', DateTimePicker.Date);