Обновление компонентов...

скрипт для отображения дня недели в ComboBox...(Может кому пригодится...)

procedure Form2_DateTimePicker5_OnChange (Sender: string);
var
  WDay: integer;
begin
    WDay := DayOfWeek(Form2.DateTimePicker5.Date)-1;

    if Form2.DateTimePicker5.Checked then
begin
        if WDay = 0 then Form2.ComboBox2.ItemIndex := 7 else Form2.ComboBox2.ItemIndex := WDay;
end
    else Form2.ComboBox2.ItemIndex := 0;

end;

Доброго времени суток Дмитрий!
Ситуация такая:
На Form2(новая запись) есть DateTimePicker5 к нему привязан ComboBox2 для получении дня недели...
ставим галочку в DateTimePicker5 сразу выдаёт результат в ComboBox2.............РАБОТАЕТ!
Проблемка:
На этой же Form2 клик по строчки в TableGrid1:

s := SQLExecute('SELECT opendate FROM import WHERE id = ' + IntToStr(Form2.TableGrid1.dbItemID));
     if s <> '' then Form2.DateTimePicker5.Date := SQLDateTimeToDateTime(s) else Form2.DateTimePicker5.Checked := False;

дата появляется...а вот ComboBox2 молчит.............. в дате снимешь галочку,а потом поставишь работает....
Вопрос:
существует возможность заставить работать ComboBox2..как только изменилась дата в DateTimePicker5.....?

                                                                                                       С Уважением и Благодарностью Роман!!!