Не сохраняются изменения в БД через редактирование через DBGridEh

[artemavd]

Добрый день!
Не сохраняются изменения в базе данных.
Связка:

DBGridEh -> DataSource -> MemTableEh -> pFIBDataSet -> pFIBDataBase.

Прошу помочь разобраться и дать рекомендации, что настроить, дописать, проверить.

[Stilet]

Ты хоть код покажи )

[artemavd]

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

Ты хоть код покажи )

Какой код-то?) Вот именно, что мне непонятно в какой момент написать нужные Post и т.п.

[Stilet]

Ну напиши при закрытии формы )

[artemavd]

Что написать? MemTableEh.Post?
Я пробовал. И в событии простой кнопки кидал - не работает.

[xxbesoxx]

Без Post тоже работает . Но на всяком случи можно написать Post

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
 begin
   If Application.MessageBox('Вы действительно хотите закрыть программу','Предупреждения ',MB_ICONQUESTION+MB_YESNO)=IDYES then
     begin
        ADOQuery1.Edit;
        ADOQuery1.Post;
        ADOQuery1.Close;
        application.Terminate
     end
    else
  Action:=caNone;
end;
end;
end.

[artemavd]

У меня мой код не работает:

procedure TMainForm.sWebLabel1Click(Sender: TObject);
begin
 if Application.MessageBox(PWideChar('Сохранить изменения?'),
                          'Project1',
                          MB_OKCANCEL + MB_ICONWARNING) = mrOk then
 begin
  MainForm.MemTableEh_Places.Edit;
  MainForm.MemTableEh_Places.Post;
  MessageBox(Handle,
            PWideChar('Изменения сохранены!'),
            'Project1',MB_ICONINFORMATION);
 end;
end;

[xxbesoxx]

Так будет рабтать

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
 if Application.MessageBox(PWideChar('Сохранить изменения?'),
                          'Project1',
                          MB_OKCANCEL + MB_ICONWARNING) = mrOk then
 begin
  MainForm.MemTableEh_Places.Edit;
  MainForm.MemTableEh_Places.Post;
  MainForm.MemTableEh_Places.Close;
  application.Terminate;
  MessageBox(Handle,
            PWideChar('Изменения сохранены!'),
            'Project1',MB_ICONINFORMATION);
 end
  else
 Action:=caNone;
end;

 if Application.MessageBox(PWideChar('Сохранить изменения?'),
                          'Project1 -замените',

на

 if Application.MessageBox(PWideChar('Сохранить изменения?'),
                          'Предупреждения',

[Stilet]

Ну я ЭхЛиб не использую, так что могу только догадываться.

[Vapaamies]

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

Связка:

DBGridEh -> DataSource -> MemTableEh -> pFIBDataSet -> pFIBDataBase.

Мне еще вчера показалось, что это хорошая тема для "отсыпь немного". MemTableEh разве умеет работать в качестве оболочки над другим DataSet-компонентом?