Hola ebeltete.
Sería bueno que comentaras de que componente estas hablando así si alguién lo conoce te podrá informar. (creo que a eso se refería Casimiro)
Desconozco si Delphi 5 trae el componente
TMediaPlayer, pero si lo trae:
Código Delphi
[-]
procedure TForm1.btnPlayClick(Sender: TObject);
begin
with MediaPlayer1 do
begin
FileName:= 'C:\ÉL ÁÑÓ DÉ MÍ VÍDÁ.mp3';
Open;
Play;
end;
end
...
procedure TForm1.MediaPlayer1Notify(Sender: TObject);
begin
if MediaPlayer1.NotifyValue = nvSuccessful then
MediaPlayer1.Close;
end;
Si no está disponible también podes usar la función API
mciSendString:
Código Delphi
[-]
procedure Reproducir(aFileName: string);
begin
mciSendString('close media', nil,0, 0);
mciSendString(PChar('open "' + aFileName + '" alias media'), nil, 0, 0);
mciSendString('play media', nil, 0, 0);
end;
...
procedure TForm1.btnPlayClick(Sender: TObject);
begin
Reproducir('C:\ÉL ÁÑÓ DÉ MÍ VÍDÁ.mp3');
end;
Como podrás ver en los ejemplos anteriores, con ninguno de estos tendrás problemas con los caracteres.
Saludos.