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
How to use incyear in delphi
Delphi
0 vote163 views2 answers
Eval javascipt
Delphi
0 vote184 views1 answer
Hello world in delphi
Delphi
0 vote181 views1 answer
How to make a shape move in delphi
Delphi
0 vote167 views1 answer
Delphi Tidhttp error could
Delphi
0 vote172 views1 answer
How to validate if the text in edit has numbers in and to show a message if it has in delphi
Delphi
0 vote159 views3 answers
Delphi keypress ctrl+v
Delphi
0 vote193 views1 answer
Breakpoint condition delphi
Delphi
3 votes159 views1 answer
Flash messages using boot strap
Delphi
0 vote170 views1 answer
How to deacrease Time in delphi
Delphi