| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 757 人关注过本帖
标题:登陆窗体的小小问题
只看楼主 加入收藏
gulihuajhy
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2006-5-10
收藏
 问题点数:0 回复次数:7 
登陆窗体的小小问题
我就是做了一个登陆窗体,有个小小的问题,我想经过身份验证后能跳出另一个窗体,并隐藏登陆窗体,但不知道为什么我加了隐藏的代码后竟然跑不出来拉(有问题拉),那位高手帮我看看我那句应该添在那里,顺便看看代码啊有问题,谢拉。
begin
if (edit1.text='管理员') and (edit2.text='123') then
Form1.showmodal
Form2.Hide // 这句不写程序能运行,但写拉,放在这里就出了毛病拉
else
begin
if edit2.tag>=2 then
begin
showmessage('对不起,你不能进入本系统。');
close;
end
else
begin
showmessage('密码错误,请重新输入。');
edit2.setfocus;
edit2.selectall;
edit2.tag:=edit2.tag+1;
end;
end;
end;
搜索更多相关主题的帖子: 窗体 begin 登陆 管理员 
2006-05-19 10:07
kekele007
Rank: 1
等 级:新手上路
帖 子:21
专家分:0
注 册:2006-4-10
收藏
得分:0 
Form1.showmodal
Form2.Hide // 这句不写程序能运行,但写拉,放在这里就出了毛病拉


这里我习惯用form1.show;
form2.visible:=false;
2006-05-19 12:24
dsw18
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2006-5-14
收藏
得分:0 
主窗体与子窗体设置
2006-05-19 12:32
wiliom
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2006-5-28
收藏
得分:0 

感谢上位老兄的提示,也为我解决了一个问题.

2006-06-11 08:36
dzy
Rank: 2
等 级:新手上路
威 望:3
帖 子:708
专家分:0
注 册:2006-5-27
收藏
得分:0 
Form2是登陆窗体吗]
是的话
直接用 hide 应该就可以了吧

还有少了 begin ......end

if (edit1.text='管理员') and (edit2.text='123') then
begin
Form1.showmodal;
Form2.Hide ;
end

[此贴子已经被作者于2006-6-12 8:39:40编辑过]


情人太累,小姐太贵,友谊交往最实惠 ,没事开开“同学会”,拆散一对算一对!
2006-06-12 08:28
Sewim
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2006-3-7
收藏
得分:0 
最好是把登录的窗体关掉,并Free一下,这样资源节约点
2006-06-14 09:56
tianykun
Rank: 4
等 级:禁止访问
威 望:11
帖 子:3727
专家分:0
注 册:2005-11-13
收藏
得分:0 

用close可以么??Form2.close;


离开这里,离开你的视野,归隐到属于我的地方,无论何处
2006-06-17 18:46
dzy
Rank: 2
等 级:新手上路
威 望:3
帖 子:708
专家分:0
注 册:2006-5-27
收藏
得分:0 
Form2如果是主窗口应该就不可以
关了就全部退出了

情人太累,小姐太贵,友谊交往最实惠 ,没事开开“同学会”,拆散一对算一对!
2006-06-18 08:20
快速回复:登陆窗体的小小问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.021016 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved