実行プログラムを最前面に移動させて、Aboutウィンドウを表示するAppleScriptです。
Xcode上で作成するAppleScriptObjCアプリケーションで実行する場合には強制的にメインスレッドで実行させる（performSelectorOnMainThread:① withObject:② waitUntilDone:③）指定は必要ないのですが、スクリプトエディタ上で実行する分には必要です。
▲左側がメインスレッド実行指定時 右側は何も指定しないでスクリプトエディタ上で実行した場合（たまにこうなる）
ステータスバーに常駐するタイプのAppleScriptで、About表示を行う際に作成しました。つねに、他のアプリケーションが最前面にいるので、About表示を行うために一工夫必要だったので。
| AppleScript名：自分を最前面に移動させてAbout表示 |
| — Created 2018-04-10 by Takaaki Naganoya — 2018 Piyomaru Software use AppleScript version "2.4" use scripting additions use framework "Foundation" use framework "AppKit" — perform run this script in main thread my performSelectorOnMainThread:"aboutDisp:" withObject:(missing value) waitUntilDone:true on aboutDisp:aSender current application’s NSApp’s activateIgnoringOtherApps:true current application’s NSApp’s orderFrontStandardAboutPanel:(current application) end aboutDisp: |
