MacBSの日常生活的日記

クマデジタルさんがTwitterで「Safariのウインドウを３つ綺麗に
重ならないように横に並べてくれるソフト」を募集していたので、
アップルスクリプトで出来るだろうなぁと思いつつ、そのまま
寝てしまったんですが、その間にwajunさんが作ってくださったようで。
http://d.hatena.ne.jp/wajun/20100106/p1

これ、画面がワイドで大きい、最近のiMacではかなり役立ちそう。
ただ、現状、ウィンドウが3つであることが前提になってたので、
そこだけ修正してみました。

try
    — get screen size
    tell application “Finder”
        set theScreen to bounds of (window of desktop)
        set X to item 3 of theScreen
        set y to item 4 of theScreen
    end tell

    tell application “Safari”
        activate
        set theCount to number of document
        set totalCount to theCount
        set {hidari, ue, migi, shita} to {0, 22, X / totalCount, y}
        repeat while theCount > 0
            set bounds of window theCount to {hidari, ue, migi, shita}
            set {hidari, ue, migi, shita} to {hidari + X / totalCount, ue, migi + X / totalCount, y}
            set theCount to theCount – 1
        end repeat
    end tell

on error the error_message number the error_number
    log (“Error: ” & the error_number & “. ” & the error_message)
end try

勝手に修正しちゃって申し訳ないのですが、これでウィンドウが
2つでも4つ以上でもOKかと。

AppleScriptって覚えちゃうと結構多彩な技が使えますね。
逆にこれがあるためにCocoaに手が伸びないくらいです。(^^;

Applescript: The Definitive Guide (Definitive Guides) Oreilly & Associates Inc 2006-01 by G-Tools

それにしてもデッカイiMac、うらやましいです。
うちの20inchだと2ウィンドウが実用限界ですからねぇ。

《在庫あり》Apple(アップル) iMac2.66GHz Quad Core i5 27インチ [MB953J/A]

(当サイトでは、Amazonアソシエイトをはじめとした第三者配信のアフィリエイトプログラムにより商品をご紹介致しております。)