StringGrid里面怎么限制输入数据的大小？(100分)

比如我在StringGrid里的Cells[0,2]里面只能输入3个中文字那我应该怎么限制呢？

在onpress事件中加入如下程序:
procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char);
var
i,j:integer;
begin
i:=stringgrid1.Row;
j:=stringgrid1.col;
if (i=2) and (j=0) then begin
if length(stringgrid1.Cells[j,i])>=6 then key:=#0;
end;
end;

接受答案了.