TObjectのサブクラスのみ受け取るvarパラメータが欲しい。