花落谁家，你作主！	盛大widget设计大赛英雄榜

很小的问题

楼主hlilna（Bulls）2001-10-30 12:48:25 在 Delphi / VCL组件开发及应用提问

我的datasource,adoquery都放在datamodule中，我启动登陆菜单时要访问数据集，我想先初始化datamodule却报错，问题点数：10、回复次数：11Top

1 楼zfmich（）回复于 2001-10-30 12:54:15 得分 0

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

2 楼liang_z（千山一刀之忍者神龟）回复于 2001-10-30 12:58:44 得分 0

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

3 楼hlilna（Bulls）回复于 2001-10-30 13:00:42 得分 0

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

4 楼di2000（耍小刀的人）回复于 2001-10-30 13:01:42 得分 0

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

5 楼hlilna（Bulls）回复于 2001-10-30 13:08:43 得分 0

di2000(敢耍大刀的人):但我的database还是在datamodule中，

EntryFrm := TEntryFrm.Create(Application); //创建它的时候datamodule还没创建
EntryFrm.ShowModal;
Application.Initialize;
Application.CreateForm(TMainFrm, MainFrm);
Application.CreateForm(TDataModuleFrm, DataModuleFrm);
EntryFrm.Free;
Application.Run;Top

6 楼zfmich（）回复于 2001-10-30 13:32:19 得分 0

你可以在主窗体中调用登录窗体。我们就是这样做的。Top

7 楼hlilna（Bulls）回复于 2001-10-30 14:00:56 得分 0

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

8 楼hlilna（Bulls）回复于 2001-10-30 15:30:43 得分 0

我想知道Top

9 楼caoyq（草民呆瓜）回复于 2001-10-30 15:34:59 得分 10

要首先创建数据模块。
这是我们的工程文件。
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.Top

10 楼zenartus（投入者）回复于 2001-10-30 15:50:16 得分 0

我想是顺序问题Top

11 楼hlilna（Bulls）回复于 2001-10-30 16:48:59 得分 0

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