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

显示密码编辑框中的密码-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显示出来。

最新版本的Hive 0.13发布,增加ACID特性 开发中的“软”与“硬”:高画质移动游戏开发之道 从国际编码竞赛来看编程语言受众度 AMD迎接变革:加速OpenCL的未来 角逐Hadoop市场,Cloudera与Hortonworks竞争白热化 OpenStack将提供对Docker的支持 Facebook Q1财报:营收25.02亿美元、59%来自于移动 黑客们盯上了卫星,IOActive的惊人发现 开发汽车应用之前,你必须了解的7件事 埃森哲:智能电视潮流,势不可挡 直接拿来用!Facebook移动开源项目大合集 高大上Hadoop技术培训:Hadoop在企业中的应用实战 【走近讲师】新浪丛磊:通过MAE构建企业内部私有PaaS平台 API增长新趋势 消息应用类独占鳌头 软件项目为何会失败? 严澜:搭建高可用的MongoDB集群(二) 微软、思科、Google、Facebook等联合推出CII 狙击“Heartbleed” 这是个神奇的国度:细数五大印度裔IT牛人CEO Atmel CMO Sander Arts眼中的创客运动 Unity“三巨头”:全心全意为开发者服务 全球移动广告现状报告:哪种平台、应用最赚钱? 《近匠》Smart Wallit,钱包找不到了?给它“打个电话”吧 Mozilla新CTO:JavaScript、 Firefox OS专家Andreas Gal 李彦宏发布百度大数据引擎,及与谷歌、亚马逊等类似项目对比 大数据领域,实时打击欺诈犯罪的4个战场 一周消息树:谷歌Project Ara,将开启下一个智能手机时代 数据恢复服务商的6个最佳实践 【走近讲师】谭晓生:魔高一尺道高一丈,360基于大数据的网络攻击检测 一周热点:摩尔定律让位于贝索斯定律 阿里巴巴集团CTO王坚确认出席第六届中国云计算大会 【走近讲师】青云甘泉:混合云的构建及其对企业的帮助 有的论坛采用从数据库得到帖子,有的使用shtml,有的使用xml,孰优???还有其他吗? 100分==在JSP中打开word文件的实例 紧急在线等一个很简单的问题 DTPicker 怎样和数据库绑定? 如何动态改变VB报表中Section中的一个与数据环境绑定的rptTextBox的颜色!(100分求教) datediff()这个函数怎么用哪位高手可否给小弟讲解一下急用在线等 和女友分手了,痛苦! 谁有支持中文的带身份验证和邮件群发的ASP.NET邮件组件? 关于多个表通过相同的字段级联的问题,进来看看,一定给分! windowd server 2003许可证问题 谁有支持中文的带身份验证和邮件群发的ASP.NET邮件组件? 求合作伙伴——推广抗非典病毒的消毒剂!!! 在表分区中,按某个varchar2的字段的值和范围如何分呢 我又來了,不僅你們煩,我更煩. 服务器端与客户端的问题 服务器端与客户端的问题 最后的问题,谢谢帮我看看 发现MS WINDOWS版的C标准库一个在BUG!!!!! 在用VFP操作EXCEL时出现无法用字段内容填充单元格问题,请各位帮忙看看. 算法 救命! 有没有rmi的好例程,一用就灵,急 fast report 和 qreport 到底应该用哪一个???(来者有分!!) 关于“数据结构书”的回应——版主莫删 如何进入另一个对话框 在一字符串中怎样取出某一个字符出现的次数. 急! infopower 2000、 3000、4000 Password?? 自定下载的问题,请教高手 如何屏蔽播放.wav文件但找不到相应.wav文件时发出的默认声音? 如何打开另一个对话框 政治因素对我国军事专家的困扰[ZT] if ((btime==null)&&(etime==null )) 请教 一位女同事辭職,一位男同事說跟我有關,鬱悶中... 请问如何在B/S模式下,在页面上实现,如word,excel中的编辑功能? 如何画一个二元函数的图象 急!高分求教:Epson TM U300微型打印机打印作业丢失问题!(100分) word中如何做浮动窗口或按钮等? 大于255个字符的SQL语句如何来写?在线等待 請大家不要煩這種貼子,我都更煩.我是沒有辦法了 兼职Java软件工程师 怎样去掉用户输入的字符串里的引号? 如何获得 表中定位的 消息? 在keil下的debug session下遇到的问题。 高分相送,不够另开贴相送 有没有类似数字里的sum函数对应的把文本连接起来的函数啊 It hosts Microsoft ActiveX® Controls and supports the OLE Control '96 (OC96) specification for windowless controls请帮忙翻译 数组的问题 关于CString.Format的问题! 送分问题!!请问怎样在客户端用sqlplus连入远程数据库!save me! 高手请进!100分相送!!!!在线等待。 已知△AOB的顶点坐标分别是A(4,0),B(0,3),O(0,0),求△AOB外接圆的方程. 孟子原文到底是 天降大任于是人也 还是天降大任于斯人也?我要证据 课本上的不算要尊重原文啊 虽然意思差不多 原文到底是啥. 女字旁,右边可字,这个字念什么音, 已知△AOB的顶点坐标分别是A(4,0),B(0,3),O(0,0),求△AOB外接圆方程. 孟子的“天降大任于斯人也”后面是什么? 从1831年到时2011年一共有多少年 化简m-n+3(m-n)-5(m-n)的结果等于 初四数学二次函数图像,16题,求讲解, 2011年2月5日至2011年10月24日共有几天如题!快速. 已知集合M={x-y,x+y,xy},P={x²+y²,x²-y²,0},且M=P,求实数x,y的值. 求f(x)=2cos(x+π/3)-1,求当x∈[π/6,π]的最值 求f(x)=2cos(x+π/3)-1,求当x∈[π/6,π]的最值 2011年2月份有多少天? 外偏旁口内一女字怎么读如题 f[f(x)]的定义域是R,但不包括1? 2011年2月共有几天 分光计的反射镜能不能随便放置 邻补角是互补的一种特殊情况,数量上()位置上有一条() 用一张长20cm,宽15cm的矩形纸板,在它的四个角各剪去一个大小相等的正方形,做成一个无盖的长方体纸盒.1.求纸盒的底面积y(cm²)与所剪去正方形的边长x(cm)之间的关系式.2.做出这个函 已知三角形AOB的顶点分别A(-1,5),B(5,5),O(6,-2),求此三角形的外接圆的方程 导数问题,大神来! 如果任意x1∈A,存在x2属于B,若f(x1)>g(x2)应该转化为f(x1)min>g(x2)max还是f(x1)min>g(x2)min还有,如果两个都是任意,或都是存在,那样应该怎么转化? 已知二次函数y1=ax²+bx+c(a≠0)的图像于一次函数y2=kx=m(k≠0)的图像相交于点A(-2,4)B(8,2)则能使y1>y2成立的x的取值范围是_________ 家长用什么教育方法让孩子初步感知生活中数学的有用和有趣 “插叙”这一方面的定义、作用 如果3A-2B=7/9那么2/3A-B=( ),7/6-(3A-2B)+1/3=( ) 高一数学题在线求解 x可以是2吗 在第三步 为什么 求插叙的意思 3a-2b=7/9,那么2/3a-b=( ) 如何引导幼儿感知和体会生活中的数的有用 已知a、b、c是三角形abc的三边.且满足a4+b2c2=b4+a2c2,试判断三角形abc的形状.阅读下面解题过程:由a4+b2c2=b2+a2c2 得:a4-b4=a2c2-b2c2 1(a2+b2)(a2-b2)=c2(a2-b2) 2即a2+b2=c2 3所以三角形ABC为直角三角形试问 容器内装水,保持10cm的水位不变,在边侧底部有一个直径为5cm的圆孔.如何计算这个圆孔的水流量?这个容器没有盖子,在大气中. 孩子体验盲人生活后家长的感受 a,b,c是三角形ABC三条边,满足a4-a2c2=b4-b2c2,判断三角形形状、 最近我越来越不想读书了,上个月都不是这样的,还有一个月就期末考了!怎么办? (m+3)的平方-4m大于等于零,可以化简为(m+3)的平方-4m大于等于零,可以化简为 绝对值最小的数是是什麼? 小学二年级的读书报怎么做? n的平方减去m的平方 分之 m的平方减去n的平方 化简 等于多少 二次函数,初四.已知抛物线与x轴交于A(-2,0) B(4,0),和y轴交于C(0,8).(1)求抛物线的解析式和它的顶点D的坐标 (2)设直线CD交x轴于E,在线段OB的垂直平分线上是否存在点P,使得P到直线CD 工程队修一条长2400米的铁路.第一天修了全长的六分之一,第二天比第一天多修十二分之一.还剩下多少米没急 恻隐之心,仁之端也;差恶之心,义之端也,辞怀之心,礼之端也是非之心,智之端也,]这名言的意思是什么� 在EXCEL表格中,将一组数字设了加法公式,后来又删除了其中一个数字,所得数字为什么变大了得数不但没变小,反而变大了,得数是加上那个数字的和.减去一个数字后的得数是刚才总和再加上减 工程队修一条公路,第一天绣了全长的六分之一,比第二天少修150米,还剩下1050米没修,这条公路全长多少米 1道初四数学二次函数题在一个直角三角形的内部作一个矩形ABCD,其中AB和CD分别在两条直角边上.(点A就是直角A)1.设矩形的一边AB=x,那么边AD的长度表示为( )2.设矩形的面积为y,当x取何值时y 已知abc为三角形ABC的三边长,且满足a2c2-b2c2=a4-b4,试判三角行ABC的行状. 如果待测物品有9件,其中一件是次品(次品重或轻)至少称几次就一定能找出次品?次品重或轻这个问题与已知次品是重或已知次品是轻是不一样的 有没有高人能告诉我初四数学二次函数怎么学?哎天哪,英语,政治都是第一,数学考得很烂,最后虽然考了第一但是非常侥幸,冒了我一身虚汗,有人能告诉我这部分数学知识怎么学吗?听课听得很 已知△ABC的三边长为a.b.c,他们满足a2c2-b2c2=a4-b4求三角形的形状,证明 8)在等比数列{an}中,a6·a15+a9·a12=30,则前20项的积等于 ( )(A)15^9 (B)15^10 (C)30^10 (D)30^5 如图所示 在三角形ABC中,角C=90度,AC=BC,角平分线AD=8cm,试求三角形ABC的面积. 实践调查作业的格式怎么写绿色环保实践作业与生活有关 一个样本容量为50,分成若干组,在它的频数分布直方图中(纵轴为 频数/组距),某一组相应的小长方形的面积为20,则落在该组的频数为( ),图中个小长方形的面积和为( ). 三个和尚为什么没水喝? 地理(大洋洲)位置:位于______ 与 ______ 之间,西临______ ,东临______ ,与 ______ 洲, ______ 洲隔海相望,既跨 ___半球,也跨___ 半球 2、范围:包括______ 大陆,______ 岛,______ 南、北岛,______ 岛 什么叫样本?什么叫样本容量? 效率高的复习方法 题目是我为祖国自豪,要写我的实践和体会,该怎么写呢? 语文填空题回答 已知△AOB的顶点坐标分别是A(4,0)B(0,3)C(0,0)求AOB外接圆方程(两种方法)我要具体过程! 孟子的“天降大任”的含义是什么?对此你有什么看法? 初四数学二次函数二次函数y=ax^2+bx+c的图像与x轴交于B、C两点,与y轴交于A点.(1)根据图像确定a、b、c的符号,并说明理由;(2)如果点A的坐标为(0,-3),∠ABC=45°,∠ACB=60°,求这个二次函数的解析 格陵兰拟向中澳开放铀矿与稀土 仍需丹美国官员:奥巴马早知国安局监听默克尔浙江高校获专业设置“自主权\" 不再网上查询服务试点扩容 信用上网隐私如冀中星行政起诉东莞政府案立案漫步小樽:静谧恬美的浪漫之旅(组图)澳大利亚珠海联谊总会在悉尼正式成立有氧运动有助延年益寿美媒:中国央行显露收紧货币政策意向中国将任下届贝尔格莱德书展主宾国世界最高狗离世 站立高过2米(组图)日媒:日菲被中国盯上因与华无共同陆地安倍在赌他能把中国吓住男子把10公斤黄金扔进垃圾场 当地掀美国采花大盗将获释搬到居民区 遭民众日本将启用自卫队军官任国家安全保障局日驾校人性化服务多 学车之余可美甲还美国家安全局称奥巴马对监听默克尔一事美国处方药价格高昂 民众被迫违法购外医改网站技术问题百出 奥巴马上教堂也阿根廷举行中期议会选举 女总统执政联一市民频遭“私人号码”骚扰 回拨后对日华媒:日本职业女性所面临的“孕妇骚驻塞浦路斯大使刘昕生出席塞浦路斯华人墨彩清韵·当代实力派中国画名家七人巡英国百年十大儿童书籍出炉 《哈利波特美媒称奥巴马释放恐怖分子理由“没有说司马光墓再修缮 千年古墓古佛殿有望告北京:媒体记者学防身术 体验实战培训河北博物院正式对外开放 将展出汉代金一市民频遭“私人号码”骚扰 回拨后对河北博物院正式对外开放 将展出汉代金五岳寨50公里国际越野赛 云南选手包加拿大烈市华裔议员争取连任 主打缓解中国居家养老向农村延伸综述:哈萨克斯坦建立多管齐下反腐长效全国网媒视频主持人专访永泰县委书记林打造清新自然圣地 云顶引领福建旅首届网媒主持人“清新福建”生态行走进中国居家养老向农村延伸中国土地流转加快 出现更多种粮大户盘点世界最危险机场
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘