Логирование вставки и редактирования записи у определенных таблиц БД

[malor]

Например, вы открыли форму, для того чтобы ввести поля новой записи.
Заполнили все, что требовалось. На каком событии делать запись в лог-таблицу?

При таком коде :

Код: (Delphi)

procedure TDataModule.ADOTable1AfterPost(DataSet: TDataSet);
var
  SQLText : String;
begin

  SQLText := 'INSERT INTO log (textmessage) VALUES (''В таблицу такую-то вставлена запись. Поле такое-то равно : '
                    +   ADOTable1.FieldByName('name').AsString) + ''' ';

  try
    with ADOQuery1 do
    begin
      SQL.Clear;
      SQL.Add(SQLText);
      ExecSQL;
    end;
  except
     on e:Exception do
  end;

end;

пожалуй и обычное редактирование уже присутствующей записи спровоцирует логгирование ?

[zubr]

Если надо логировать именно добавление новой записи, то используй событие AfterInsert

[Oldy]

А на уровне триггеров это не реализуемо?

[malor]

Код: (Delphi)

procedure TForm1.InsertBranch();
begin
  DataModule1.ADOTableBranch.Append;
  FormEditBranch.Caption := 'Вставка филиала';

  FormEditBranch.ShowModal();
  // На форме человек нажал кнопку отмена

  DataModule1.ADOTableBranch.Refresh;

end;

Функция Append вставила заготовку(пустую запись), в это момент сработает триггер. Но еще ж нет информации которую он бы хотел занести в лог-таблицу...

[Oldy]

Значит нельзя допускать создания пустой записи, что и есть "контроль достоверности данных".