Динамический массив

[Vito89]

Помогите правильно оформить:
В переменной типа TStringList записани в каждом рядке натуральное число (0,004; 0,009 і. т. д.) точное количество строк неизвестно.
Вопрос: как создать в програме массив в которий записать елементи переменной:

динамический массив а;
r: TStringList
......
for i:=0 to r.Count-1 do
a[i]:=StrToFloat(r.Strings[i]);

[val_nnm]

чтото вроде этого

var a:array of real;
begin
...
...
...
  SetLength(a,r.Count);
  for i:=0 to r.Count-1 do
    a[i]:=StrToFloat(r.Strings[i]);