如何判断ADOQuery的当前状态？？

Question

type TDataSetState = (dsInactive, dsBrowse, dsEdit, dsInsert, dsSetKey, dsCalcFields, dsFilter, dsNewValue, dsOldValue, dsCurValue, dsBlockRead, dsInternalCalc, dsOpening); 使用如：
procedure TForm1.Button1Click(Sender: TObject);
begin
  if   adoquery1.State = dsInactive then
    showmessage('dsflkj');
end;

Answer 1

使用 adoquery1.State 判断
if adoquery1.State =dsinsert insert状态
if adoquery1.State =dsedit edit状态

Answer 2

补充：
procedure TForm1.Button1Click(Sender: TObject);
begin
  if   adoquery1.State in [dsinsert,dsedit] then
    showmessage('当前处于编辑状态');
end;