• 071月

    クマデジタルさんが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に手が伸びないくらいです。(^^;

    0596102119 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]

    Filed under: Mac
    2010/01/07 9:19 am | Safariのウィンドウを並べる はコメントを受け付けていません

Comments are closed.