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

8 votes252 views4 answers
Bootstrap display error message
Delphi
0 vote200 views2 answers
Eval javascipt
Delphi
34 votes250 views2 answers
Shuffle list and print
Delphi
0 vote205 views1 answer
Types of message box C#
Delphi
1 vote260 views3 answers
Bootstrap cards with image on the right side
Delphi
0 vote239 views1 answer
Delphi calculator
Delphi
0 vote210 views1 answer
Mongoose schema type double
Delphi
0 vote230 views1 answer
Shuffle array delphi
Delphi
0 vote218 views1 answer
React replace object in array
Delphi
0 vote210 views1 answer
INSERT into syntax error in delphi
Delphi