编程论坛 → Delphi论坛

[新手请教]一个关于验证登陆的问题

charry922 发布于 2006-04-12 03:08， 682 次点击

我做了两个 FORM， FORM1 和 FORM2 ，
FORM1里边有个文本框 EDIT1 和一个确定按钮，要实现的功能是：在文本框 EDIT1 内输入特定的字符（比如： 000000），按确定后打开 FORM2，同时关闭 FORM1
我在 FORM1 的按钮事件里写了这段代码：
IF EDIT1.text = '000000' then
begin
form2.show;
form1.close;
end;
else
showmessage('请正确输入密码。');
程序执行时，输入 000000 后，可以显示 FORM2，但 FORM1 不能关闭。
请教有什么方法可以实现这个功能？谢谢

4 回复

#2

ysp_19842006-04-12 08:54

IF EDIT1.text = '000000' then
begin
form2.show;
form1.Hide;
end;
else
showmessage('请正确输入密码。');

因为form1默认的是主窗体，关闭了form1，相当于关闭了应用程序。form2也会关闭。

#3

avon45632006-04-12 09:07

IF EDIT1.text = '000000' then
begin
form2.show;
form1.Hide;
end;//这里的分号需要的吗？
else
showmessage('请正确输入密码。');

#4

charry9222006-04-12 19:58

谢谢

#5

charry9222006-04-12 20:00

我自己要做的财务软件，因为刚开始所以都不怎么懂，谢谢各位大虾多多帮忙啊！
顺便问一下，这样把主窗口一直隐藏着，会不会影响运行速度的？

1