超级新手入门第1问，关于dbgrid放在PageControl数据显示

Question

DbGrid已经拉进来了，我想在PageControl OnShow的时候自动创建 ADOQuery，DataSource等，然后把查询的结果显示在这个DbGrid里，还要设定某个Grid里的这段只读属性,谢谢大家,

Answer 1

事件可以用onchange来触发，不用onshow
通过判断active页执行相关代码
只读属性应该设在query里
都可以动态赋值

Answer 2

或者你想show出来的时候就有，可以在onshow事件里调用onchange事件

Answer 3

procedure TfrmBase.TabSheet1Show(Sender: TObject);
var
    Query :TADOQuery;
begin
  Query :=TADOQuery.Create(self);
  Query.Connection :=ADOConnection1;
  Query.SQL.Text :='select top 100 * from LogView Order by id desc;
  Query.Open ;
  //显示在DbGrid里怎样写  Query.Close ;
  Query.Free ;
end;这个怎样修改成我要的？
不好意思，刚看delphi.

Answer 4

加入：
DS:=TDataSource.Create(self);
DS.DataSet:=Query;
DbGrid.DataSource:=DS;
DS.DataSet:=nil;
DS.Free;