关于StringGrid的一个很难的问题

Question

我在StringGrid的某一格输入数据，如果数据中有非法字符，则在光标跳到其他格时，又让光标强制跳回刚才这个问题格。如何实现，谢谢。

Answer 1

定义全局变量i,j:integer;procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
  ARow: Integer; var CanSelect: Boolean);
var
  s:string;
begin
  s:=form1.StringGrid1.Cells[i,j];
  if (s='') or (s='gf') then
    canselect:=false
  else
  begin
    canselect:=true;
    i:=acol;
    j:=arow;
  end;
end;procedure TForm1.FormShow(Sender: TObject);
begin
  i:=0;
  j:=0;
end;

Answer 2

if (s='') or (s='gf') then——————使用来判断输入的数据是否有非法字符