密码框输入后如何设置让它显示为星号 菜鸟问题,急,谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 使用TMaskEdit,设置它的PasswordChar为“*”————————————————————————————————————宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。———————————————————————————————————— 用TEdit也可以,书写一句:PostMessage(Edit1.Handle, EM_SETPASSWORDCHAR, Ord('*'), 0);————————————————————————————————————宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。———————————————————————————————————— unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton; Edit1: TEdit; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);begin Edit1.PasswordChar := '*'; // 设置为'*'end;end. Tedit 控件有个属性:passwordchar 将该属性设置成 * 即可。 谢谢兄台,:)用普通的EDIT设置它的设置它的PasswordChar为“*”也行刚刚试的感谢 关于cxGrid是否存在拖动行以改变其记录位置的方法 notebook控件的问题 转贴!---->Delphi常用快捷键 BILL GATES被暗杀了!!!!!!!!!!!!!!!!!!!!!!!!! 请问如何进行数据库的事务处理, 我刚从网上下载了一个winamp3.0怎么播放不了,mpg,mpeg等歌呢? delphi5 到底有几个补丁啊? 急!请问有没有,容纳控件,但容不下时, 自动出现滚动条的控件? 数据库统计报表问题????在线等!!!!! 有没有分析VCL 类库源代吗的网站 我要去北京出差了,哪位大侠告诉我哪些好玩的地方 DOS下显示Word?
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
————————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
————————————————————————————————————
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;type
TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.PasswordChar := '*'; // 设置为'*'
end;end.
:)
用普通的EDIT设置它的设置它的PasswordChar为“*”也行
刚刚试的
感谢