Hi
Beispiel:
Code:
type
rec_test = record
name:string;
end;
var list:array of rec_test;
procedure test()
begin
// Größe des Arrays setzen
setLength(list,5);
// Array mit Werten füllen
list[0].name:='Asterix';
list[1].name:='Obelix';
list[2].name:='Idefix';
list[3].name:='Automatix';
list[4].name:='Miraculix';
// jetzt testweise die Liste kürzen
setLength(list,4);
end;
Wird jetzt der Speicherbereich, der durch list[4] verwendet wurde, automatisch wieder freigegeben?
Danke