📌  相关文章
📜  自由数组 Delphi 7 - Delphi 代码示例

📅  最后修改于: 2022-03-11 14:54:56.276000             🧑  作者: Mango

代码示例1
destructor TMyInfo.Destroy;
var
  I: Integer;
begin
  for I:= Low(SubInfo) to High(SubInfo) do
   SubInfo[I].Free;
  SetLength(SubInfo, 0); 
  inherited;
end;