Page 1 sur 1

[R] Perte de focus, début de réponse.

Posté : jeu. 23 oct. 2008 18:55
par Flop
Bonjour à tous, je viens de faire mon premier script et ca marche presque, un peu d'aide sur une fonction que je connais pas encore.

Code : Tout sélectionner

; // lance MPC
run($mpc_folder & "\" & $mpc_name & " " & @ScriptDir & "\playlist.pls /play /fullscreen /close")
Sleep($fanart_delay)
WinActivate("[CLASS:MediaPlayerClassicW]", "")
Send("!{PGDN}")
 
voici la fin de mon code. ton fonctionne sauf que je suppose que le script s'arrete et je perds le focus sur le programme MPC, je peux contourner le problème en mettant

Code : Tout sélectionner

Sleep(1000000)


ce qui me permet de garder la main (focus) sur MPC, mais si j'arrete mpc le code continue de tourner et ne me rends pas la main tant que le délai est pas passé..

comment faire.. a l'aide SVP.

Re: [..] Perte de focus, début de réponse.

Posté : jeu. 23 oct. 2008 19:30
par L4crymal
Au lieu du sleep essaie une boucle infini

Re: [..] Perte de focus, début de réponse.

Posté : jeu. 23 oct. 2008 19:34
par Flop
tu fais ca comment ? je voyais plus un probleme de focus.
pourquoi si je ne mets pas sleep, il perd le focus apres la derniere action ?

Re: [..] Perte de focus, début de réponse.

Posté : jeu. 23 oct. 2008 21:43
par Tlem
Au lieu de la commande Run essayez la commande ShellExecute.

Re: [..] Perte de focus, début de réponse.

Posté : jeu. 23 oct. 2008 23:40
par Flop
Tlem a écrit :Au lieu de la commande Run essayez la commande ShellExecute.
cote ca a rien changé, j'ai mis ca :

Code : Tout sélectionner

ShellExecute($mpc_folder & "\" & $mpc_name ,@ScriptDir & "\playlist.pls","/play /fullscreen /close")

Re: [..] Perte de focus, début de réponse.

Posté : ven. 24 oct. 2008 00:12
par Flop
Résolu avec une boucle.. merci

voici le code final :

Code : Tout sélectionner

; // lance MPC et lance l'action de changer le fichier de la playlist
ShellExecute($mpc_folder & "\" & $mpc_name ,@ScriptDir & "\playlist.pls","/play /fullscreen /close")
WinActivate("[CLASS:MediaPlayerClassicW]", "")
Sleep($fanart_delay)
Send("!{PGDN}")

; // test MPC pour voir si il est en 1er plan et quitte le script si non
While 1
    If ProcessExists($mpc_name) Then
        WinActivate("[CLASS:MediaPlayerClassicW]", "")
    Else
        exit
    EndIf
WEnd
 

Re: [R] Perte de focus, début de réponse.

Posté : ven. 24 oct. 2008 07:10
par L4crymal
While 1

...


Wend


C'est ça une boucle infinie