[delphi-br] Interseção de Conjuntos.

Boa tarde, Venho por meio deste pedir ajuda para montar função que me retorne a interseção de 2 conjuntos, onde só conheço os extemos dele, por exemplo: [1..15] * [7..18] = [7, 8, 9, 10, 11, 12, 13, 14, 15] Ou então que me retorne true caso haja a interseção e false caso não haja, por exemplo:

[delphi-br] Interseção de conjuntos.

Bom dia, Venho por meio deste solicitar ajuda no esclarecimento de uma dúvida em delphi. É possível, no delphi 2007, obter a interseção de dois ou mais conjuntos, quando somente se conheçe os extremos deste, como por exemplo: [1..6] * [4..9] * [5..15] = [5, 6] ou [3..8] * [5..10] = [5, 6