Delphi Rio中创建TThread子类实例未进入自定义Create构造函数问题

• 最核心的诱因是TThread基类本身自带无参构造方法（该版本在较新Delphi版本中已标记为弃用），你自定义的子类无参构造没有显式标记reintroduce关键字，导致编译器实际调用的是父类的无参构造而非你实现的子类构造，所以断点无法命中、初始化逻辑不执行。
• 次要排查方向：检查是否在多个单元中声明了同名的TThreadManager类，实例化时引用的单元顺序不对，导致调用了其他单元的空实现类。

• 方案1：修改构造函数声明，添加reintroduce关键字，明确告诉编译器你要隐藏父类的同名构造，声明代码如下：

type
  TThreadManager = class(TThread)
    constructor Create; reintroduce;
  end;

• 方案2：直接沿用TThread标准的带CreateSuspended参数的构造，重写该构造而非自定义无参构造，代码示例：

type
  TThreadManager = class(TThread)
    constructor Create(CreateSuspended: Boolean); override;
  end;

constructor TThreadManager.Create(CreateSuspended: Boolean);
begin
  inherited Create(CreateSuspended);
  // 原有初始化逻辑保持不变
  FreeOnTerminate := True;
  Priority := tpNormal;
  // 创建内部对象逻辑保留此处
  fIsSetupOk := False;
end;

// 实例化时代码调整为：
threadManager := TThreadManager.Create(True);
threadManager.Setup(dmMain.ibSessionMain);
threadManager.Start; // 建议用Start代替已弃用的Resume方法

• 方案3：如果一定要保留无参构造的调用方式，也可以在构造声明添加overload关键字配合使用，确保子类实现被正确调用。

额外优化提示：Delphi Rio中Resume方法已经被标记为弃用，使用Start方法启动挂起的线程兼容性更好。

内容的提问来源于stack exchange，提问作者Popa Ovidiu-Razvan