程序登录以后如何关闭登录窗口而只显示系统主窗口?
解决方案 »
- 如何在线程中用webbrowse打开网页?
- 各位:用DELPHI生成EXCEL图表(饼图),显示百分比保留两位小数如何设置
- 键列信息不足或不正确。更新影响到多行
- The sample of Remote Control with Canon SDK(ViewFinder part).
- 急聘Delphi软件工程师
- 怎样使用Delphi对AutoCAD进行操作啊,我写的代码老报错,谁能帮帮忙啊
- 报表的Detail行本来是根据记录数自动伸缩的,我想固定其高度,应该怎样实现?
- 在编译包时出现以下提示,怎么办?
- 怎样限制一个程序运行的个数?
- 如何对动态生成的控件再进行操作?
- 串口通信
- help!!!求救,发布时遇到了问题
yourfrm:=tyourfrm.create();
yourfrm.showmodal;
form2.Show;
form1.Close;
end;
我是这样做的。但执行的时候所有的窗口全都关了。
高手在哪里???如何解决????
可以写个函数
fucntion show_MainForm:Boolean;
begin
Result:=false;
with TForm2.create(application) do
begin
try
if form2.showmodal=mrok then
Result:=true;
finally
form2.free;
end;
end;
end;
该程式已调试通过了
在用时只要在form3的oncreate事件中添加
if Not show_MainForm then
Application.terminate;
form2.Show;
form1.Close;
end;
我是这样做的。但执行的时候所有的窗口全都关了。
高手在哪里???如何解决????
////////////////////////////////////////////////
你的form1是主窗口,主窗口关闭的时候会关闭所有窗口.
...
Application.Initialize;
application.createform(TLoginForm,LoginForm); //创建登录窗口
LoginForm.showmodal;
if not logined then //登录失败程序退出
application.terminate
else //登录成功创建主窗体
application.createform(TMainForm,MainForm);
application.run
...
Logined 为登录成功标志。
主窗体名.show;
程序登录以后如何关闭登录窗口而只显示系统主窗口,
1、用最直接、最简单的方法把登陆窗口loginform:=hide,主窗口mainform:=show2、调用函数 CloseWindow(HWND hWnd)
该函数最小化指定的窗口,但并不销毁该窗口。如:closewindow(loginform.handle);