edit数据关联问题,急救~

Question

///还是有问题 我也没有办法,
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  with self.ADOQuery1 do
  begin
    Close;
    sql.Clear;
    sql.Add( 'select * from 表1 where aa='''+combobox1.Text+'''' );
    open;
    self.Edit1.Text:=FieldByName( 'aa' ).AsString;
    self.Edit2.Text:=FieldByName( 'bb' ).AsString;
  end;
end;

Answer 1

ADOQuery1打开后，是停在第一条记录的，所以肯定就是显示的是第一条数据，
如果是想显示所有的，可以在窗体上增加一个控制条，就是上一条、下一条之类的；或者使用Data Controls面板上的DBCtrlGrid控件，在这个上面放两个DBEdit控件，分别对应你的两个字段，然后设置数据源，ADOQuery1打开之后就可以了；

Answer 2

总是只显示第一条的数据~如果查询出多条，肯定只显示第一条了。要显示多条不能用EDit，用Listbox