[Aibekkoke]

Здравствуйте, имеется код для вставки даты:
Код:

Код:

if form1.ADOTable1.Modified then
         form1.ADOTable1.FieldValues['Data']:= DateTimePicker1.date;
           form1.ADOTable1.Post;

При добавлений записи этот код работает. А вот при изменений записи поле 'data' не меняется.
Подскажите пожалуйста почему не работает.

[lmikle]

А какой обработчик используется?

[Aibekkoke]

Сообщение от lmikle

А какой обработчик используется?

Здравствуйте, код вставляю OnChange компонента Page control

[lmikle]

Ну причина может быть в том, что DataSet (ADOTable1) находится не в режиме редактирования (или не изменена, не уверен, что означает св-во Modified, лень смотреть в доке). Вообще, я бы сделал по другому.
Если это поле для отслеживания даты изменения записи, то более правильно делать это в триггере в БД.
Если это обычное поле, то лучше сохранять значение в обработчике OnBeforePost, т.е. значение поля будет обновляться перед сохранением записи.

[Guaho]

В OnBeforePost пишете:

Код:

form1.ADOTable1.FieldByName('Data').Value := DateTimePicker1.date;

И всего делов! Условие "if form1.ADOTable1.Modified" тут явно лишнее!

[Fcevter]

Сообщение от Guaho

В OnBeforePost пишете:

Код:

form1.ADOTable1.FieldByName('Data').Value := DateTimePicker1.date;

И всего делов! Условие "if form1.ADOTable1.Modified" тут явно лишнее!

Спасибо за совет