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

[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.

[L4crymal]

Au lieu du sleep essaie une boucle infini

[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 ?

[Tlem]

Au lieu de la commande Run essayez la commande ShellExecute.

[Flop]

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")

[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
 

[L4crymal]

While 1

...


Wend


C'est ça une boucle infinie