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 vote214 views2 answers
Eval javascipt
Delphi
0 vote273 views1 answer
Breakpoint condition delphi
Delphi
3 votes264 views2 answers
Get current date delphi
Delphi
0 vote229 views1 answer
How to deacrease Time in delphi
Delphi
0 vote256 views1 answer
How to insert apostrophe in delphi string
Delphi
3 votes210 views1 answer
Flash messages using boot strap
Delphi
5 votes310 views3 answers
Copy function delphi
Delphi
0 vote245 views1 answer
Shuffle array delphi
Delphi
1 vote256 views4 answers
"nickolasmin"
Delphi
0 vote228 views1 answer
INSERT into syntax error in delphi
Delphi