DateTimePicker.Checked содержит неверное значение

софт - дельфи 2007
база ASA10
компонент нативДБ

короче такой глюк,

есть DateTimePicker7, и onChange я вписал

  if DateTimePicker7.Checked then
    showmessage('+')
  else
    showmessage('-');

ну и само собой ета дата загружается с базы и вгрувается в базу.

на Windows XP все прескастно валит, а вот на висте космос какойто. когда я снимаю чекбокс он снимается но DateTimePicker7.Checked значение тру. и никак неменяется. сохраняю данные, сохроняется 4то стоит дата чот чекбокс снят, рефрешутся данные и заного появляется етот чекбокс на дате с той датой которая мне не нужна.

я и софт рестартнул, и комп, и новый дайттаймпикер новый создал и нифига.

загрузка :

    if AsaDataset10.fieldbyname('DI_DATA').IsNull then begin
      DateTimePicker7.Date := ConnectedUser.WorkDate;
      DateTimePicker7.Checked := false;
    end else begin
      DateTimePicker7.Date := AsaDataset10.fieldbyname('DI_DATA').AsDateTime;
      DateTimePicker7.Checked := true;
    end;

сейв

    if DateTimePicker7.Checked then begin
      AsaSQL1['DI_DATA'] := DateTimePicker7.Date;
    end else begin
      AsaSQL1['DI_ДATA'] := null;
    end;

т.е. неправильное значение DateTimePicker7.Checked на висте.

Че делать то ?

Модератор: Во-первых, используй тег SRC когда постишь в форум больше двух строчек кода. Во-вторых, в следующий раз топик с таким оформлением, коверканием и прочими излишествами будет просто удален, возможно - с баном.

Это стандартный баг связанный с темами
решен тока в последнем патче на 2009.
Отключайте темы и не будет проблем.

а что такое темы? :) я их вродебы как не использую.

я лично сделал кнопку которайа делает datetimePIcker.checked = false, и тогда все пашет.