SendMessage pour controler WMP

Progi1984 · Message par **Progi1984** » jeu. 31/juil./2008 8:31

; Auteur : progi1984
; Date : 31/07/08

Enumeration 
  #ORDER_WMP_PlayAndPause
  #ORDER_WMP_Stop
  #ORDER_WMP_Next
  #ORDER_WMP_Prev
  #ORDER_WMP_Random
EndEnumeration

  Order = #ORDER_WMP_PlayAndPause
  wmp.l = FindWindow_("WMPlayerApp", "Lecteur Windows Media")
  Select Order
    Case #ORDER_WMP_PlayAndPause
      SendMessage_(wmp, #WM_COMMAND, 18808, 0)
    Case #ORDER_WMP_Stop
      SendMessage_(wmp, #WM_COMMAND, 18809, 0)
    Case #ORDER_WMP_Next
      SendMessage_(wmp, #WM_COMMAND, 18811, 0)
    Case #ORDER_WMP_Prev
      SendMessage_(wmp, #WM_COMMAND, 18810, 0)
    Case #ORDER_WMP_Random
      SendMessage_(wmp, #WM_COMMAND, 18842, 0)
  EndSelect

kernadec · Message par **kernadec** » jeu. 31/juil./2008 13:24

merci

poshu · Message par **poshu** » jeu. 31/juil./2008 19:45

Pareil, merci.

poshu · Message par **poshu** » ven. 01/août/2008 10:33

Au passage, tu aurais sous la main la même chose pour iTunes? Je suis pris d'une flemme olympique ^^;