本篇文章主要介绍了"Firemonkey限制TEdit只能输入数字的完美方法"，主要涉及到快捷键方面的内容，对于Delphijrs看球网直播吧_低调看直播体育app软件下载_低调看体育直播感兴趣的同学可以参考一下：
网上的方法大都会影响复制粘贴等快捷键，使用这个可以完美解决需要引用System.Character单元procedure TMainForm.EditIMEIK...
网上的方法大都会影响复制粘贴等快捷键，使用这个可以完美解决
需要引用System.Character单元
procedure TMainForm.EditIMEIKeyDown(Sender: TObject; var Key: Word;
var KeyChar: Char; Shift: TShiftState);
begin
// 只能输入数字或控制字符
if not KeyChar.IsNumber and not KeyChar.IsControl then
begin
KeyChar := Char(0);
Key := 0;
end;
end;
|
这样可以让TEdit只能输入数字，而且不影响ctrl c ctrl v 复制 粘贴 剪切 不影响home键 end键等等
限制只能输入字母，可以用IsLetter
以上就介绍了Firemonkey限制TEdit只能输入数字的完美方法，包括了快捷键方面的内容，希望对Delphijrs看球网直播吧_低调看直播体育app软件下载_低调看体育直播有兴趣的朋友有所帮助。
本文网址链接：http://www.codes51.com/article/detail_216479.html
