delphi中string数组的有关问题,求教

delphi中string数组的问题,求教.
我的程序:

var 
i:byte;
a:array[1..20]of string;

procedure datarray (Sender: TObject);
begin
  select:=1;
  if CheckBox3.Checked then  
  begin
  a[i]:=InttoStr(i);
  i:=i+1;
  end;
end;

错误提示:
在a[i]的i处: Class does not have a default property

什么问题啊?急求解答,谢谢啦.

[解决办法]
i:byte? or integer?