Delphi - Ruta a la aplicación

Hola.
A ver si alguien me puede resolver esta duda. En Visual Basic podía utilizar la función AppPath que me devolvía en tiempo de ejecución la ruta en la que está instalada la aplicación. Ahora necesito saber lo mismo en Delphi. He probado con Application.GetNamePath, pero por lo visto no funciona. ¿Como puedo obtener esa ruta en tiempo de ejecución?.
Muchas gracias.

Ok, olvidad la pregunta. Ya he encontrado la forma de hacerlo.
Con ExtractFilePath(Application.ExeName).
Si hay alguna otra forma, tambien me gustaría saberlo.

Yo instalo en la misma carpeta la aplicación y la base de datos y aunque el cliente lo instale en cualquier directorio busco la base de datos así:

DM.IBDB.DatabaseName := ExtractFilePath(ExpandFileName(ParamStr(0))) + 'NOMBREBASEDATOS.GDB';