登录窗口与主窗口问题 登录窗口之后希望进入主窗口,在确定按钮中加主窗口.show,运行后显示一下主窗口又结束全部程序是怎么会事?急!在线等 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 1. 我的做法可能太离谱:专门做一个简单的可执行文件供登录用,也拿它来做系统Update用。在专门的起动程序中录入并判断登录所需信息,如果正确则以加密的形式做成参数传给调用的主程序,还有就是登录的代码很少改动,一般只改 主程序、.bpl文件 或其它相关文件,所以拿它当版本更新程序最好不过了。2.MDIMainForm.WindowStyle为wsMaximized一般都可以最大化的,除非此窗体是继承过来的,且parent(s)窗体有改变。 在program中代码begin Application.Initialize; Application.CreateForm(TMainForm, MainForm); Application.CreateForm(TLoginForm, LoginForm); Application.ShowMainForm:=false; LoginForm.Show; Application.Run;end. begin Application.Initialize; Application.CreateForm(TMainForm, MainForm); Application.CreateForm(TLoginForm, LoginForm); Application.Run; end.procedure TmainForm.FormShow(Sender: TObject);begin LoginForm.ShowModal; Application.Restore;end;我是这样实现的 Application.CreateForm(Tmymain, mymain);//这是主窗口 Application.CreateForm(Tfmlogin, fmlogin);//这是登录窗口 mymain.Show; fmlogin.ShowModal ; Application.Run;这样登录窗口显示在主窗口前面! 俺一般都这么写 Application.Initialize; Application.CreateForm(TfrmMain, frmMain); frmLogin:=TfrmLogin.Create(nil); frmLogin.ShowModal; Application.Run;登陆的时候frmMain.Show;self.Close; 招魂帖:散分给老家伙。 关于多个文本文件内容的清空问题? 怎么判断单前记录是最后一条? 如何使Edit1只能输入数字而不能输入别的字母或组合键啊?(问题够菜鸟级) postmessage向别的应用程序发送键盘消息失败? 谁能给我讲一下进销存里的加权平均算法是什么? 问一个很简单但不常用的问题 小问题:关于释放窗体?? 有兴趣请进来看看,一个不大不小的问题。。。。。。 TCPClient问题请教 寻求D7+SQL2K的通用权限管理模块 关于数据库连接的问题
我的做法可能太离谱:专门做一个简单的可执行文件供登录用,也拿它来做系统Update用。
在专门的起动程序中录入并判断登录所需信息,如果正确则以加密的形式做成参数传给调用的主程序,
还有就是登录的代码很少改动,一般只改 主程序、.bpl文件 或其它相关文件,所以拿它当版本更新程序最好不过了。2.
MDIMainForm.WindowStyle为wsMaximized一般都可以最大化的,
除非此窗体是继承过来的,且parent(s)窗体有改变。
begin
Application.Initialize;
Application.CreateForm(TMainForm, MainForm);
Application.CreateForm(TLoginForm, LoginForm);
Application.ShowMainForm:=false;
LoginForm.Show;
Application.Run;
end.
Application.Initialize;
Application.CreateForm(TMainForm, MainForm);
Application.CreateForm(TLoginForm, LoginForm);
Application.Run;
end.
procedure TmainForm.FormShow(Sender: TObject);
begin
LoginForm.ShowModal;
Application.Restore;
end;我是这样实现的
Application.CreateForm(Tfmlogin, fmlogin);//这是登录窗口
mymain.Show;
fmlogin.ShowModal ;
Application.Run;
这样登录窗口显示在主窗口前面!
Application.Initialize;
Application.CreateForm(TfrmMain, frmMain);
frmLogin:=TfrmLogin.Create(nil);
frmLogin.ShowModal;
Application.Run;登陆的时候
frmMain.Show;
self.Close;