델파이에서 상속받은 형을 인자로 객체 생성할 땐 제너릭 대신 메타클래스로

TMetaCar = class of TCar;

function CreateCar(TCarToCreate: TMetaCar; Horsepower: Integer): TCar;
begin
  result := TCarToCreate.Create(Horsepower);
end;