数据显示问题！

嗨，大家好！  
  procedure   TForm1.Button3Click(Sender:   TObject);  
  begin  
      With   ADOQuery1   do  
      begin  
          Close;  
          SQL.Clear;  
          SQL.Add('Select   *   from   a   ');  
          Open;  
          DBEdit1.DataSource   :=   DataSource2;  
          DBEdit1.DataField   :=   '题号';  
          DBEdit2.DataSource   :=   DataSource2;  
          DBEdit2.DataField   :=   '题目';  
        end;  
  end;  
   
  procedure   TForm1.Button4Click(Sender:   TObject);  
  begin  
   
      With   ADOQuery1   do  
      begin  
          Close;  
          SQL.Clear;  
          SQL.Add('Select   *   from   S1   ');  
          Open;  
          DBEdit1.DataSource   :=   DataSource1;  
          DBEdit1.DataField   :=   '题号';  
          DBEdit2.DataSource   :=   DataSource1;  
          DBEdit2.DataField   :=   '正确答案';  
        end;  
  end;  
   
  怎么我在按了Button3后在按Button4就出错呢？    
 

--------------------------
新闻：一款软件何以管理一个复杂的社会
网站导航: 博客园首页  新闻  .NET频道  社区  博问  闪存  找找看