Componente Delphi com auto ajuste no tamanho do texto

Um componente ou função para Delphi.

Preciso de uma forma de ajustar o tamanho do texto conforme aumenta ou diminui o tamanho do componente.

Pode ser um EDIT ou LABEL ou qualquer outro componente.

A ideia é criar um "campo" na tela onde eu possa jogar um texto qualquer e o tamanho da fonte se ajuste

de forma que o texto se encaixe e se aumentar o tamanho do  "campo" aumenta a fonte e se diminuir

o mesmo ocorre com a fonte.

Desde já agradeço.