delphi中如何让文本框只输入数字、减号、小数点和退格键？
用Delphi7编程,要使一文本框中只可输入数字，减号还有小数点,而且当输入的数字错误时还可以通过Backspace键来修改，请问该如何设置？例如在edit的keypre...
用Delphi 7编程,要使一文本框中只可输入数字，减号还有小数点,而且当输入的数字错误时还可以通过Backspace键来修改，请问该如何设置？
例如在edit的keypress时间中输入
if key not in ['0','1','2','3','4','5','6','7','8','9'] then
edit1.setfoucs;
可否加入'-','.'还有退格键应该如何表示？ 展开
例如在edit的keypress时间中输入
if key not in ['0','1','2','3','4','5','6','7','8','9'] then
edit1.setfoucs;
可否加入'-','.'还有退格键应该如何表示？ 展开
2个回答
展开全部
case Key of
'0'..'9', #8, #13, #27, '.', '-' : ;
else
Key := #0;
end;
这些放在KeyPress里面就可以了
'0'..'9', #8, #13, #27, '.', '-' : ;
else
Key := #0;
end;
这些放在KeyPress里面就可以了
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
