Например, вы открыли форму, для того чтобы ввести поля новой записи.
Заполнили все, что требовалось. На каком событии делать запись в лог-таблицу?
При таком коде :
| Код | 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; |
вероятно и обычное редактирование уже присутствующей записи спровоцирует логирование ? |
)