Re: Search Strings
Re: Search Strings
- Subject: Re: Search Strings
- From: yvan-koenig <email@hidden>
- Date: Fri, 28 Jan 2005 20:41:13 +0100
Hello
As AppleWorks is always in use on my machine, I use this simple handler:
set texte to "Ceci est un essai élémentaire èàùîœæ"
set texteEnMinuscule to my MinMaj(texte, 17)
set texteEnMajuscule to my MinMaj(texte, 16)
display dialog "" & texteEnMinuscule & return & texteEnMajuscule
on MinMaj(T, mi)
set the clipboard to T
tell application "AppleWorks 6"
activate
select menu item 1 of menu item 1 of menu 2 (* nouveau TdT *)
select document 1
tell document 1
select menu item 5 of menu 3 (* Coller *)
select menu item 7 of menu 3 (* Tout Sélectionner *)
select menu item mi of menu item 3 of menu 5
-- select menu item 7 of menu 3
select menu item 3 of menu 3
end tell -- document 1
close document 1 without saving
set T to the clipboard
end tell -- AppleWorks
return T
end MinMaj
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