Hola, Como se haría esto?

[El._.Dani]

Hola, soy nuevo en el foro y decir que me ha encantado esta comunidad de delphi. Bueno aqui va la duda, espero que me podais responder.

Haber estoy haciendo un reproductor de sonido en delphi 7 y en un listbox he puesto que cada vez que se abra una canción se agregue ahi la cancion. Hasta ahi todo bien, lo malo que pone la ruta entera en la que está la canción, como podría poner sólo el nombre?

Mil gracias y espero la respuesta.

[rgstuamigo]

Podría ser así:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var Nombre:String;
begin
    Nombre:= ExtractFileName('C:\MyMúsica\MyPista1.wma');//Extraigo el nombre del archivo de esa direccion 
    ShowMessage(Nombre);//<--aqui muestra "MyPista1.wma"
end;

Saludos...

[El._.Dani]

Muchas Gracias compi gracias a eso lo he conseguido hacer para todas las canciones


Mil Gracias

[rgstuamigo]

Empezado por El._.Dani

Muchas gracias por tu ayuda pero eso solo es para la cancion que pusiste, yo lo quiero para cualquier cancion que se abra, intentaré mientras haber como lo hago.

Espero respuestas

PD: Muchas gracias rgstuamigo

Por supuesto que es para una canción... ten en cuenta que es solo un ejemplo , lo que en realidad debes hacer tu es:

Código Delphi [-]
...
ListBox1.Items.Add(ExtractFileName(TuPath));
...

en tu rutina donde agregas cada canción a tu listBox..

[rgstuamigo]

Ahora si la quieres más facil puedes usar el componente TFileListBox(Pestaña Win 3.1 de la paleta de componentes ) y configurar la máscara para que automáticamente lea los archivos de música (sin codificar nada), sólo debes indicarles los paths(separado por punto y coma ";" entre cada Path) en su propiedad Mask para que automaticamente te muestre los archivos en los item del TFileListBox, por ejemplo la propiedad Mask del FileListBox podría ser así:

Código Delphi [-]
Mask = C:\MyMúsica\*.wma;D:\OtrasMúsicas\*.mp3

Con esa máscaras lo que estamos haciendo es mostrar en nuestro componente TFileListBox todos los nombres de los archivos que estan en C:\MyMúsica que tienen la extensión .wma y todos los archivos que estan en D:\OtrasMúsicas que tienen la extensión .mp3.
Espero que se haya entendido.
Saludos...

[El._.Dani]

Gracias compi gracias a tu ejemplo de arriba lo conseguir hacer ;-) Haber si cuando tenga una version mas estable lo subo para que lo veais. Aunque no será la primera cosa que pregunta


Muchas Gracias