简单问题

我做的进销存管理系统，当进了一批货的时候，如果不关闭系统库存查询那里就显示不出来。
必须重新打开系统才有新的数据出现，出货的时候也是如此，不知道是什么原因？
库存那里我的代码是这样写的。
procedure TfrmStore.FormCreate(Sender: TObject);
begin
  with ADOQuery1 do
  begin
    Close;
    SQL.Clear;
    SQL.Text:='select * from StoreForm';
    Open;
  end;
end;
有什么问题吗？谢谢