还
还珠格格
Unregistered / Unconfirmed
GUEST, unregistred user!
代码如下：（书上抄的）
procedure TForm1.PWDEditKeyPress(Sender: TObject
var Key: Char);
begin
if not (Key in ['a'..'z','A'..'Z']，#8) then
key:=#0;
end;
end.
书上的意思是说只能输入大小写字母
但是我还是能输入数字的，跟没有上面的代码是一模一样的？
procedure TForm1.PWDEditKeyPress(Sender: TObject
var Key: Char);
begin
if not (Key in ['a'..'z','A'..'Z']，#8) then
key:=#0;
end;
end.
书上的意思是说只能输入大小写字母
但是我还是能输入数字的，跟没有上面的代码是一模一样的？