procedure TDataimportForm.StringGrid1KeyPress(Sender: TObject;
var Key: Char);
begin
if not (key in['0'..'9',#1,#2,#3,#4,#5,#6,#7,#8,#9,#13,#32]) then
begin
end;
end;
- 的key值是多少
...全文
715打赏收藏
关于 KeyPress里的Key值
procedure TDataimportForm.StringGrid1KeyPress(Sender: TObject; var Key: Char); begin if not (key in['0'..'9',#1,#2,#3,#4,#5,#6,#7,#8,#9,#13,#32]) then begin end; end; - 的key值是多少