当使用一个传递参数的类时，我在理解类型转换时遇到了一些困难。我试着搜索这个问题，但没有找到其他答案。
我正在使用一些遗留的Delphi代码，使用的是Delphi 2006，它不支持泛型（在Delphi 2009中引入）。
代码使用TList来存储指向特定类型的示例化类的指针。当清除列表时，它们使用以下代码：

procedure ClearList(AList: TList);  
  var i: Integer;
  begin
    for i := 0 to AList.Count - 1 do
      TObject(AList[i]).Free;
    AList.Clear;
  end;

它的名字是这样的：

ClearList(FExtraVisitTypes);
  ClearList(FDiagnoses);
  ClearList(FProcedures);
  ClearList(FImmunizations);
  ClearList(FSkinTests);
  ClearList(FPatientEds);
  ClearList(FHealthFactors);
  ClearList(FExams);

我对这一点的理解可能不正确，但我担心如果将指向的对象作为TObject释放，则不会调用后代对象的析构函数，这可能会导致内存泄漏（我的多态学功夫有点生疏，这可能会引起我的困惑）。
因此，我尝试将清除功能更改为：

procedure ClearList(AList: TList; ItemClass: TPCEItemClass);  //mod to add ItemClass
  var i: Integer;
  begin
    for i := 0 to AList.Count - 1 do begin
      (AList[i] as ItemClass).Free;
    end;
    AList.Clear;
  end;

TPCEItemClass的定义如下：

TPCEItemClass = class of TPCEItem;

然后，我将清除调用更改为：

ClearList(FExtraVisitTypes, TPCEProc);
  ClearList(FDiagnoses, TPCEDiag);
  ClearList(FProcedures, TPCEProc);
  ClearList(FImmunizations, TPCEImm);
  ClearList(FSkinTests, TPCESkin);
  ClearList(FPatientEds, TPCEPat);
  ClearList(FHealthFactors, TPCEHealth);
  ClearList(FExams, TPCEExams);

但编译器不允许这样做，并给出以下错误：

[Pascal Error] uPCE.pas(1730): E2015 Operator not applicable to this operand type

对于此错误行：

(AList[i] as ItemClass).Free;

问题：
1.最初的编码方式，即通过简单地调用great-great-great（etc）祖先Free方法来释放项，最终会影响后代的析构函数方法吗？在我写这篇文章的时候，我现在认为它确实会影响后代的析构函数方法。但我不知道为什么。所以任何能帮助我记住这一点的答案都是很好的。
1.为什么我尝试通过class类型的参数进行类型转换的方法不起作用？这是不允许的吗？还是我的语法有问题？有没有别的方法可以做到这一点？
1.我是不是搞错了？有更好的办法吗？
谢谢