delphi 求解析

procedure TForm1.DBNavigator1Click(Sender: TObject; Button: TNavigateBtn);
begin
  if Button = nbPost then
  begin
    ADOQuery1.Active := False;
    ADOQuery1.Active := True;
  end;
end;

答案：1楼瞎写呢！
procedure TForm1.DBNavigator1Click(Sender: TObject; Button: TNavigateBtn);
begin
  if Button = nbPost then              ///如果按键为‘修改’  
 begin
       ADOQuery1.Active := False;  /// 数据集关闭
    ADOQuery1.Active := True;   //// 数据集打开，这两部的目的是刷新数据集。
  end;
end;

其他：procedure TForm1.DBNavigator1Click(Sender: TObject; Button: TNavigateBtn);
begin
  if Button = nbPost then              ///保存数据
  begin
    ADOQuery1.Active := False;  /// 控件关闭
    ADOQuery1.Active := True;   //// 控件打开
  end;
end; 相当于判断如果是点击提交按钮，则重新加载数据集，刷新数据

上一个：delphi难啊 高手光顾一下，解释一下行吗
下一个：delphi 中的uses解释