[AS] extended chars & Image Events
[AS] extended chars & Image Events
- Subject: [AS] extended chars & Image Events
- From: Yvan KOENIG <email@hidden>
- Date: Sat, 18 Mar 2006 20:54:12 +0100
Hello
I am using a script containing this handler.
property le_nom : "temporary_yraropmet.PICT"
on zefile_)
copy (path to desktop folder) as text to the desktop_path
copy desktop_path & le_nom to the target_path
copy zefile_ as text to zefile
tell application "Finder"
if exists file target_path then
delete file target_path
update folder desktop_path
end if
end tell -- Finder
--display dialog zefile
try
with timeout of 900 seconds
tell application "Image Events"
launch
set this_image to open file zefile
scale this_image by factor 0.5
save this_image as PICT in file target_path --with icon
close this_image
end tell
end timeout
tell application "Finder"
update folder desktop_path
end tell
tell application "AppleWorks 6"
activate
open file target_path
select document 1
tell document 1
select menu item 7 of menu 3 (* Édition > Tout sélectionner *)
select menu item 4 of menu 3 (* Édition > Copier *)
end tell -- document 1
close document 1 without saving
end tell -- AppleWorks
tell application "Finder"
delete target_path as alias
end tell -- Finder
on error MsgErr number NroErr
if NroErr is not -128 then
beep 2
tell application (path to frontmost application as string) to ¬
display dialog "" & NroErr & " : " & MsgErr with icon 0 ¬
buttons {msg99} giving up after 20
end if
return
end try
end TraiteLeFichier
zefile_ is a file reference grabbed from a choose file call or by a drag_and_drop on the droplet's icon.
It works well except for one detail:
If the submitted file is stored in a folder named "Pictures ƒ" the xx;PICT file is NOT created by Image Events.
It is created if the folder is named "Pictures".
Is it a normal behaviour ?
Yvan KOENIG
_______________________________________________
Do not post admin requests to the list. They will be ignored.
Applescript-users mailing list (email@hidden)
Help/Unsubscribe/Update your Subscription:
This email sent to email@hidden