登录窗口的问题 若要在某个窗体出现的时候,同时出现一个登录窗体,不登录就不能对这个窗体进行操作,怎样处理? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在工程裏面判斷啊,如果登錄出錯就直接 Application.Terminate; 在窗体 OnActivate 事件里写 OnActivate ,onshow,oncreate,随便你写,要模式窗口,登录不成功,就终止程序Application.Terminate或halt 在工程文件里写好些。可以这样试试。application.create(登录窗体)IF 登录窗体.showmodel thenbegin application.create(某窗体)endelsebegin 退出application。end; 在登陆窗体上的onDeActive事件中加入如下代码:if(Self.Visualble) then Self.focus只要输入正确的登陆信息,就关闭登陆窗体。那样,用户不登陆就别想让主窗体获得焦点,所以也就没法操作了。 哥一般是在onshow事件里写login.show;(或者创建窗体)enabled:=false;//检测成功login.close;enabled:=trueelse//检测失败showmessage('....'); 求解 如何提取应用程序对话框里显示的数据复制到word中? 我们死后,我们的QQ,msn,email怎么办呢? 帮忙 !关于电信局采集数据的问题 数据库的刷新问题 这样理解Private和protected对吗? 如何建立索引? 100分,请各位朋友帮忙,adotable这个mastersource和masterfields属性挡住我了 急寻有“Delphamp”或MP3播放器开发经验的人才 求救oracle+delphi数据库配置问题 delphi DLL中如何传递string参数? DELPHI 2010 的问题
IF 登录窗体.showmodel then
begin
application.create(某窗体)
end
else
begin
退出application。
end;
if(Self.Visualble) then Self.focus
只要输入正确的登陆信息,就关闭登陆窗体。
那样,用户不登陆就别想让主窗体获得焦点,所以也就没法操作了。
login.show;(或者创建窗体)
enabled:=false;
//检测成功
login.close;
enabled:=true
else
//检测失败
showmessage('....');