小问题

Question

with DataModule2 do
     begin
         ADOQuery1.Close;
         ADOQuery1.SQL.Clear;
         ADOQuery1.SQL.Add(str);
         ADOConnection1.Connected:=True;
         DataSource1.DataSet:=ADOQuery1;
         ADOQuery1.Open;
     end;
 DBGrid1.DataSource:=DataModule2.DataSource1;这样执行没问题,但我刚开始时用
with DataModule2 do
     begin
         ADOQuery1.Close;
         ADOQuery1.SQL.Clear;
         ADOQuery1.SQL.Add(str);
         ADOConnection1.Connected:=True;
         ADOQuery1.Open;
     end;
 DBGrid1.DataSource.DateSet:=DataModule2.ADOQuery1;
这样为编译时没问题,一运行就出问题

Answer 1

DBGrid1.DataSource.DateSet:=DataModule2.ADOQuery1;
问题在这里,因为DBGrid1.DataSource并没有设置DataSource,直接取它的DateSet属性时,当然取不到了要分开来设置,先设置DataSource
DBGrid1.DataSource:=DataModule2.DataSource1;
然后设置DateSet:
DataModule2.DataSource1.DateSet:=DataModule2.ADOQuery1;或DBGrid1.DataSource.DateSet:=DataModule2.ADOQuery1;