on run
	tell application "Finder"
		beep
		display alert "ドロップレット形式です。
ファイルをドラッグ＆ドロップしてください。
画像ファイルのサムネイル・リソースフォーク
ICCプロファイルを削除します。
" as informational
		return
	end tell
end run


on open DropObj
	set myImage to ""
	tell application "Finder"
		repeat with ObjFiles in DropObj
			set myImage to ""
			tell application "Image Events"
				launch
				set myImage to open ObjFiles
				unembed myImage
				close myImage saving yes
			end tell
		end repeat
	end tell
end open