F fengsi Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #1 如果想使用XP风格的密码框,该怎样做?现在已经添加XPManifest,按钮可以了,但是我想让密码框显示圆形而不是星号,该怎样实现?
F fengsi Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #6 我当然知道可以自己写啊,我想知道是不是有API可以直接实现 要自己写还不容易?我ft!
风 ~风之彼端~ Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #7 试试这样看行不行: 把Edit的那个PasswordChar属性设置为一个圆的那个字符,看行不行。我没有试过。
F fengsi Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #8 不行的,不能用特殊字符 其实写代码也不麻烦,只是我不想走冤枉路,如果有系统API的话就好了。
S san_fish Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #9 好像没办法直接将PsddwordChar设置为那个实心园不行把 因为那不是标准的ACII字符 试试找到那个字符的ASCII码,在程序中动态设置行不行??
邓 邓娟 Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #10 又想马儿跑,又想马儿不吃草, 别做梦了,你研究完API后,自己的控件也就搞定了。
W wjh_wy Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-06 #11 这样应该可以的,你试一试吧! procedure TForm1.FormCreate(Sender: TObject); begin Edit1.Font.Name:='Marlett'; Edit1.PasswordChar:='n'; end;
这样应该可以的,你试一试吧! procedure TForm1.FormCreate(Sender: TObject); begin Edit1.Font.Name:='Marlett'; Edit1.PasswordChar:='n'; end;
W wjh_wy Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-06 #12 这样应该可以的,你试一试吧! procedure TForm1.FormCreate(Sender: TObject); begin Edit1.Font.Name:='Marlett';//设置字体,很重要 //你也可以改变其它字体 //Edit1.Font.Name:='Webdings'; //Edit1.Font.Name:='Wingdings 3'; Edit1.PasswordChar:='n';//注意是小写不是大写 //改变后面的字符变量可以得到不同的效果 //Edit1.PasswordChar:='g';可以得到方形 //其它的你自己试试 end;
这样应该可以的,你试一试吧! procedure TForm1.FormCreate(Sender: TObject); begin Edit1.Font.Name:='Marlett';//设置字体,很重要 //你也可以改变其它字体 //Edit1.Font.Name:='Webdings'; //Edit1.Font.Name:='Wingdings 3'; Edit1.PasswordChar:='n';//注意是小写不是大写 //改变后面的字符变量可以得到不同的效果 //Edit1.PasswordChar:='g';可以得到方形 //其它的你自己试试 end;
F fengsi Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-06 #13 这个方法不错,虽然只是变通,但还是有那种味道 谢了