在记录或类中可以声明动态数组吗？解决方法

在记录或类中可以声明动态数组吗？
rt

TClasses=Class
  arr:array of integer; //可以吗？
end;

在create里setlength(arr,20); //可以吗？

如果arr是指针,
TClasses=Class
  arr:PSingle;
end;

GetMem(arr,sizeof(Single)*20);
我想访问这个Single数组中的第10个怎么访问？
用arr+10^:=100; //这种没试过，可以嘛？
或者 arr^[10]:=100; //但是这种总是报告 缺少identifier type的错误

[解决办法]
tstrings
[解决办法]
arr[10]
[解决办法]
sorry 看错了
var
s:PSingle;
i:Single;
begin
GetMem(s,sizeof(arr)+1);
i:=100;
s^:=i;
FreeMem(s);

参考
http://bbs.xiakexing.com/cgi-bin/topic.cgi?forum=37&topic=7&show=0