DELPHI 中如何让edit1.text只能输入数字和字母

如题,我DELPHI新手,能有一种比较简单的方法吗

答案：procedure Tform.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Not (key in ['0'..'9', #8, '.',['A'..'Z']]) then
    key := #0;
end;
这就是你想要的。

其他：在KeyPress事件中写入下边的代码
XE下:
    if not CharInSet(Key,['0'..'9','a'..'z']) then Key :=#0;

D7下:
  if not (Key in ['0'..'9','a'..'z']) then key :=#0; procedure Tform.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Not (key in ['0'..'9', #8, '.',['A'..'Z'],['a'..'z']]) then
    key := #0;
end; 在keypress里面设定
  if Not (key in ['0'..'9', #8, '.',['A'..'Z']]) then
    key := #0;
这样就可以了，就是限制键盘输入其他的东西。

上一个：delphi 表格添加数据
下一个：我决定要开始学DELPHI了.为了庆祝.散300分.T中7楼给分