delphi中的StringGrid单元格光标走向

delphi中的StringGrid单元格中我要选择如图所示，光标切换方向，选择横向的时候，则光标是横着走，选择纵向的时候这是竖着走请问各位大神要如何实现，我只要实现光标横向纵向走即可

窗体的keypreview=true，响应keypress事件，根据你的选择和按键移动光标

if RadioGroup1.ItemIndex=0 then
StringGrid1.Col:=StringGrid1.Col+1
else
StringGrid1.Row:=StringGrid1.Row+1;