[dec]

Si queremos conocer el PATH de nuestro programa en tiempo de ejecución, podemos usar esto:

AnsiString s = Application->ExeName;
AnsiString ExePath = ExtractFilePath(s);
ShowMessage(ExePath);