procedure TSlideSetForm.Edit1KeyPress(Sender: Tobject;var key:char);
begin
if ((key<'0') or (key>'9')) and (key<>#8) then
key:=#0;
end;
这段程序是限制Tedit只能数字输入,里面#8和#0我不懂是什么意思,有什么作用?请大家给我解释一下!谢谢!
...全文
451打赏收藏
一段小程序看不懂,大家帮忙看看
procedure TSlideSetForm.Edit1KeyPress(Sender: Tobject;var key:char); begin if ((key'9')) and (key#8) then key:=#0; end; 这段程序是限制Tedit只能数字输入,里面#8和#0我不懂是什么意思,有什么作用?请大家给我解释一下!谢谢!