指定UTIのファイルのFinderからのドラッグ＆ドロップを受け付けるAppleScript Libraries「display drop dialog」をリリース、フリー配布いたします。
＃ 本ライブラリはEdama2さんのScriptに若干の改変を行い、sdefをつけてパラメータのエラー処理を行い、コードサインしてライブラリ化したものです
–> Download display drop dialog Script Library (To ~/Library/Script Libraries/)
本ライブラリは、指定UTIの書類のドラッグ＆ドロップを受け付けるダイアログをAppleScriptから手軽に使えるようにするものです。macOS 10.14以降で動作します。
現在のAppleのTim Cook体制は、セキュリティ強化の美名のもとに「動かないコンピュータ」を目指し、各種機能を阻害する方向に進んでいます。
AppleScriptの世界はその中でも自由度が比較的高い状態にありますが、それでもmacOS 10.12以降では、AppleScriptドロップレットにFinderからドラッグ＆ドロップしても、Finderの拡張属性（Xattr）がついたファイルは無視されたりと、なかなか困ります。
そこで、Finderからのドラッグ＆ドロップ操作を通常の（Applet書き出ししていない）AppleScript、とくにScript Menuから呼び出す形式のAppleScriptで使えるようにすることを目的として本ライブラリを作成しました。
本ライブラリを用いることで、ドロップレットを作らなくても、Script Menuから呼び出した普通のAppleScriptにファイルのドラッグ＆ドロップの受信機能を追加できます。セキュリティと機能性（ドラッグ＆ドロップ）を両立させるため、すべてのScripterに欠かすことのできないライブラリになるものと期待しています。
本ライブラリのAppleScript用語辞書には実行イメージ（画面キャプチャ）およびサンプルScriptを入れてあり、実行時の様子やサンプルスクリプト（本Blogと同様のワンクリックで内容が転送されるリンクつき）を確認できるようになっています。
| AppleScript名：accept AppleScript documents |
| use dropLib : script "display drop dialog"
set aMainMes to "Drop AppleScript" set aSubMes to "Drag and Drop AppleScript files here" set aUTI to "com.apple.applescript.script" set execButtonTitle to "Execute" set aRes to (display drop dialog aUTI main message aMainMes sub message aSubMes with initial folder "" OK button title execButtonTitle) –> {alias "Machintosh HD:Users:me:Documents:display drop dialog:accept PNG images.scpt", alias "Machintosh HD:Users: me:Documentsaccept Markdown documents.scpt"} |
| AppleScript名：accept Markdown documents |
| use dropLib : script "display drop dialog"
set aMainMes to "Drop Markdown Documents" set aSubMes to "Drag and Drop Markdown documents here" set aUTI to "net.daringfireball.markdown" set execButtonTitle to "Execute" set aRes to (display drop dialog aUTI main message aMainMes sub message aSubMes with initial folder "" OK button title execButtonTitle) –> {alias "Machintosh HD:Users:me:Documents::–Book 11 「Blog Archives vol5 2013-2014」:2013:01:201301013.md", alias "Machintosh HD:Users:me:Documents::–Book 11 「Blog Archives vol5 2013-2014」:2013:01:201301012.md"} |
| AppleScript名：accept PNG images with initial folder contents |
| use scripting additions use dropLib : script "display drop dialog" set aMainMes to "Drop PNG" set aSubMes to "Drag and Drop png images here" set aUTI to "public.png" set execButtonTitle to "Execute" set iFolder to path to pictures folder –At first, PNG files in this folder is displayed set aRes to (display drop dialog aUTI main message aMainMes sub message aSubMes with initial folder iFolder OK button title execButtonTitle) –> {alias "Machintosh HD:Users:me:Pictures:1015sedhelp2.png", alias "Machintosh HD:Users:me:Pictures:574G01.png", alias "Machintosh HD:Users:me:Pictures:macDown1.png", alias "Machintosh HD:Users:me:Pictures: 2017-09-27 19.33.53.png", alias "Machintosh HD:Users:me:Pictures:2018-11-01 10.54.06.png" |
