MacBSの日常生活的日記

Safariのウィンドウを並べる

クマデジタルさんがTwitterで「Safariのウインドウを3つ綺麗に
重ならないように横に並べてくれるソフト」を募集していたので、
アップルスクリプトで出来るだろうなぁと思いつつ、そのまま
寝てしまったんですが、その間に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]

モバイルバージョンを終了