各位高手，请教一个问题？

[loving]

我在有一个form1.show 里如下写
当我运行完第一次关闭窗体，在运行就出错(第一次不出错)税碰到过这种情况，帮我分析一下！！！

err:
project xxx.exe raised exception class EAccessViolation
with message 'Access violation at addrees 0048fc61 in module
xxx.exe '. Read of address ffffffff'. process stoped .
use step or run to continue.

with datamodule1 do
begin
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('select * from table1 ');
Query1.Open;
DataSource1.DataSet := SupplierQuery;
dbgrid1.datasource:=DataSource1;
end;

[loving]

我在有一个form1.show 里如下写
当我运行完第一次关闭窗体，在运行就出错(第一次不出错)税碰到过这种情况，帮我分析一下！！！

err:
project xxx.exe raised exception class EAccessViolation
with message 'Access violation at addrees 0048fc61 in module
xxx.exe '. Read of address ffffffff'. process stoped .
use step or run to continue.

with datamodule1 do
begin
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('select * from table1 ');
Query1.Open;
DataSource1.DataSet := Query1; //这儿出错！！！！
dbgrid1.datasource:=DataSource1;
end;

[zjqyb]

贴完整一些