[AppleScript]ドロップレット OPENしたくない(Openに値を渡さない & ログを出す)その2
AppleScript サンプルコード
行番号 | ソース |
---|---|
001 | #! /usr/bin/env osascript |
002 | ----+----1----+----2----+-----3----+----4----+----5----+----6----+----7 |
003 | # com.cocolog-nifty.quicktimer.icefloe |
004 | # |
005 | ----+----1----+----2----+-----3----+----4----+----5----+----6----+----7 |
006 | use AppleScript version "2.8" |
007 | use framework "Foundation" |
008 | use scripting additions |
009 | |
010 | property refMe : a reference to current application |
011 | |
012 | ################### |
013 | #Wクリックで実行 |
014 | #エディタから実行 |
015 | on run |
016 | |
017 | set listAliasFilePath to (choose file with multiple selections allowed) as list |
018 | #サブルーチンに渡す |
019 | set boolDone to doAction(listAliasFilePath) |
020 | if boolDone is false then |
021 | display alert "エラーが発生しました" message "エラーが発生しました" |
022 | return |
023 | end if |
024 | return |
025 | |
026 | end run |
027 | |
028 | ################### |
029 | #ドロップ |
030 | on open listAliasFilePath |
031 | #サブルーチンに渡す |
032 | set boolDone to doAction(listAliasFilePath) |
033 | if boolDone is false then |
034 | display alert "エラーが発生しました" message "エラーが発生しました" |
035 | return |
036 | end if |
037 | return |
038 | |
039 | end open |
040 | |
041 | ################### |
042 | #実行されるのはこれ |
043 | to doAction(argListAliasFilePath) |
044 | #ファイルエイリアスリストを順番の処理 |
045 | repeat with itemAliasFilePath in argListAliasFilePath |
046 | try |
047 | ##ここに本処理 |
048 | set listButtons to {"OK", "QUIT"} as list |
049 | display alert "ドロップしたファイルのパス" message (itemAliasFilePath as text) buttons listButtons default button (item 1 of listButtons) cancel button (item 2 of listButtons) giving up after 3 |
050 | on error |
051 | #エラーをログにする |
052 | refMe's NSLog("■■■: サブルーチンでエラーになりました") |
053 | return false |
054 | end try |
055 | end repeat |
056 | #全部エラーなく終わったらtrueを戻す |
057 | return true |
058 | end doAction |
AppleScriptで生成しました |
| 固定リンク