求用DELPHI 从登陆窗口到主窗口的代码。
有什么类似的教程或者视频就是DELPHI做一个登陆窗口输入用户名和密码点确定就可以跳到主窗体了。我登陆窗体和主窗体都做好了但是不知道怎么串联起来求高手~!...
有什么类似的教程或者视频 就是DELPHI做一个登陆窗口 输入用户名和密码 点确定 就可以跳到主窗体了。
我登陆窗体和主窗体都做好了 但是不知道怎么串联起来 求高手~! 展开
我登陆窗体和主窗体都做好了 但是不知道怎么串联起来 求高手~! 展开
4个回答
展开全部
Application.Initialize;
Application.Title:='XXXX管理系统';
Application.ShowMainForm:=false;
Application.CreateForm(TDataM, DataM);
Application.CreateForm(TFrm_Main, Frm_Main);
Application.CreateForm(TFrm_User_Login, Frm_User_Login);
Frm_Main.Visible:=false;
Frm_User_Login.ShowModal;
Application.ShowMainForm:=true;
Frm_Main.Visible:=true;
Application.Run;
以上代码是在Project中的begin和end中的。
Frm_User_Login中就可以不用管了,只要密码正确就直接进入主界面了
Application.Title:='XXXX管理系统';
Application.ShowMainForm:=false;
Application.CreateForm(TDataM, DataM);
Application.CreateForm(TFrm_Main, Frm_Main);
Application.CreateForm(TFrm_User_Login, Frm_User_Login);
Frm_Main.Visible:=false;
Frm_User_Login.ShowModal;
Application.ShowMainForm:=true;
Frm_Main.Visible:=true;
Application.Run;
以上代码是在Project中的begin和end中的。
Frm_User_Login中就可以不用管了,只要密码正确就直接进入主界面了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
串联起来用mainform.show或mainform.showmodel就可以咯。(在登陆按钮的onclik事件,条件是验证正确)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
在主窗体的 onformCreate或者onformShow事件中添加下面的代码
with TfrmPassWord.Create(self) do
try
if ShowModal = mrOk then//如果密码正确,则进入主程序
else application.termenited//结束程序,termenited可能我写的不对
finally
free;
end;
with TfrmPassWord.Create(self) do
try
if ShowModal = mrOk then//如果密码正确,则进入主程序
else application.termenited//结束程序,termenited可能我写的不对
finally
free;
end;
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询