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?