Hola para lo que buscas, no recuerdo nada que exista en Delphi, siempre me he visto funciones creadas por terceros, un ejemplo en concreto en
Trucomania es
este
Échale un vistazo a ver si te sirve o no si prefieres usar la tuya porque te va bien
Saludos