Afficher une palette flottante dans Smile
Il est possible d'afficher un dialogue en tant que palette flottante de Smile, en définissant sa propriété floating à true lors de la création du dialogue :
set f to FindInMoreStuff("palette gk.bundle")
try
set w to first dialog whose floating is true and path name is f
on error
set w to make new dialog with properties {path name:f, floating:true}
end try
Importer le script
Afficher une palette flottante dans toutes les applications
De la même manière, les dialogues créés avec une propriété utility window à true apparaitront comme des palettes flottantes dans toutes les applications.
set s to "/Applications/Smile/User Scripts/ 1Default user scripts/More Smile commands/_7Programmer/ 2/HexaDeciText.bundle"
set f to (POSIX file s) as alias
try
set w to first dialog whose utility window is true and path name is f
on error
set w to make new dialog with properties {path name:f, utility window:true}
end try
Importer le script
Afficher une palette flottante dans une application spécifique
L'événement switched to est envoyé au contexte de Smile lorsque l'application de premier plan change. Ceci permet de gérer l'affichage d'une palette flottante pour qu'elle ne s'affiche que dans une application donnée. L'exemple suivant (à exécuter dans un terminal AppleScript ou à intégrer dans une bibliothèque de scripts) affichera le dialogue Set type and creator (situé dans le dossier User Scripts de Smile) uniquement dans Finder.
set w to make new dialog with properties {path name:f, utility window:true, visible:false}
on switched to theApp
set s to "/Applications/Smile/User Scripts/ 1Default user scripts/More Smile commands/_7Programmer/ 3/Set type and creator.bundle"
set f to (POSIX file s) as alias
try
set w to first dialog whose utility window is true and path name is f
set visible of w to (theApp is "Finder")
end try
end switched to
Importer le script
|