obtener el directorio del programa

[7U15MK]

como puedo colocar en un label la ruta del directorio en el que se encuentra el programa?

[Robokop]

asi

Código [Seleccionar] Expandir

label1.caption = app.path

[my_sistemas]

y mas completo
(logicamente agregas un label con el nombre label1)

label1.caption = app.path & "\" & app.exename & ".exe"

[Ironhorse]

Ojo que cuando la ruta que devuelve es el directorio raiz de la unidad, la cadena termina en \, en los demas casos no.