E2510 型 '%s' は有効な制約ではありません（Delphi）

エラーと警告のメッセージ（Delphi） への移動

クラス参照をジェネリック クラスの型制約として使用することはできません。 通常のクラスを使用してください。

 program E2510;
 
 {$APPTYPE CONSOLE}
 
 uses
   SysUtils;
 
 type
   TBaseType = class
   end;
 
   TBaseTypeClass = class of TBaseType;
 
   TFactory<T: TBaseTypeClass, constructor> = class //E2510 Fix: replace TBaseTypeClass with TBaseType
   end;
 
 begin
   Writeln('FAIL - Type ''%s'' is not a valid constraint');
 end.