Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.11.04;
Скачать: CL | DM;

Вниз

Полуошибка ???   Найти похожие ветки 

 
kyn66 ©   (2007-10-10 12:31) [0]

Уважаемые мастера! На форме положил RX-компонент TDBDateEdit. Связал с полем базы. В свойствах установлено - сегодняшняя дата по умолчанию. Так вот при загрузге формы (запуск из IDE . Самостоятельно- ошибка не появляется) сперва вылетает ошибка Ошибка неизвестного типа и курсор устанавливается на код :

procedure TDBDateEdit.EditingChange(Sender: TObject);
begin
 inherited ReadOnly := not FDataLink.Editing;
 if FDataLink.Editing and DefaultToday and (FDataLink.Field <> nil) and
   (FDataLink.Field.AsDateTime = NullDate) then
  FDataLink.Field.AsDateTime := SysUtils.Now;
end;


В чем тут дело?


 
Shamansky_ne   (2007-10-10 14:31) [1]

а попробуй разложить сложное условия на несколько простых и как вариант используй вместо sysutils.now - now()


 
Reindeer Moss Eater ©   (2007-10-10 14:38) [2]

Установка дефолтного значения поля средствами dbaware контрола?
А менее извращенного метода не нашлось?


 
kyn66 ©   (2007-10-10 14:45) [3]

ошибка выявлена. В таблице есть поле LookUp. Не знаю почему, но она вылетает, точнее ошибка может быть разная, если параметр LookUpCache не установить в True. C этим разобрался . Однако выяснилось другое. Если дату сегодняшнего дня осавить показывать по умолчанию и не кликать на календарик (нет ни какого события), то в базу вместо даты записывается NULL. А если вводить руками или мышем тыкнуть - все пучком.


 
ЮЮ ©   (2007-10-11 03:09) [4]

> Уважаемые мастера! На форме положил RX-компонент TDBDateEdit.
> Связал с полем базы. В свойствах установлено - сегодняшняя
> дата по умолчанию.


Постать установку даты по умолчанию в обработчик OnNewRecord DataSeta и не мзвращайся. TDBDateEdit показывал, показывает и должен показывать то, что хранится в поле записи НД. Хочешь что-то там увидеть - меняй значение поля.



Страницы: 1 вся ветка

Текущий архив: 2007.11.04;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.021 c
2-1191990597
Al500
2007-10-10 08:29
2007.11.04
Подскажите пожалуйста, возможно ли неявно вызвать процедуру


2-1191954003
sdaf
2007-10-09 22:20
2007.11.04
IB


4-1178095614
NeyroSpace
2007-05-02 12:46
2007.11.04
Как узнать что ползунок ScrollBar дошел до конца прокрутки?


3-1182845730
Yasmin
2007-06-26 12:15
2007.11.04
Не обновляются данные


15-1191745953
digger
2007-10-07 12:32
2007.11.04
Проблема с мышами