[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

(DTPtechNote:1398) [AS_Finder]フルパス名を得る

:区切りと/区切り(POSIX Path)が選べます

on open of theFiles
	tell application "Finder"
		repeat with i in theFiles
			display dialog "フルパス名は" default answer (i as Unicode text) buttons {"キャンセル", "POSIX Path", "OK"} default button "OK"
			if button returned of result is "POSIX Path" then
				set P_path to (quoted form of POSIX path of contents of i) as Unicode text
				display dialog "POSIX Path名は" default answer P_path buttons {"キャンセル", "OK"} default button "OK"
			end if
		end repeat
	end tell
end open