画像リサイズ時のカスタムアイコンを消したい
画像ファイルをリサイズ(小さく)するとゆうのを作ったのですが、リサイズされたファイルに画像のカスタムアイコンが貼り付けられてしまいます。
アイコンだけで50kほど有り、へたしたらファイルそのものより大きくなってしまいます。
リサイズのみでカスタムアイコンを貼り付けない方法はありますでしょうか?よろしくお願いします。
画像ファイルをリサイズ(小さく)するとゆうのを作ったのですが、リサイズされたファイルに画像のカスタムアイコンが貼り付けられてしまいます。
アイコンだけで50kほど有り、へたしたらファイルそのものより大きくなってしまいます。
リサイズのみでカスタムアイコンを貼り付けない方法はありますでしょうか?よろしくお願いします。
Automatorだと
最後にGraphicConverterのRemove Resource Forkを実行する
試用バージョンだと起動画面が表示されるので、試用バージョンをクリックしないといけないが
Automatorでは無いが便利
リサイズ画像選択後PhotoToolCMでロスレスクリーニングをしてやる
レスありがとうございます。
やっぱり標準ではアイコン外せないんですか。
アイコン付けるか外すかの選択ぐらいは欲しいですね。
私はGraphicConverterは持ってないんですよ。いちいちアプリが立ち上がる(みたいですね)のがなんかスマートじゃないですね。
PhotoToolCMというのは知らなかったんですが、なかなか良さそうですね。ただ、これがあるとAutomatorで作る必要がなくなってしまいそう(^^)
ちょっと試してみようと思います。ありがとうございました。
kubotaです、
手で削除する、というのは選択肢にないんでしょうね。
Mac OS 標準の機能だけでも、AppleScriptから"Image Capture Scripting"と
か"Image Events"を使えば、カスタムアイコンは付きません。
AppleScriptのボードの方がいいかもしれませんが、
例えばこんな感じです。
AppleのHP http://www.apple.com/applescript/imageevents/
にあるサンプルをドラッグ&ドロップで使えるように変えたものです。
Script Editorにペースとして「アプリケーションとして保存」してください。
on open Droplist
repeat with afile in Droplist
try
tell application "Image Events"
launch
-- ファイルを開く
set this_image to open afile
-- この下の数字を変えるとサイズが変わります
scale this_image to size 200
-- 保存
save this_image without icon
-- purge the open image data
close this_image
end tell
on error error_message
display dialog error_message
end try
end repeat
end open
〜〜〜〜〜
こちらはImage Capture Scriptingの例(HPそのまま)で、サイズを半分に
するものです。
スクリプトエディタにコピーして、実行させてください。
http://www.apple.com/applescript/image_capture/
set this_file to choose file with prompt "Pick an image file to scale:"
try
tell application "Image Capture Scripting"
set this_image to open this_file
scale this_image by factor 0.5
save this_image in this_file
close this_image
end tell
on error error_message
beep
display dialog error_message buttons {"Cancel"} default button 1
end try
kubotaです、
蛇足ですが、
Automatorの"AppleScriptを実行”というアクションから呼び出すこともできます。
こんな感じです:
「Finder項目の選択を求める」
「AppleScriptを実行」
on run {input}
set afile to input as text
tell application "Image Events"
set this_image to open (afile as alias)
scale this_image to size 100
save this_image
close this_image
end tell
end run
kubotaさん、レスありがとうございます。
手で削除は考えてないです(^^)。ファイル数も多くなりますので。
教えて頂いたAppleScriptですが、さっそく試させて頂きました。
それでもう一つ教えて頂きたいのですが、AutomatorでAppleScriptを実行させた時、一枚のファイルでは正常にリサイズできるのですが、複数のファイルの場合エラーが出てしまいました。(AppleScriptをアプリケーションにした場合は複数でも大丈夫でした)
複数枚のファイルをリサイズする場合、Scriptをどのように変更すればよいのでしょうか?
一応自分なりにちょっといじくってみたのですが、やっぱりダメでした。
Scriptの記述をもう一度教えて下さい。よろしくお願いします。
kubotaです、
repeat withを使います。こんな感じです。
on run {input}
repeat with xxfile in input
set afile to xxfile as text
tell application "Image Events"
set this_image to open (afile as alias)
scale this_image to size 100
save this_image
close this_image
end tell
end repeat
end run
kubotaさん、ありがとうございます!
教えて頂いたScriptで無事リサイズできました。
どうもありがとうございました。
横入りでスイマセン。kubotaさんのscriptをAutometorで実行させているんですが、
どうしても
「変数 this_imageが定義されていません。(-2753)」
とエラーメッセージが出てしまいます。scriptはコピーペーストで入れているのですが、どこでミスしてしまってるのか分かりません。
ご教授してください。
kubotaです、
1.1.1.1.1.1に書いてあるスクリプトを、
コピペしてみましたけど、うちではエラーになりません。
もう一度最初からアクションを組み直してみていただけますか?
kubotaさん
どうもレスありがとうございます。今試してみましたら普通にできました。
画像リサイズ時のカスタムアイコンを消したい