Free array Delphi 7

destructor TMyInfo.Destroy;
var
  I: Integer;
begin
  for I:= Low(SubInfo) to High(SubInfo) do
   SubInfo[I].Free;
  SetLength(SubInfo, 0); 
  inherited;
end;

Similar codes

0 vote167 views1 answer
Shuffle array delphi
Delphi
0 vote156 views1 answer
Delphi random letter
Delphi
15 votes241 views5 answers
Belle delphine
Delphi
0 vote156 views1 answer
Get time in milliseconds delphi
Delphi
0 vote156 views1 answer
How to check if something is only numbers in delphi
Delphi
0 vote153 views2 answers
Remove escapes from json
Delphi
0 vote153 views1 answer
Remove unnecessary packages raspi pixel
Delphi
0 vote248 views1 answer
How write pi in delphi
Delphi
5 votes260 views3 answers
Copy function delphi
Delphi
2 votes244 views1 answer
Delphi basics generating random number
Delphi