程序经常提示‘数据库连接过多’、‘堆扎溢出’。
我的程序在登录窗口、主窗口分别有一个数据库连接,使用完后均未手工断开连接,
在执行重新登录菜单时,提示‘数据库连接过多’、‘堆扎溢出’,平时也时有发生。
我的登录窗口是打开主窗口之前的:
Application.Initialize;
splashfrm:=tsplashfrm.Create(application);
splashfrm.Show ;
splashfrm.Update;
f_login:=tf_login.Create (application);//登录窗口
f_login.Showmodal;
if f_login.log_ok =false then
begin
exit;
application.Terminate ;
end;
Application.CreateForm(TMainForm, MainForm);
splashfrm.Hide;
splashfrm.Free;
Application.Run;
在通过登录窗口,进入主窗口后,怎样手工断开登录窗口的数据库连接哪??
从这段程序看不出来原因,不过delphi作为一个功能强大的开发系统,有它自己的错误和对象创建销毁处理,所以当程序退出时会断开数据库连接,你的问题可能在别处吧?比如数据库驱动、内存,或者是你自己有特殊处理的地方