delphi编程！

Question

你可以通过查找HELP查找键盘的delete 和回退键（<-)的虚值表查找后
我这里没有help没办法查找
   if not (Key In ['0'..'9']，{insert,和〈-的vkey} ) then
       keyp:=#0;

Answer 1

if Not (Key In ['0'..'9',#46,#8,#13]) then
      Key := #0;//#46表示Delete，#6表<-，#13表回车
—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
—————————————————————————————————