Cette solution fonctionne, mais il reste évidemment plus simple pour un usage ponctuel, (on ne formatte pas les contacts tous les matins !) de compiler et lancer le script après avoir ouvert « Contacts ».
On évite ainsi d’avoir à autoriser l’accès à l’application, (un clic) et aussi l’inconvénient d’avoir la fenêtre de dialogue ouverte par le script masquée derrière le fenêtre de « Contacts », ce qui provoque un blocage, facilement levé en cliquant dans le dock sur l’icône de l’application, (un 2° clic), le dialogue réapparait au premier plan. Ceci est sans doute évitable par une légère modification du script, mais j’ai oublié comment faire.
En fait, comme j’utilise pratiquement les scripts uniquement pour la productivité personnelle, je les sauvegarde le plus souvent avec extension .applescript ce qui me permet de voir le code avant de les lancer manuellement et au besoin de faire une adaptation pour un usage local ou un essai. C’est loin d’un usage professionnel….
Merci encore…..
> Le 7 janv. 2020 à 21:10, Yvan KOENIG via Applescript_fr <applescript_fr@???> a écrit :
>
> Je suis têtu.
> Il suffit peut-être d'augmenter la valeur attribuée à delay afin de laisser du temps à Contacts pour s'ouvrir.
>
> -- Début script
> set p2Aux to ((path to desktop as text) & "4Contacts.app") as alias
>
> set p2Contacts to ((path to applications folder as text) & "Contacts.app") as alias
> tell application "Finder"
> open p2Contacts
> delay 1 -- ou plus >>>>>>>>>>>>>>
> open p2Aux
> end tell
> -- fin script
>
>
> ou mieux, avec une routine qui vérifie que Contacts est ouvert
>
> -- Début script
> set p2Aux to ((path to desktop as text) & "4Contacts.app") as alias
>
> set p2Contacts to ((path to applications folder as text) & "Contacts.app") as alias
> tell application "Finder"
> open p2Contacts
> my wait4Contacts()
> open p2Aux
> end tell
>
> on wait4Contacts()
> tell application "System Events"
> repeat 50 times -- je suis pessimiste
> set theProcesses to name of processes
> if theProcesses contains "Contacts" then
> set maybe to frontmost of process "Contacts"
> if maybe then exit repeat -- Contacts est ouvert et au premier plan
> exit repeat
> delay 0.5
> end if
> end repeat
> end tell
> end wait4Contacts
> -- fin script
>
> Yvan KOENIG (VALLAURIS, France) mardi 7 janvier 2020 21:10:37
> _______________________________________________
> Applescript_fr mailing list
> Applescript_fr@???
> http://listes.patpro.net/mailman/listinfo/applescript_fr
_______________________________________________
Applescript_fr mailing list
Applescript_fr@???
http://listes.patpro.net/mailman/listinfo/applescript_fr
