Combinação ( fórmula matemática ) há função ou componente?

Há no Delphi ou algum componente que gera as combinações possíveis dentro uma sequencia de número ou letras?

Por exemplo: Quais são as combinações possíveis de 2,2 na array:
{ 10,14,22, 23 } ( não pode repetir ) o resultado seria:

{10,14},{10,22},{10,23},{14,22},{14,23},{22,23} ou seja

retornaria 6 combinações:

:shock: