1、在工程初始化时调用:program project1;...begin
Application.Initialize;
ConnecteDatabase;//就在这调用
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
Application.Initialize;
ConnecteDatabase;//就在这调用
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
解决方案 »
- 50分:一个存储过程的问题
- delphi+mscomm+线程
- 在多线程中用SOCKET出现的问题
- 有关listView和数据库的问题,在线急等,分数不是问题!
- 用DELPHI开发USB程序(100分)
- 朋友们.进来看看~
- ******非常急!我想在DELPHI中用程序实现控制SQL SERVER 2000但不知道怎么实现,在线等待。。。。。****
- 通过AcroPDF.dll读取PDF
- 急!!!请求各位的帮助,感激不尽!!多谢!!关于计算器!!
- 请问在dbgrid中如何才能得到当前行焦点改变的事件?
- 在一个应用程序中能不能让主窗体始终置于所有子窗体的上层
- 小问题加小分,大问题加大分,大家快来看啊!
1。加入一个datamodule ,改变project 的属性使得 datamodule 先于 主窗体建立
2.把所有的数据控件(batabase,table,query放到datamodule中
3。datamoudule oncreate 中写
Database1.AliasName
Database1.Connected
等;
4。在project中 begin
Application.Initialize;
ConnecteDatabase;//初始化ini
Application.CreateForm(TDataModule2, DataModule2);
//datamodule 先于 主窗体建立
Application.CreateForm(TForm1, Form1);
Application.Run;
end; 还有不是问题的问题 别忘了在 datamoule中uese TFoursunDatabase的单元
需要显示数据的窗体uese datamodule的单元;
最后谢谢你提供了一个练习打字的机会给我