如何在线程中动态创建数据模块

Question

我想在一个线程中动态的创建一个数据模块，可是在调用数据模块（dm）的构造函数时，需要一个参数（owner：Tcomponent），而Tthread类继承于Tobject，请问这个参数该怎么传，或者应该用别的方法创建？请高手执教。

Answer 1

MyThread = class(TThread)
  private
    { Private declarations }
  protected
    procedure Execute; override;
  public
    constructor Create(owner：Tcomponent);virtual;//在线程中加入构造函数，传入参数。
  end;