Apple, AppleScript, AppleScript Studio, AppleTalk, AppleWorks, ColorSync, Finder, HyperCard, iBook, iLife, iMac, iWork, Keynote, Mac, Macintosh, Mac OS, Pages, Panther, PowerBook, Power Mac, Power Macintosh, QuickTime, Safari, Tiger, Xcode sont des marques déposées par Apple Computer, Inc., enregistrées aux Etats-Unis et dans les autres pays. Liste officielle

De : (Liste AppleScript francophone) <applescript_fr@xxxxxxx.net>
À : "(Liste AppleScript francophone)" <applescript_fr@xxxxxxx.net>
Date : mercredi 8 novembre 2000 18:39
Objet : applescript_fr Digest #48


        Liste AppleScript francophone Digest #48

 1) Re: Problème     étrange "set creator type" (Finder)
    by Dominique Delefortrie <domi59@xxxxxxx.fr>
 2) Label name
    by Dominique Delefortrie <domi59@xxxxxxx.fr>
 3) Re: Problème    étrange "set	creator type" (Finder)
    by Jean-Marie Hoornaert <jean.marie.hoornaert@xxxxxxx.be>
 4) Re: Label name
    by Jean-Marie Hoornaert <jean.marie.hoornaert@xxxxxxx.be>
 5) DropStuff™  OK
    by serge segu <wirinum@xxxxxxx.fr>
 6) Re: Problème      étrange "set creator type" (Finder)
    by Daniel Varlet <varlet@xxxxxxx.ch>

De : Dominique Delefortrie <domi59@xxxxxxx.fr>
Date : Tue, 7 Nov 2000 19:20:15 +0100
Objet : [AS] Re: Problème    étrange "set creator type" (Finder)

Jean-Marie Hoornaert ecrivait / wrote:

> J'ai essayé le script avec MacOs 9.0.4 Fr - Applescript 1.4.3 - Smile 1.7.3
> et je n'ai rencontré aucun problème : convertion parfaite !

Conversion ? il faut "convertir" quand on passe à Mac OS 9 ??

Ceci dit, moi non plus je n'ai rencontré aucun problème pour le faire
marcher après l'avoir créé -- ça a été à la session suivante que ça n'a
plus marché ;->

domi  (-8
mailto:domi59@xxxxxxx.fr





De : Dominique Delefortrie <domi59@xxxxxxx.fr>
Date : Tue, 7 Nov 2000 19:20:15 +0100
Objet : [AS] Label name

Toujours pour servir avec OSA Menu, j'ai écrit un script pour modifier
rapidement la famille de la sélection dans le Finder

-- j'utilise pas mal les "familles" pour gérer mes fichiers/dossiers (à
sauvegarder, en cours…)

D'abord le plus simple :

=====
tell app "Finder" to set label index of selection to 7
=====

Ensuite je voudrais avoir un choix -- plus de 3 choix possibles, donc pas
possible avec des boutons ; j'ai donc écrit ça :

=====
tell application "Finder"
	set lemsg to "Numéro de famille:" & return & ¬
		"0 = Aucune" & return & ¬
		"1 = Attention !" & return & ¬
		"3 = C'est fait" & return & ¬
		"6 = Archiver" & return & ¬
		"7 = Sauvegarder"
	display dialog lemsg default answer "0"
	set lechoix to the text returned of the result
	if lechoix is in {"0", "1", "2", "3", "4", "5", "6", "7"} then set
label index of selection to lechoix
end tell
=====

J'ai bien écrit un petit mémo pour avoir la correspondance entre les noms
des labels et leur index [lemsg] ... mais serait-il possible d'obtenir les
noms des labels par script ?

Avec Smile, si je tape :

=====
name of label index 1
=====

j'obtiens un message d'erreur : "Un number ne peut aller après ce property"
(sic, en français dans le texte ;-))

avec : label index of folder 1, j'ai bien le résultat

avec : label name of folder 1, j'ai une erreur ! "impossible d'obtenir
label "Finder" of folder 1"

J'ai jeté un coup d'oeil dans le dico du Finder, mais je ne vois pas
comment lui faire donner la liste (personnalisée) des labels...

domi  (-8
mailto:domi59@xxxxxxx.fr





De : Jean-Marie Hoornaert <jean.marie.hoornaert@xxxxxxx.be>
Date : Tue, 07 Nov 2000 20:22:53 +0100
Objet : [AS] Re: Problème    étrange "set creator type" (Finder)

le 7/11/2000 19:20, Dominique Delefortrie a écrit :

> 
> 
> Jean-Marie Hoornaert ecrivait / wrote:
> 
>> J'ai essayé le script avec MacOs 9.0.4 Fr - Applescript 1.4.3 - Smile 1.7.3
>> et je n'ai rencontré aucun problème : convertion parfaite !
> 
> Conversion ? il faut "convertir" quand on passe à Mac OS 9 ??
> 
> Ceci dit, moi non plus je n'ai rencontré aucun problème pour le faire
> marcher après l'avoir créé -- ça a été à la session suivante que ça n'a
> plus marché ;->
> 
> domi  (-8
> mailto:domi59@xxxxxxx.fr
> 

Pardon, "conversion" n'est pas le bon terme : je voulais dire que chaque
fois le code créateur avait été modifié correctement.

Cordialement.

Jean-Marie -HOO;-)

____________________
Courriel : jean.marie.hoornaert@xxxxxxx.be
PPsP* : http://users.skynet.be/jmh-h2o
* Page Personnelle sans Prétention





De : Jean-Marie Hoornaert <jean.marie.hoornaert@xxxxxxx.be>
Date : Tue, 07 Nov 2000 20:42:37 +0100
Objet : [AS] Re: Label name

le 7/11/2000 19:20, Dominique Delefortrie a écrit :

> 
> 
> Toujours pour servir avec OSA Menu, j'ai écrit un script pour modifier
> rapidement la famille de la sélection dans le Finder
> 
> -- j'utilise pas mal les "familles" pour gérer mes fichiers/dossiers (à
> sauvegarder, en cours…)
> 
> D'abord le plus simple :
> 
> =====
> tell app "Finder" to set label index of selection to 7
> =====
> 
> Ensuite je voudrais avoir un choix -- plus de 3 choix possibles, donc pas
> possible avec des boutons ; j'ai donc écrit ça :
> 
> =====
> tell application "Finder"
> set lemsg to "Numéro de famille:" & return & ¬
> "0 = Aucune" & return & ¬
> "1 = Attention !" & return & ¬
> "3 = C'est fait" & return & ¬
> "6 = Archiver" & return & ¬
> "7 = Sauvegarder"
> display dialog lemsg default answer "0"
> set lechoix to the text returned of the result
> if lechoix is in {"0", "1", "2", "3", "4", "5", "6", "7"} then set
> label index of selection to lechoix
> end tell
> =====
> 
> J'ai bien écrit un petit mémo pour avoir la correspondance entre les noms
> des labels et leur index [lemsg] ... mais serait-il possible d'obtenir les
> noms des labels par script ?
> 
> Avec Smile, si je tape :
> 
> =====
> name of label index 1
> =====
> 
> j'obtiens un message d'erreur : "Un number ne peut aller après ce property"
> (sic, en français dans le texte ;-))
> 
> avec : label index of folder 1, j'ai bien le résultat
> 
> avec : label name of folder 1, j'ai une erreur ! "impossible d'obtenir
> label "Finder" of folder 1"
> 
> J'ai jeté un coup d'oeil dans le dico du Finder, mais je ne vois pas
> comment lui faire donner la liste (personnalisée) des labels...
> 
> 
> domi  (-8
> mailto:domi59@xxxxxxx.fr
> 
Inspiré du script envoyé par Daniel Varlet

set F01 to choose folder
tell application "Finder"
    set lbl to label index of F01
    set nomLabel to item lbl of ¬
        {¬
            name of label 1, ¬
            name of label 2, ¬
            name of label 3, ¬
            name of label 4, ¬
            name of label 5, ¬
            name of label 6, ¬
            name of label 7 ¬
            } of Finder preferences
end tell

un script qui donne simplement la liste des noms des labels

tell application "Finder"
    set nomLabel to {}
    repeat with i from 1 to 7
        set nomLabel to ¬
           (nomLabel & ((name of label i of Finder preferences) as list))
    end repeat
end tell

Jean-Marie -HOO;-)

____________________
Courriel : jean.marie.hoornaert@xxxxxxx.be
PPsP* : http://users.skynet.be/jmh-h2o
* Page Personnelle sans Prétention





De : serge segu <wirinum@xxxxxxx.fr>
Date : Tue, 07 Nov 2000 21:08:32 +0100
Objet : [AS] DropStuff™  OK

merci à tous  
Daniel 
Jean-Marie 
Alberto 

:-)
-- 
serge ségu (Châteaudun - Fr)
wirinum@xxxxxxx.fr





De : Daniel Varlet <varlet@xxxxxxx.ch>
Date : Wed, 8 Nov 2000 17:45:40 +0100
Objet : [AS] Re: Problème      étrange "set creator type" (Finder)

À 19:20 +0100 le 07.11.2000, Dominique Delefortrie écrivait au sujet de
"[AS] Re: Problème" :

> Ceci dit, moi non plus je n'ai rencontré aucun problème pour le faire
> marcher après l'avoir créé -- ça a été à la session suivante que ça n'a
> plus marché ;->

Tu as résolu ton problème ?
Ça marche chez moi sans problème et plusieurs fois en 8.6 avec OSA
menu, en script compilé.

Note culturelle ;-) pour OS < 8.5  (pour ceusses qui tendent à la
compatibilité descendante) :
La conversion" document file as texte " ne fonctionne pas avec Finder
D'ailleurs la ligne :
if ((class of fichier) as text) is "document file" then
peut très bien s'écrire :
if class of fichier is document file then

say -> speak

Rappel de ton script :
[script]
tell application "Finder"
	repeat with fichier in selection
		if ((class of fichier) as text) is "document file" then
			if file type of fichier is "TEXT" then
				set creator type of fichier to "TBB6"
			else
				say "Bad type!"
			end if
		else
			say "Not a file!"
		end if
	end repeat
end tell
[/script]

-- 
Daniel