Delphi程序在DevExpress初始化时崩溃

Question

我正在努力恢复一个用Delphi 7编写并使用DevExpress组件的旧Delphi应用程序。

但是在启动此功能时崩溃了：

function TcxRegisteredClasses.GetIndexByClass(AClass: TClass): Integer;
begin
  Result := FItems.IndexOfObject(TObject(AClass));
end;

Self是nil。它成功运行了很多次，然后就死了。任何人都可以提出可能出错的建议吗？

TIA 标记