Obtener Ruta de Imagen para Bitbtn
 

Wenass!!

Al cambiar de valor una variable boolean lo que se hace es que se cambia la imagen de un bitbutton, bien hay forma de obtener la ruta de la imagen dentro del proyecto automaticamente por que si el proyecto se muda..da fallo al cambiar la imagen.

Una funcion que devuelva en string la ruta y yo solo añada el nombre de la imagen.

He probado con GetNamePath pero no lo hace bien..o no se hacerlo..

//asi cargo la imagen siendo "rodando" la ruta completa hasta la imagen

BitBtn2.Glyph.LoadFromFile(rodando);

GRacias

Una vez cargada la imagen ya no hay forma de obtener el path original (a no ser que te lo guardes tú);
Deberías cargar la imagen a partir del path de la aplicación y una ruta parcial, de esa forma si mueven la aplicación y imagen, seguirá funcionando.

Código Delphi [-]
 // supongamos que la imagen esté en el directorio de la app.
 rodando := IncludeTrailingBackslash(ExtractFilePath(Application.ExeName));
 rodando := rodando + 'img1.bmp';

Si mueves el EXE y la imagen, seguirá funcionando.

No se si es a eso a la que te referías.

Hola Disculpame Eso tambien funciona con archivos Mp3.

desde ya muchas gracias....

Jonatan Eseiza

Eso te da la ruta de un fichero, independiente del tipo; Otra cosa es lo que quieras hacer luego con él; Pero para obtener el nombre del fichero MP3 basta con cambiar la extensión; Algo así:

Código Delphi [-]
// supongamos el MP3 esté en el directorio de la app.
CancionFile := IncludeTrailingBackslash(ExtractFilePath(Application.ExeName));
CancionFile := CancionFile + 'Pista1.mp3';