X11
Silver Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
D2007, Fib+ 6.9.6, Dev 43.
cxGrid привязан к TpFibDataSet. У TpFibDataSet все SQL заполнены, в том числе и UpdateSQL. Также и TpFibDataSet.AutoCommit := true;
Вот код
Код:
aRecordIndex := 3;
....
dbgMail.DataController.Edit;
dbgMail.DataController.Values[aRecordIndex, dbgMailLAST_DATE.Index] := now;
выводим сообщение, дата показана правильно
ShowMessage(dbgMail.DataController.Values[aRecordIndex, dbgMailLAST_DATE.Index]);
dbgMail.DataController.Post;
dbgMail.DataController.RefreshExternalData;
|
данные в поле LAST_DATE не попадают, как были NULL, так и остались.
Ошибок и исключений нет.
Но.....
Если выполнить тоже самое, но уже непосредственно с TpFibDataSet
tMail.Edit;
tMail.FBN('LAST_DATE').AsDateTime := now;
tMail.post;
tMail.refresh;
то данные в поле LAST_DATE попадают (записываются).
Что может быть не так, когда записываешь через cxGrid?
Кстати вот ещё кусок кода, прекрасно изменяющий данные в таблице (та же самая связка компонент):
Код:
with dbgMail.DataController do
begin
Edit;
with fmEmailEdit do
begin
dbgMailNAME.EditValue := edMailListName.EditValue;
dbgMailRECIPIENT.EditValue := GetMyRecipients(lboxRecipientList);
dbgMailRECIPIENT_COPY.EditValue := GetMyRecipients(lboxRecipientListCopy);
dbgMailSUBJECT.EditValue := edSubject.EditValue;
dbgMailTITLE.EditValue := memoTitle.Text;
dbgMailBODY.EditValue := memoBody.Text;
dbgMailFOOTER.EditValue := memoFooter.Text;
dbgMailCATEGORY.EditValue := cboxCategory.EditValue;
// dbgMailSMTP_FROM.EditValue := edSMTP_From.Text;
dbgMailLOCKED.EditValue := cboxLocked.Checked;
dbgMailSMTP_FROM.EditValue := vgAccountSMTPFrom.Properties.Value;
dbgMailFROM_NAME.EditValue := vgAccountFromName.Properties.Value;
dbgMailE_MAIL.EditValue := vgAccountEMail.Properties.Value;
dbgMailPOP3.EditValue := vgAccountPop3.Properties.Value;
dbgMailPOP3_PORT.EditValue := vgAccountPop3Port.Properties.Value;
dbgMailPOP3_USER.EditValue := vgAccountPop3User.Properties.Value;
dbgMailPOP3_PASSWORD.EditValue := vgAccountPop3Pass.Properties.Value;
dbgMailPOP3_SSL.EditValue := vgAccountPop3SSL.Properties.Value;
dbgMailSMTP.EditValue := vgAccountSMTP.Properties.Value;
dbgMailSMTP_PORT.EditValue := vgAccountSMTPPort.Properties.Value;
dbgMailSMTP_USER.EditValue := vgAccountSMTPUser.Properties.Value;
dbgMailSMTP_PASSWORD.EditValue := vgAccountSMTPPass.Properties.Value;
dbgMailSMTP_TYPE_CRYPT.EditValue:= vgAccountSMTPTypeCrypt.Properties.Value;
dbgMailPOP3_BEFOR_SMTP_AUTH.EditValue := vgAccountPOP3_BEFOR_SMTP_AUTH.Properties.Value;
end;//with
Post;
|
----------
/не мы такие, жизнь такая/ |
|
