Auto cleanup of dynamic array of Trecord.DynamicArray when first is nilled ?

Hello,

Are dynamic arrays in dynamic array of records automatically cleaned up when
dynamic array of records is nilled ?

program Project1;

{$APPTYPE CONSOLE}

uses
SysUtils;

type
Ttest = record
mCode : array of byte;
end;

var
vArray : array of Ttest;

begin
try
SetLength( vArray, 10 );
SetLength( vArray[5].mCode, 5*1024*1024 );

vArray[5].mCode[0] := 6;

readln;

writeln( vArray[5].mCode[0] );

vArray := nil; // auto clean up of code ?

readln;

except
on E:Exception do
Writeln(E.Classname, ': ', E.Message);
end;
readln;
end.

It seems like mCode array is automatically cleaned up ?

Bye,
Skybuck.


.

Relevant Pages

  • Re: dynamic Type declaration
    ... > SetLength ... > on a dynamic array? ... type tVariantArr = Array of Variant; ... ReadLn; ...
    (alt.comp.lang.borland-delphi)
  • Re: dynamic Type declaration
    ... > SetLength ... > on a dynamic array? ... type tVariantArr = Array of Variant; ... ReadLn; ...
    (comp.lang.pascal.delphi.misc)