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

2 votes310 views1 answer
Get last element of array delphi
Delphi
1 vote308 views3 answers
Bootstrap cards with image on the right side
Delphi
0 vote219 views1 answer
How to end a program in delphi
Delphi
0 vote254 views3 answers
Delphi keypress ctrl+v
Delphi
-1 vote268 views1 answer
Delphi if statement
Delphi
0 vote240 views2 answers
Remove escapes from json
Delphi
0 vote257 views1 answer
Delphi fullscreen
Delphi
19 votes294 views2 answers
Download jupyter for linux
Delphi
3 votes298 views3 answers
Add data to json object
Delphi
15 votes300 views5 answers
Belle delphine
Delphi