Probleme lancer Windows Media Player avec Delphi

**Cut** · 06/04/2006, 12h13

Voila j'ai cette procedure qui est executée lorsque je clique sur un bouton:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
procedure TSDIAppForm.FileOpen1Execute(Sender: TObject);
begin
 
  Shellexecute(handle,nil,'C:\Program Files\Windows Media Player\wmplayer.exe','"C:\test.mp3" "C:\test2.mp3"',nil,0);
 
end;

Probleme quelque soit le nombre de fichiers passés dans ma fonction il faut que je clique deux fois sur le bouton pour que WMPlayer se lance... Quelqu'un sait il d'ou vient le probleme ou a t'il une solution? Une autre methode pour faire cela?

Merci d'avance.

**KBNOT-PRC600** · 06/04/2006, 13h08

Incorporer le médiaplayer dans delphi!

**Cut** · 07/04/2006, 12h26

Elle est marrante la reponse.

Mais m'apporte pas grand chose.

A mon avis c'est plus compliqué et ça ne changera pas grand chose a mon probleme.
De plus je vais en dire un peu plus sur ce que l'appli doit faire. Elle lance des mp3 avec le lecteur par default de l'utilisateur (donc c'est pas forcement WMPlayer) et je donne le choix à l'utilisateur de choisir son logiciel parmis la liste enregistrée dans la base de registre de windows. Donc je vais pas surcharger mon interface avec tout plein de lecteurs. Le but c'est de lancer le logiciel choisi avec les mp3. D'ailleurs il y a qu'avec WMPlayer que ça fonctionne mal et qu'il faut cliqué deux fois sur le bouton...

**[Silk]** · 07/04/2006, 16h59

Salut,
Tu as essayé de mettre 2 fois ta ligne shellexecute ?

tu peux toujours tester et voir ce que sa fait...

**denokan** · 07/04/2006, 20h06

Essaye de mettre de quotes " dans tes paramètres :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
ShellExecute(Handle, // handle
               'OPEN',
               '"C:\Program Files\Windows Media Player\wmplayer.exe"',
               '"D:\Mes Documents\delphi\test shellexe\Sharo.mp3"',
               nil,
               0);

**Cut** · 13/04/2006, 09h48

Oui j'ai essayé de mettre la ligne deux fois c'est la premiere chose à laquelle j'ai pensé : sans effet.

J'ai essayé ta methode denokan et ce n'est pas beaucoup mieux. En fait je suis passé à la version 10 du WMPlayer et là je crois que c'est mieux et pire

. En fait dès que je clique sur le bouton il me lance l'appli, mais j'ai aucun affichage. En gros il me lance mes mp3 avec WMPlayer mais il le lance juste dans les process sans afficher le programme et cela tout le temps. Si j'appuis de nouveau sur le bouton il relance depuis le debut.

HELP ME

**david_chardonnet** · 13/04/2006, 10h34

et si tu lances directement un fichier MP3 avec shellexecute , peut etre qu'il lancera automatiquement to media player si c'est lui qui y est associé.