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

5 votes440 views3 answers
Copy function delphi
Delphi
6 votes427 views1 answer
Delphi array
Delphi
0 vote446 views1 answer
Delphi draw antialiased line
Delphi
1 vote418 views3 answers
Bootstrap cards with image on the right side
Delphi
15 votes410 views5 answers
Belle delphine
Delphi
0 vote216 views1 answer
Mongoose schema type double
Delphi
0 vote223 views1 answer
Types of message box C#
Delphi
1 vote426 views1 answer
Case delphi
Delphi
4 votes306 views1 answer
How to find the length of a string delphi
Delphi
0 vote304 views1 answer
How to end a program in delphi
Delphi