Directorio actual

[marcoszorrilla]

Con Windows 98 funciona correctamente lo siguiente:

ShowMessage(ExtractFilePath(ParamStr(0)));

Resultado:
C:\ARCHIVOS DE PROGRAMA\BORLAND\DELPHI5\BIN\


Un Saludo.

[roman]

De hecho sería un poco raro que se necesitara ExpandFileName. Al menos no estaría claro en qué casos ParamStr(0) da la ruta ya expandida y en qué casos no.

// Saludos

[jachguate]

Yo lo he probado únicamente con windows Me.

[santiago14]

Para sintetizar, agradezco a todos sus respuestas. Confirmo que con extractPathFile es suficiente y utilizando application.exeName obtengo el nombre del ejecutable, por lo cual evito lo de expandFileName y ParamStr.
Otra vez se los agradezco y he quedado mas que satisfecho con sus respuestas, ah, con respecto a una de las citas que pedia probar en varios sistemas operativos, yo tengo windows 2000, professional y delphi6 enterprise y funcionan perfectamente todas las instrucciones citadas a lo largo de este hilo.