关于StringGrid的一个很难的问题

[foundAnswer]

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

[foundAnswer]

真的没有人知道？

[lovelymelon]

定义全局变量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;

[lovelymelon]

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

[foundAnswer]

多谢。