很小的问题

Question

初始化datamodule?
把ADOCONNECTION也放在datamodule中，就直接调用就可以呀。

Answer 1

在工程文件中让DataModule先创建！

Answer 2

我的datamodule不是自动创建的，且登陆菜单创建是在主窗口之前

Answer 3

实在不行就把datasource,adoquery都放在启动登陆菜单

Answer 4

di2000(敢耍大刀的人):但我的database还是在datamodule中，  EntryFrm := TEntryFrm.Create(Application);  //创建它的时候datamodule还没创建
  EntryFrm.ShowModal;
  Application.Initialize;
  Application.CreateForm(TMainFrm, MainFrm);
  Application.CreateForm(TDataModuleFrm, DataModuleFrm);
  EntryFrm.Free;
  Application.Run;

Answer 5

zfmich():谢谢你，不过我不能这样做，谁有好办法？

Answer 6

要首先创建数据模块。
这是我们的工程文件。
begin
  Application.Initialize;
  FormSplash:=TFormSplash.Create(Application);
  FormSplash.show;//闪现窗体
  FormSplash.Refresh;
  Application.HelpFile := 'fa2000.hlp';
  Application.Title := '********管理系统';
  Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(TFormDesk, FormDesk);
  Application.CreateForm(TDataModuleConnect, DataModuleConnect);
  Application.CreateForm(TDataModuleDataPub2000, DataModuleDataPub2000);
  Application.CreateForm(TDMClient_FA2000, DMClient_FA2000);
  Application.CreateForm(TDMClientPUB, DMClientPUB);
  Application.CreateForm(TDMClientHF, DMClientHF);
  Application.CreateForm(TDMClient_GLX, DMClient_GLX);
  Application.CreateForm(TFormLogin, FormLogin);
  FormLogin.showmodal;//登陆窗体
  FormLogin.free;
  Application.Run;
end.

Answer 7

谢谢  caoyq(草民呆瓜)　
谢谢各位