TTable的问题

Question

定义一个全局变量
var
   statetable:TDataSetState;//记录table状态
tabel1.beforepost事件中
   statetable:=table1.state;//记录
table1.afterpost事件中
   if statetable=dsedit then
      showmessage('dsedit')

Answer 1

首先用全局变量记录
var
  TotalRec:integer;
...  TotalRec:=Table1.RecordCount在AfterPost中判断
  if TotalRec>Table1.RecordCount then begin
  //删除了记录
  end
  else if TotalRec<Table1.RecordCount then begin
  //插入了记录
  end
  else begin
  //修改了记录
  end;
  TotalRec:=Table1.RecordCount;