delphi的StringGrid控件模仿Excel中的Up,down,left,right,enter的方法