Obtener directorio del programa

[bsa_sux]

Hola

Me interesa obtener el directorio de una aplicación que estoy haciendo, es decir, el directorio donde se encuentre el ejecutable principal. He visto que lo puedo obtener de este modo:

ExtractFileDir (Application.ExeName);

Pero me queda la duda de saber si Application cuenta con algún objeto que tenga algún método para hacer lo mismo. He estado mirando en la ayuda y buscando por los foros pero no he encontrado nada al respecto para sacar el directorio del programa sin tener que emplear la función ExtractFileDir (bien utilizándola con Application.ExeName o con ParamStr (0)).

Un saludo