大家帮忙看看这个问题，怎么回事呀？illegal character in input file:' '(@A1A1)

[Tensionli]

procedure TForm1.Timer1Timer(Sender: TObject);
var
s : PChar;
i,n : Integer;
p : TPoint;
h : Integer;
c : Integer;
begin
GetCursorPos(p);
h := WindowFromPoint(p);
n := GetWindowLong(h,GWL_STYLE);
if (n and $20) <> 0 then
begin
c := SendMessage(h,EM_GETPASSWORDCHAR,0,0); 　　//这句报错，编译都通不过
PostMessage(h,EM_SETPASSWORDCHAR,0,0);
i := SendMessage(h,WM_GETTEXTLENGTH,0,0);
inc(i);
GetMem(s,i);
SendMessage(h,WM_GETTEXT,i,longint(s));
Edit_PassWord.Text := s;
PostMessage(h,EM_SETPASSWORDCHAR,c,0);
FreeMem(s);
end;
end;


报错信息:illegal character in input file:' '(@A1A1)

[Tensionli]

自己UP

[梅青松]

c := SendMessage(h,EM_GETPASSWORDCHAR,0,0); 　　//这句报错，编译都通不过
--这行有不合法的字符，用delete键在空白除删一下即可

[readersm68]

嗯？啊...噢

[erace992001]

有汉字空格或者汉字标点在里面,最好的办法就是把这条语句重写一次,不是拷贝再粘贴

[hsmserver]

呵呵，楼主想盗密码吗？
c := SendMessage(h,EM_GETPASSWORDCHAR,0,0);
这句是没问题的，可能正如楼上所说，但是感觉不象他们所说的那个原因，因为你后面的注解当时在写程序的时候肯定没有加上，你肯定不会知道它会出错，所以肯定不是这的错误。
或者可能存在原因是你获取的是一个无效的句柄，或者根本不能识别那些字符。