对InputBoxSetPasswordChar操作： 　　procedureTForm1.InputBoxSetPasswordChar(varMsg:TMessage); 　　var 　　hInputForm,hEdit:HWND; 　　begin 　　hInputForm:=Screen.Forms[0].Handle; 　　if(hInputForm0)then 　　begin 　　hEdit:=FindWindowEx(hInputForm,0,'TEdit',nil); 　　SendMessage(hEdit,E