一个初级的小问题---初学者问
设计一个简单的界面,让用户输入用户名和密码
用户名:
密码:
然后按回车该怎么设计能弹出一个对话框"是否保存密码"还有一个小选择框checkbox"下次不再提示",这个过程该怎么设计实现,谢谢
问题点数：100、回复次数：8Top
1 楼ksaiy（阳光总在风雨后）回复于 2004-12-01 19:36:19 得分 50
很简单的，我随便写了一个.......
procedure TForm1.Edit2KeyPress(Sender: TObject; var Key: Char);
var
Reg:TRegistry;
Flag:Integer;
begin
Reg:=TRegistry.Create;
Reg.RootKey:=HKEY_CURRENT_USER;
if Reg.OpenKey('\Software\CSDN',True) then
begin
if Reg.ValueExists('CsdnFlag') then
Flag:=Reg.ReadInteger('CSDN')
else
Flag:=0;
end;
Reg.CloseKey;
if key=#13 then
begin
if Flag=1 then
begin
Form2.ShowModal;
Application.CreateForm(TForm2, Form2);
//把其它代码放到Form2里面,然后在Form2里面的CheckBox进行控制，比如选定
//CheckBox的时候把注册表的值修改成1，取消就修改成0；
end
else
begin
//直接执行其它代码。。。
end;
end;
end;
Top
2 楼InvidentXp（InvidentXp）回复于 2004-12-01 19:36:34 得分 0
只要弹出的对话框是自己写的Form就行了.Top
3 楼symk0014（莫克）回复于 2004-12-01 19:45:48 得分 0
就象IE中的那种...Top
4 楼ksaiy（阳光总在风雨后）回复于 2004-12-01 19:50:55 得分 0
就是那样的了嘛,代码都给你了,还要怎么呢?Top
5 楼nyf1220（我是党员----不过听说最近风声紧，打算换名字）回复于 2004-12-01 20:04:38 得分 0
你设计个FORM，界面跟弹出的类似就行了
然后在你的BUTTON（确定）里让它打开就行了Top
6 楼whitetiger8（键盘未敲坏，基本功未练成）回复于 2004-12-01 20:30:00 得分 50
按钮叫button1
button.default:=true;
button1的点击事件为:
procedure TForm1.Button1Click(Sender: TObject);
begin
弹出一个自己设计的窗口
end;
自己设计一个窗口，按你的要求
有一个checkbox，当值改变时，你必须存盘，保存到注册表或是INI文件中，下次启动软件才能得到是否显示
这段代码看一看ksaiy(真爱不是取代，而是心中永恒的存在) ( 兄弟的吧
Top
7 楼sosopro（随便写点）回复于 2004-12-01 21:22:43 得分 0
我讨厌在注册表里加东西！
反正现在硬盘大，整个access跟着也行
笨了点，呵呵Top
8 楼extcsdn（Studing VB now）回复于 2004-12-01 21:47:53 得分 0
顶Top
