我要让其他的窗体出先的时候,让登陆窗体消失,如何做?
解决方案 »
- fastreport打印格式
- delphi中的edit输入数字时怎样显示千分位
- <AI Techniques for Game Programming> 中文版出来了!
- 请问大家管理多个相同对象实例时是用的TObjectList吗?
- 判断串口的缓冲区有数据的函数是什么。
- 请问学Delphi+Oracle用什么参考书?
- 关于字符串的截取
- 我最近编写一个DLL,用来实现ftp功能,使用了delphi中的nmftp控件,结束调用后总出现莫名其妙的内存错误。请高手指教!
- 如何让放在TControlBar中的控件无法拖动
- 关于组件Adoconnection的有关疑问?( 急急急!!!!)
- 有关dll调用问题,急,在线等待,马上给给分
- 不单纯是SQL语句分组的问题(我得问题列的很详细,大家看看,帮帮忙)。
try
Frm_password.ShowModal;
finally
Frm_password.Free;
end;
if (not exit) then//判断密码是否正确
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end;
登录窗体.showmodal;
在输入了正确的用户名和密码后,可以进入主窗体,这时添加代码
登录窗体.close
就可以了