2（マルチ）レイヤーのジェネリック型の仮想メソッドを呼び出すときに、追加の型パラメーターを削除するにはどうすればよいですか？

あるTBaseClassList<T: TBaseClass>仮想メソッドを持つクラスがDoSomething。このメソッドを、外部の別のオープン構築型メソッドTBaseClassListとその子孫から呼び出したいと思いCallDoSomethingます。これは私のコードです：

type
  TBaseClass = class end;

  TBaseClassList<T: TBaseClass> = class
    class procedure DoSomething; virtual; abstract;
  end;

  TSubClass1 = class(TBaseClass) end;

  TSubClass1List = class(TBaseClassList<TSubClass1>)
    class procedure DoSomething; override;
  end;

  TDoSomethingCaller = class
    class procedure CallDoSomething<T: TBaseClass; L: TBaseClassList<T>>;
  end;

implementation

class procedure TSubClass1List.DoSomething;
begin
  ShowMessage('TSubClass1List.DoSomething');
end;

class procedure TDoSomethingCaller.CallDoSomething<T, L>;
begin
  L.DoSomeThing;
end;

initialization
  TDoSomethingCaller.CallDoSomething<TSubClass1, TSubClass1List>;
end.

今、私はそれを正しい方法でやっていますか？CallDoSomething1つの型パラメーターだけで定義することは可能ですか？

CallDoSomething私が試した他の定義は次のとおりです。

方法1：

class procedure CallDoSomething<L: TBaseClassList>;

私のDelphiはそれをコンパイルしません（私は10.1ベルリンを使用しています）。それは言う：

E2003宣言されていない識別子： 'TBaseClassList'

方法2：

class procedure CallDoSomething<T: TBaseClass>;
...
class procedure TDoSomethingCaller.CallDoSomething<T>;
begin
  TBaseClassList<T>.DoSomething;
end;

ランタイムエラーがあります：

プロジェクトは、メッセージ「抽象エラー」で例外クラスEAbstractErrorを発生させました。

方法3：

class procedure CallDoSomething<L: TSubClass1List>;

今、私は呼び出すことはできませんCallDoSomethingためTSubClass2List。

PS質問を言葉で表現する方法すら知らなかったので、より良いタイトルや説明の提案をいただければ幸いです。