说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

显示密码编辑框中的密码-Delphi资料

HTML文档下载 WORD文档下载 PDF文档下载
显示密码编辑框中的密码-Delphi资料

我们在使用Windows时,经常会碰到一些密码编辑框,输入其中的文字都以“*”

显示。现在,有许多共享软件和自由软件都可以实现隐藏密码的正确显示。究竟这是怎

样实现的呢!其实,这比较简单,虽然这些信息都以“*”显示,但其内部还是以当初

的字符表示,所以,我们只要用Windows API函数就可以实现。

在Windows中,每一个窗口、控件都有它的名字(叫做Name或Window Text)。对于

Form、Dialog Box、Message Box来说,名字就显示在Title Bar中;对于Edit、Button

、Static Control,名字显示在他所占的区域中。密码编辑框本身就是个Edit控件,虽

然显示的是特殊字符,但名字属性没有变,还是输入时的字符。Windows提供了两个API

函数来获得这个名字:

int GetWindowTextLength(HWND hWnd); // 得到名字的长度

其中,hWnd :想要得到的那个窗口或控件的句柄 handle

int GetWindowText(HWND hWnd

LPTSTR lpString

int nMaxCount );// 得到

名字

其中,hWnd :想要得到的那个窗口或控件的句柄 handle;

lpString:存放名字的字符串的地址

nMaxCount :可拷贝的最大字符数

下面以Delphi为例,说明它的实现过程。

新建一Form,放置Label、Edit、Button各一个到Form中,将Edit1的PasswordChar

属性改为“*”,双击Button1:

procedure TForm1.Button1Click(Sender: TObject);

var

Name:PChar; // 名字

L:integer; // 名字的长度

begin

L:=GetWindowTextLength(Edit1.handle)+1; // 得到名字长度,并将长度加1

GetMem(Name

L);//为将要得到的名字分配内存

GetWindowText(Edit1.handle

Name

L);//得到名字

label1.Caption:=String(Name); // 将得到的名字显示于 Label1

FreeMem(Name

0); // 释放分配的内存

end;

经过运行,在Edit1中输入的密码就可通过Label1显示出来。

通过Linux Shell实现Android横竖屏切换 Android高手应该精通哪些内容? Android 2.2开始resources.arsc有改变 分析你的Android ANR错误 API Level对照表,更新至2.3.3 我采用SQL Server作为数据库,想通过JSP查询到数据库,但是总是有错误,请各位赐教! 新手,这样的触发器如何写? 菜鸟一问 如何存储既包含文字又包含图片的文件内容? 长沙笑话《阿呆转行》完整版 我创建了一个菜单,运行不显示,请问应该设置哪个属性 ems不能够启动!! 如何释放一个class的对象? 提示 : 23115: 国别目录的代码集是不一样的 该怎么解决 ? 求两篇英语周记60字 带翻译 求八篇英语周记,一定是初一水平的,最好带翻译的就是 英语周记50字带翻译 中文翻译成英文 初中周记 看后追加悬赏 初一寒假周记500字 求5篇初二英语周记 80-100字左右~ 语文周记8篇(每篇至少300字) 高一开学英语周记 高一开学第一周英语周记 80词急 明天开学了 百度走进武汉大学 鼓励大学生互联网安四川中巴强冲法院两民警受伤 嫌疑人已巴西青年示威游行演变为骚乱 一人受伤利比亚运钞车遭抢 劫匪抢走总计数千万日欧首脑会议将在东京举行 拟讨论伊核《福州市行政服务条例》下月实施 榕将体现绿色生态 森林食品名小吃亮相林博新疆公安消防总队部署今冬明春火灾防控淡水河谷马来西亚铁矿石物流中心启用河南西平原县委书记张金泉被调查 曾涉地府问仙无限装逼锻纹修仙速成指南韩娱之炫草原石人旅游觉悟社旧址旅游丽江金塔旅游国军历史文物馆旅游天籁谷温泉旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘