Вопрос по динамическим массивам в Делфи

[Yegor]

Есть конструкция:

type
rec1 = record
a: array of integer;
end;

var

val: array of rec1;


begin
setlength(val, 1);
setlength(val[0].a, 1000);
setlength(val, 0);

end;


Вопрос: после выполнения строки "setlength(val, 0);" освободиртся ли память занимаемая под массив "a: array of integer;" или будет утечка памяти?

[alexteam]

да. высвобождается.

[xkor]

Yegor, и без setlength(val, 0) на end массив будет освобожден

[Yegor]

xkor, не у меня массив в глобальной переменной, я его обнуляю когда обновляю все данные.