2007年12月30日

もっと簡単にAutoHotKeyでiTunesを操作する

もっと簡単な方法あるじゃん・・・

「iTunes Ratings - AutoHotKey Community」をちょっと改変

#NoTrayIcon
#Include CoHelper.ahk

CoInitialize()

iTunesApp := ActiveXObject("iTunes.Application")
;再生・一時停止する
Invoke(iTunesApp, "PlayPause")
;現在のタイトルの情報を取得する
Current := Invoke(iTunesApp, "CurrentTrack")
;タイトル取得
Name := Invoke(Current, "Name")
;アーティスト名取得
Artist := Invoke(Current, "Artist")
;アルバム名取得
Album := Invoke(Current, "Album")
;表示
Msgbox, %Name%`n%Artist%`n%Album%

Release(Current)
Release(iTunesApp)
CoUninitialize()
return

これだけで再生・一時停止+曲名、アーティスト名、アルバム名が取得できた
自分はtxt形式の歌詞を曲名で保存してるからこのスクリプトを活用すれば歌詞表示までできるかもしれない