iTunes

今日はちょっとしたAppleScriptを載せておきます。

iTunesのウインドウを最大化するためのスクリプトです。MacのiTunesはディスプレイサイズが変わったときにウインドウサイズが適切な大きさにならずにサイズを変更できなくなるので作りました。

tell application "Finder"
 set displayBounds to bounds of window of desktop
end tell
set winBounds to bounds of window 1 of application "iTunes"
set item 2 of displayBounds to 22
set bounds of window 1 of application "iTunes" to displayBounds

"iTunes"になっている部分を他のソフトウエアの名前に変えればそのまま動く気がします。

それはそうとQt-BSch3Vのリリース版でツールバーの挙動がおかしいですね。デバッグ中には正常に動いているので気づきませんでした。どうもQtをStatic Linkすると駄目なようです。次のリリースでは直したいところですが、うまい解決法が思いつかないので少々お待ちください。