请教SETPASSWORDCHAR函数在2000下还有吗?是什么?(50分)

  • 主题发起人 主题发起人 base1
  • 开始时间 开始时间
B

base1

Unregistered / Unconfirmed
GUEST, unregistred user!
编了一个程序,发现在2000下不能用,郁闷...
 
唉,有人知道吗?<br>:(<br>是一个API函数
 
提前,提前.........
 
postmessage(thehandle,em_setpasswordchar,ord('#'),0);<br>通过
 
..可是,我怎么还没通过呢?<br>我以前用的是postmessage(thehandle,em_setpasswordchar,0,0);<br>只在win98下有效,改成你那句,效果一模一样<br>2000下还是没反应...<br>
 
这是我以前知道了API后摸索出的第一个“程序”,2000通过,如果鼠标移过去,没有变成<br>'#'的话,点一下它就OK了<br>procedure TForm1.Timer1Timer(Sender: TObject);<br>var p:tpoint;<br>curwin:longint;<br>text:array[0..255] of Char;<br>str:string;<br>//count:integer;<br>//text1:array [0..15] of char;<br>begin<br>getcursorpos(p);<br>curwin:=windowfrompoint(p);<br>getwindowtext(curwin,text,sizeof(text));<br>str:=strpas(text);<br>edit1.text:=inttostr(p.x)+':'+inttostr(p.y)+':'+str;<br>getclassname(curwin,text,255);<br>str:=strpas(text);<br>edit5.text:=str;<br>edit4.text:=inttostr(curwin);<br>sendmessage(curwin,wm_copy,1,1);<br>{}<br>if (str='TEdit') or (str='Edit') &nbsp;then<br>begin<br>postmessage(curwin,em_setpasswordchar,ord('#'),0);<br>//count:=sendmessage(curwin,sb_gettext,1,lparam(@text1));<br>{postmessage(curwin,em_setpasswordchar,wparam('*'),0);}<br>//edit3.text:='';<br>//edit3.text:=inttostr(count)+':'+text1+':';<br>end;<br>end;
 
哦,终于明白了,我以前用的是SendMessage,怪不得没反应<br>多谢了,给分先
 
接受答案了.
 
后退
顶部