Archives actuelles avec moteur de recherche
N'hésitez pas à vous inscrire à la liste : http://listes.patpro.net/mailman/listinfo/applescript_fr
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 : lundi 27 novembre 2000 18:49
Objet : applescript_fr Digest #66
Liste AppleScript francophone Digest #66
1) script Icab -2 problemes
by Jacques Chevalier <Keuja@xxxxxxx.fr>
2) test OSAXEN
by serge segu <wirinum@xxxxxxx.fr>
3) Re: masquer/afficher
by Jean-Marie Hoornaert <jean.marie.hoornaert@xxxxxxx.be>
4) Re: masquer/afficher
by Daniel Varlet <varlet@xxxxxxx.ch>
5) Re: test OSAXEN
by Daniel Varlet <varlet@xxxxxxx.ch>
6) Re: script Icab -2 problemes
by Daniel Varlet <varlet@xxxxxxx.ch>
7) Re: Import d'images (Long)
by "lavocat" <daniel.lavocat@xxxxxxx.net>
8) test OSAXEN (sorry)
by serge segu <wirinum@xxxxxxx.fr>
9) Re: test OSAXEN (sorry)
by Patrick Proniewski <patrick.proniewski@xxxxxxx.fr>
10) Re: Import d'images (Long)
by Jean-Marie Hoornaert <jean.marie.hoornaert@xxxxxxx.be>
11) Re: Import d'images (Long)
by "lavocat" <daniel.lavocat@xxxxxxx.net>
12) Re: Import d'images (Long)
by Daniel Varlet <varlet@xxxxxxx.ch>
13) Re: Import d'images (Long)
by Patrick Proniewski <patrick.proniewski@xxxxxxx.fr>
De : Jacques Chevalier <Keuja@xxxxxxx.fr> Date : Sun, 26 Nov 2000 19:40:18 +0100 Objet : [AS] script Icab -2 problemes J'ai deux problèmes avec un script Icab -1- Je n'arrive pas a imprimer une page web a partir du script suivant: ----------------------------- set MaListe to {"http://www.apple.com","http://www.apple.fr" } tell application "FR-iCab 2.2 PPC" repeat with CetElement in MaListe OpenURL CetElement toWindow -1 GetWindowInfo (-1) set LeTitre to item 2 of result print document letitre end repeat end tell ------------------------------ le message d'erreur envoyé par Applescript est le suivant "impossible de rendre les données dans le type attendu" sur la ligne print document titre voici un extrait du dictionnaire Icab Class document: A Document Properties: name international text [r/o] -- the title of the document modified boolean [r/o] -- Has the document been modified since the last save? Remarque: j'ai essayé en mode "record " mais la ligne générée print document "http://www.apple.com" me fait la même erreur ..... -2- de plus si jamais il y a une solution comment faire pour attendre que la page soit complètement chargée avant de lancer l'impression: deuxième extrait du dictionnaire Icab OpenURL: Retrieves URL off the Web. OpenURL string -- Fully specified URL [to file specification] -- File to save downloaded data into. [toWindow integer] -- Window to open this URL into. (Use -1 for top window, 0 for new window) [Flags integer] -- Valid Flags settings are: 1-Ignore the document cache; 2-Ignore the image cache; 4-Operate in background mode. [FormData anything] -- Posting of forms of a given MIMEType. [MIMEType string] -- MIME type for the FormData. [ProgressApp 'psn '] -- If specified, ProgressApp can be named to handle the user interface for process messages. [ResultApp 'psn '] -- When the requested URL has been accessed and all associated documents loaded, the Web browser will issue an OpenURLResult to the ResultApp. Result: integer -- TransactionID Je pense qu'il faut jouer avec ResultApp mais je ne vois pas comment Merci
De : serge segu <wirinum@xxxxxxx.fr> Date : Sun, 26 Nov 2000 22:24:19 +0100 Objet : [AS] test OSAXEN bonjour, sur iMac 350 8.6 les 6 formulations de test d'osaxen ci-dessous fonctionnent sur performa 5400 8.6 : <alias> test 1 osax, <info for> test 1 osax, <list folder> test 1 osax,<list folder> test 2 osaxen fonctionnent et pas les autres !? des test avec MacOS 9.x donnent des resultats contradictoires (= le message OSAX absentes s'affiche même si elles sont presentes) qu'elle est la meilleure formulation du test, qu'en pensez-vous ? merci pour votre aide, serge --<alias> test 1 osax----- set complements to path to scripting additions as string try set filvis to (complements & "File Visibility" as text) as alias display dialog "osax presente" on error display dialog "osax absente" end try --<alias> test 2 osaxen------------ set complements to path to scripting additions as string try set jon to (complements & "Jon’s Commands" as text) as alias set filvis to (complements & "File Visibility" as text) as alias display dialog "osaxen presentes" on error display dialog "osaxen absentes" end try --<info for> test 1 osax------------ set complements to path to scripting additions as string set filvis to (complements & "File Visibility") try info for filvis display dialog "osax presente" on error display dialog "osax absente" end try --<info for> test 2 osaxen----------- set complements to path to scripting additions as string set jon to (complements & "Jon’s Commands") set filvis to (complements & "File Visibility") try info for jon info for filvis display dialog "osaxen presentes" on error display dialog "osaxen absentes" end try --<list folder> test 1 osax----------- set complements to path to scripting additions as string set listOSAXEN to list folder complements if (listOSAXEN contains "File Visibility") then display dialog "osax presente" else display dialog "osax absente" end if --<list folder> test 2 osaxen------------ set complements to path to scripting additions as string set listOSAXEN to list folder complements if (listOSAXEN contains "File Visibility") and (listOSAXEN contains "Jon’s Commands") then display dialog "osaxen presentes" else display dialog "osaxen absentes" end if
De : Jean-Marie Hoornaert <jean.marie.hoornaert@xxxxxxx.be> Date : Sun, 26 Nov 2000 22:48:07 +0100 Objet : [AS] Re: masquer/afficher le 26/11/2000 15:09, Daniel Varlet a écrit : > > > Ë 19:13 +0100 le 25.11.2000, Leclaire Thomas ⁄crivait au sujet de "[AS] > masquer/afficher" : >> Slt >> tout est dans le titre! >> comment masquer ou afficher une app ? >> > > Avec le Finder. > Un exemple pour rendre **toutes** les applis visibles : > [script] > tell application "Finder" > activate > try > set visible of  > (every process whose  > file type is not "FNDR" and  > visible is false)  > to true > on error > end try > end tell > [/script] > > Pour une appli pr⁄cise, donc : > set visible of process Nom_de_l_Application to false -- pour masquer Sous quel système et quelle version d'Applescript ? Sous MacOs 9.0.4 et AppleScript 1.4.3 FR, ceci fonctionne également très bien : [script] tell application "Finder" activate set the visible of ¬ (every process whose file type is "APPL") to true -- ou false end tell [/script] Le Finder n'est pas affecté par cette commande et les fichiers de type "appe" qui tournent en tâche de fond sans apparaître dans le menu "Application" (exemples : "FaxMonitor" ou "Extension Barre des réglages") sont évités. Cordialement. Jean-Marie -HOO;-) ____________________ Courriel : jean.marie.hoornaert@xxxxxxx.be PPsP* : http://users.skynet.be/jmh-h2o * Page Personnelle sans Prétention
De : Daniel Varlet <varlet@xxxxxxx.ch> Date : Mon, 27 Nov 2000 12:05:45 +0100 Objet : [AS] Re: masquer/afficher À 22:48 +0100 le 26.11.2000, Jean-Marie Hoornaert écrivait au sujet de "[AS] Re: masquer/afficher" : [...] >> set visible of  >> (every process whose  >> file type is not "FNDR" and  >> visible is false)  >> to true [... (c'est les digests qui merdent ?)...] > > Sous quel système et quelle version d'Applescript ? OS 8.1, AS 1.1.2 > Sous MacOs 9.0.4 et AppleScript 1.4.3 FR, > ceci fonctionne également très bien : > > [script] > tell application "Finder" > activate > set the visible of ¬ > (every process whose file type is "APPL") to true -- ou false > end tell > [/script] > > Le Finder n'est pas affecté par cette commande et les fichiers de type > "appe" qui tournent en tâche de fond sans apparaître dans le menu > "Application" (exemples : "FaxMonitor" ou "Extension Barre des réglages") > sont évités. Oui, tu as tout à fait raison. C'est même valable pour mon AS 1.1.2 aussi. J'avais du être à l'époque ( quand ?) influencé par ce truc, et j'en ai rajouté ;-): ------------------------------=-=-=--------------------------------------- EXAMPLE In the first version of the Finder scripting software, this script returns a list of all processes except the Finder itself: tell application "Finder" every process end tell In later versions, the list of processes returned includes the Finder. To exclude the Finder, use the statement every process whose file type is not "FNDR". ----------------------------=-=-=----------------------------------------- [source : AS_Finder_Guide.pdf] -- Daniel
De : Daniel Varlet <varlet@xxxxxxx.ch> Date : Mon, 27 Nov 2000 12:06:06 +0100 Objet : [AS] Re: test OSAXEN À 22:24 +0100 le 26.11.2000, serge segu écrivait au sujet de "[AS] test OSAXEN" : > bonjour, > sur iMac 350 8.6 les 6 formulations de test d'osaxen ci-dessous fonctionnent > sur performa 5400 8.6 : <alias> test 1 osax, <info for> test 1 osax, > <list folder> test 1 osax,<list folder> test 2 osaxen fonctionnent et pas > les autres !? > des test avec MacOS 9.x donnent des resultats contradictoires (= le message > OSAX absentes s'affiche même si elles sont presentes) > qu'elle est la meilleure formulation du test, qu'en pensez-vous ? > > merci pour votre aide, > serge Je ne réponds pas directement à ta question. Mais pour des tas de raisons*, AMHA, je crois qu'il est préférable de tester les OSAXS nécéssaires sur une des commandes plutôt que sur le path. Par exemple (piqué dans Dialog Dumper de Dialog Director) : CheckForOsaxen try -- Jon's Commands clipboard info for "DiDi" on error MissingOsax("Jon's Commands") end try try -- Resource Utilities res unique id 0 type "ICON" on error MissingOsax("Resource Utilities") end try try -- Dialog Director dd count dialogs on error MissingOsax("Dialog Director v0.7") end try end CheckForOsaxen MissingOsax(n) display dialog "L'OSAX " & n & "est manquant" end MissingOsax * en particulier des parties d'Osaxs indépendants ont été adoptés par Apple. Exemple parmis d'autres 'set the clipboard' de Jon's Command. Une autre raison l'utilisateur s'amuse à changer le nom de ses Osaxs ;-) -- Daniel
De : Daniel Varlet <varlet@xxxxxxx.ch> Date : Mon, 27 Nov 2000 12:05:58 +0100 Objet : [AS] Re: script Icab -2 problemes À 19:40 +0100 le 26.11.2000, Jacques Chevalier écrivait au sujet de "[AS] script Icab -2 problemes" : > J'ai deux problèmes avec un script Icab > > -1- > Je n'arrive pas a imprimer une page web a partir du script suivant: > > ----------------------------- > set MaListe to {"http://www.apple.com","http://www.apple.fr" } > tell application "FR-iCab 2.2 PPC" > repeat with CetElement in MaListe > OpenURL CetElement toWindow -1 > GetWindowInfo (-1) > set LeTitre to item 2 of result > print document letitre > end repeat > end tell > ------------------------------ > le message d'erreur envoyé par Applescript est le suivant > "impossible de rendre les données dans le type attendu" sur la ligne > print document titre > [...] > -2- > de plus si jamais il y a une solution comment faire pour attendre que la > page soit complètement chargée avant de lancer l'impression: [...] Bon, bien... Hem, hem.... Je ne connaissais pas le dictionnaire de iCab, ben je ne suis pas déçu du voyage... Spécial programmeur. Je précise que je ne le suis pas. Donc tâtonnements... Tes 2 problèmes me paraissent effectivement liés. Tant que la fenêtre n'est pas complètement affichée, pas d'impression possible. Je te propose une solution temporaire (rajouter une boucle), en attendant mieux : [script] set MaListe to {"http://www.apple.com", "http://www.apple.fr"} tell application "FR-iCab 2.2 PPC" repeat with CetElement in MaListe OpenURL CetElement toWindow -1 repeat until not busy of window 1 WaitTicks 10 -- pause de 10 ticks (60 ticks = 1 seconde) -- c'est un osax pour système <8.5 --si OS ≥ 8.5 -> 'delay' en secondes je crois end repeat print document ((GetWindowInfo -1)'s item 2) end repeat end tell [/script] > Je pense qu'il faut jouer avec ResultApp mais je ne vois pas comment Moi non plus :-(( Le seul truc que j'ai trouvé c'est que 'psn ' est de type 'application NomAppli'. Donc un truc du genre : blablabla ResultApp application "FR-iCab 2.2 PPC" Pas plus avancé... retourne un ID de transaction quand même... Regarde peut-être sur le site d'iCab, ou sur la mailing liste de Canard plus. A+ -- Daniel
De : "lavocat" <daniel.lavocat@xxxxxxx.net> Date : Mon, 27 Nov 2000 12:50:13 +0100 Objet : [AS] Re: Import d'images (Long) Bonjour, Pour mon script de récupération de lien pour l'import d'images ; je me suis donc servi du script de Jean-Marie Hoornaert Qu'il en soit ici remercié. J'y ai apporté quelques modifs afin que cela fonctionne correctement Voici donc mon script actuel et j'ai quelques questions : set FolderPath to (choose folder with prompt  " Choississez le dossier contenant les images ") set Les_images to (list folder FolderPath) repeat with Index_image in Les_images set Chemin_vers_image to ((FolderPath as string) & Index_image) set AppleScript's text item delimiters to ".jpg" set Mon_index to text items of Index_image set AppleScript's text item delimiters to "" set Index_Sans_Suffixe to Mon_index as string tell application "FileMaker Pro" try set cell "Image" of (every record of database  "Timbres_De_Service" whose cell "Numéro Ceres" = Index_Sans_Suffixe)  to file Chemin_vers_image end try end tell end repeat tell application "FileMaker Pro" show (every record of database "Timbres_De_Service") end tell Rappel : J'ai un dossier contenant des images ; les fichiers étant suffixés par .jpg ; Fichiers genre 0001.jpg ;0002.jpg etc 1ère question : J'ai ajouté set applescript's delimiters comme vous le voyez et, entre chaque ligne j'avais ajouté un display dialog pour visualiser le contenu des variables ce qui donne : set AppleScript's text item delimiters to ".jpg" set Mon_index to text items of Index_image Display dialog " mon index " default answer (Mon_index) as string Là ; mon index affiche toujours 0001.jpg set AppleScript's text item delimiters to "" set Index_Sans_Suffixe to Mon_index as string Là Index_Sans_Suffixe affiche bien 0001 c'est à dire sans le suffixe. Or je croyais (voir l'admirable cours sur le site de Patpro ) que le fait de valider en delimiters to " .jpg " supprimait en fait le .jpg J'ai donc loupé une marche pourquoi à mon premier dispaly dialog je ne récupère pas 0001 (sans suffixe) ? Merci de bien vouloir détailler. 2ème question : Pour Jean-Marie plus particulièrement je pense : set cell "Image" of (every record of database  "Timbres_De_Service" whose cell "Numéro Ceres" = Index_Sans_Suffixe)  to file Chemin_vers_image Qu'est-ce que cela fait très exactement ? C'est à dire ma compréhension est : J'ai un champ dans FMpro nommé Numéro Ceres Je prends le contenu de ce champ et je cherche dans TOUT le dossier image donné si il existe une image avec le même nom ( en fait le nom sans suffixe ) Si oui alors je copie le chemin de cette image dans le champ " image " de la base FMPro Sinon je passe à la fiche suivante d ns Fmpro Est-ce cela fait très exactement ça ? PS les  = retour à la ligne Merci par avance de vos explications détaillées. Je sais que ce mail est long mais je pense que cela intéressera beaucoup de personnes Sinon mes excuses ========================================== Daniel Lavocat Infrastructure & Systems Division /Research & Development /Networking & Security /Technical Projects Manager BULL-SA BP68 PC E1 1F 47 Rue Jean Jaurès 78340 Les Clayes / Bois Tél : 33-(0)1 30 80 70 24 Fax : 33-(0)1 30 80 65 40 mailto:Daniel.Lavocat@xxxxxxx.Net ========================================== -----Message d'origine----- De: Liste AppleScript francophone [mailto:applescript_fr@xxxxxxx.net] De la part de Jean-Marie Hoornaert Date: mardi 21 novembre 2000 23:14 À: Liste AppleScript francophone Objet: [AS] Re: Import d'images Bonsoir, le 21/11/2000 16:47, lavocat a écrit : > > Bonjour, > Je suis toujours sur ma gestion des timbres. > J'ai une base FilMaker (v5) et un dossier contenant des images de timbres > J'ai donc (grâce à la liste d'ailleurs) un script qui me permet de créer des > fiches dans mon fichier et dans la fiche créée d'y ajouter le chemin d'une > image correspondante. > > Voilà j'ai donc : > Un fichier FMPro avec un champ " N°_Image " de type nombre et un champ " > Image " de type multimédia. > Un dossier quelque part sur un disque contenant des images suffixées par > ..jpg ( ou .PIC mais cela n'a pas d'importance) > Pour chaque image je dois avoir une fiche qui correspond mais je peux avoir > beaucoup plus de fiches que d'images > > Vous me suivez toujours ? > Bien je continue > > Je voudrais fair un script qui me permettrai de faire : > > Sélectionner le dossier contenant les images > Set FolderPath to (choose folder with prompt " Choississez le dossier > contenant les images " ) > Puis j'aimerai faire quelque chose du genre > Repéter jusqu'à la dernière fiche > Lire le champ " N°_Image " dans FMPro > Si dans dossier image le fichier " N°_Image " & " .jpg " existe > Alors importer le chemin de cette image dans le champ " image " de la fiche > en cours > Fin de si > Fiche suivante > Fin de repeat > Avec un fichier "Images" contenant deux rubriques comme dans la demande. Un AppleScript (à tester et completer...) [Script] set FolderPath to (choose folder with prompt ¬ " Choississez le dossier contenant les images ") set Les_images to (list folder FolderPath) repeat with l_image in Les_images set Chemin_vers_image to ((FolderPath as string) & l_image) tell application "FileMaker Pro" try set cell "image" of (every record of database "Images"¬ whose cell "N°_Image cl" = l_image) ¬ to file Chemin_vers_image end try end tell end repeat tell application "FileMaker Pro" show (every record of database "Images") end tell [/Script] Cordialement. Jean-Marie -HOO;-) ____________________ Courriel : jean.marie.hoornaert@xxxxxxx.be PPsP* : http://users.skynet.be/jmh-h2o * Page Personnelle sans Prétention -- Pour vous désinscrire ou régler les options de votre abonnement : http://www.macplus.net/ML/AS_fr.shtml
De : serge segu <wirinum@xxxxxxx.fr> Date : Mon, 27 Nov 2000 13:07:59 +0100 Objet : [AS] test OSAXEN (sorry) excusez pour le derrangement, les 6 tests marchent c'était juste une question d'espace incongru dans le nom des fichier :-( "File Visibility " :-( "File Visibility" OK -- serge ségu
De : Patrick Proniewski <patrick.proniewski@xxxxxxx.fr> Date : Mon, 27 Nov 2000 14:43:06 +0100 Objet : [AS] Re: test OSAXEN (sorry) le 27/11/00 13:07, serge segu à wirinum@xxxxxxx.fr a écrit : > > > excusez pour le derrangement, les 6 tests marchent c'était juste une > question d'espace incongru dans le nom des fichier :-( > > "File Visibility " :-( > "File Visibility" OK pas grave, certains seront surement content des bouts de scripts proposés :-) ca peut servir a tout le monde patpro -- "Rien ne se perd, rien ne se crée, tout s'empile" - Mon Bureau -
De : Jean-Marie Hoornaert <jean.marie.hoornaert@xxxxxxx.be> Date : Mon, 27 Nov 2000 15:59:54 +0100 Objet : [AS] Re: Import d'images (Long) le 27/11/2000 12:50, lavocat à daniel.lavocat@xxxxxxx.net a écrit : > 2ème question : > > Pour Jean-Marie plus particulièrement je pense : > > set cell "Image" of (every record of database  > "Timbres_De_Service" whose cell "Numéro Ceres" = Index_Sans_Suffixe)  > to file Chemin_vers_image > > Qu'est-ce que cela fait très exactement ? > C'est à dire ma compréhension est : > > J'ai un champ dans FMpro nommé Numéro Ceres > Je prends le contenu de ce champ et je cherche dans TOUT le dossier image > donné si il existe une image avec le même nom ( en fait le nom sans > suffixe ) > Si oui alors je copie le chemin de cette image dans le champ " image " de > la base FMPro > Sinon je passe à la fiche suivante dans Fmpro Non, sinon, tu passe à l'image suivante de la liste Les_images. En effet, par le script, tu passe en revue le contenu du fichier FolderPath et tu vois s'il y a dans la base FileMaker un fiche qui correspond à l'image traitée (Index_Sans_Suffixe). Tu peux éventuellement remplacer la phrase set Les_images to (list folder FolderPath) par tell application "Finder" set Les_images to the name of ¬ (every file of FolderPath whose file type is "JPEG") as list end tell C'est un peu plus lent, mais s'il y a autre chose que du jpeg dans la liste, tu passe outre. Ceci suite à une première lecture rapide... Cordialement. Jean-Marie -HOO;-) __________________ courriel : jean.marie.hoornaert@xxxxxxx.be Page personnelle sans prétention : http://users.skynet.be/jmh-h2o
De : "lavocat" <daniel.lavocat@xxxxxxx.net> Date : Mon, 27 Nov 2000 16:02:44 +0100 Objet : [AS] Re: Import d'images (Long) Merci Jean Marie de cette réponse rapide Mais alors comment faire l'inverse C'est à dire je prend la 1ère fiche dans FMPro Je copy la valeur du champ " N° " Je recherche dans le dossier image si une image correspond Si oui j'importe le lien Sinon je passe à la fiche suivante Merci par avance ========================================== Daniel Lavocat Tél : 33-(0)1 30 80 70 24 Fax : 33-(0)1 30 80 65 40 mailto:Daniel.Lavocat@xxxxxxx.Net ========================================== -----Message d'origine----- De: Liste AppleScript francophone [mailto:applescript_fr@xxxxxxx.net] De la part de Jean-Marie Hoornaert Date: lundi 27 novembre 2000 16:00 À: Liste AppleScript francophone Objet: [AS] Re: Import d'images (Long) le 27/11/2000 12:50, lavocat à daniel.lavocat@xxxxxxx.net a écrit : > 2ème question : > > Pour Jean-Marie plus particulièrement je pense : > > set cell "Image" of (every record of database  > "Timbres_De_Service" whose cell "Numéro Ceres" = Index_Sans_Suffixe)  > to file Chemin_vers_image > > Qu'est-ce que cela fait très exactement ? > C'est à dire ma compréhension est : > > J'ai un champ dans FMpro nommé Numéro Ceres > Je prends le contenu de ce champ et je cherche dans TOUT le dossier image > donné si il existe une image avec le même nom ( en fait le nom sans > suffixe ) > Si oui alors je copie le chemin de cette image dans le champ " image " de > la base FMPro > Sinon je passe à la fiche suivante dans Fmpro Non, sinon, tu passe à l'image suivante de la liste Les_images. En effet, par le script, tu passe en revue le contenu du fichier FolderPath et tu vois s'il y a dans la base FileMaker un fiche qui correspond à l'image traitée (Index_Sans_Suffixe). Tu peux éventuellement remplacer la phrase set Les_images to (list folder FolderPath) par tell application "Finder" set Les_images to the name of ¬ (every file of FolderPath whose file type is "JPEG") as list end tell C'est un peu plus lent, mais s'il y a autre chose que du jpeg dans la liste, tu passe outre. Ceci suite à une première lecture rapide... Cordialement. Jean-Marie -HOO;-) __________________ courriel : jean.marie.hoornaert@xxxxxxx.be Page personnelle sans prétention : http://users.skynet.be/jmh-h2o -- Pour vous désinscrire ou régler les options de votre abonnement : http://www.macplus.net/ML/AS_fr.shtml
De : Daniel Varlet <varlet@xxxxxxx.ch> Date : Mon, 27 Nov 2000 17:52:04 +0100 Objet : [AS] Re: Import d'images (Long) À 12:50 +0100 le 27.11.2000, lavocat écrivait au sujet de "[AS] Re: Import d'images (Long)" : > 1ère question : > J'ai ajouté set applescript's delimiters comme vous le voyez et, entre > chaque ligne j'avais ajouté un display dialog pour visualiser le contenu des > variables ce qui donne : > > set AppleScript's text item delimiters to ".jpg" > set Mon_index to text items of Index_image > Display dialog " mon index " default answer (Mon_index) as string > Là ; mon index affiche toujours 0001.jpg > set AppleScript's text item delimiters to "" > set Index_Sans_Suffixe to Mon_index as string > Là Index_Sans_Suffixe affiche bien 0001 c'est à dire sans le suffixe. > > Or je croyais (voir l'admirable cours sur le site de Patpro ) que le fait de > valider en delimiters to " .jpg " supprimait en fait le .jpg > > J'ai donc loupé une marche pourquoi à mon premier dispaly dialog je ne > récupère pas 0001 (sans suffixe) ? > > Merci de bien vouloir détailler. Vi. On y va donc pas à pas (c'est vrai que ce n'est pas évident au début) : set Index_image to "001.jpg" set AppleScript's text item delimiters to ".jpg" set Mon_index to text items of Index_image return Mon_index -- résultat : {"001", ""} -> Une liste d'éléments de texte Ce premier résultat est bien une liste de text items. Mais tu es **toujours** avec le delimiter ".jpg". Donc, si tu retransformes la liste en un texte ça _redonne_ : return Mon_index as string --resultat : "001.jpg" Les virgules de la liste redeviennent ".jpg". (j'ai trouvé ça comme image...) D'où l'obligation de changer de nouveau le delimiter. En 'rien du tout' cette fois (c'est celui d'origine) : set AppleScript's text item delimiters to "" return Mon_index --resultat : {"001", ""}-- la liste est la même, heureusement ;-) return Mon_index as string -- -- résultat : "001" AppleScript se sert ici du **nouveau** delimiter pour concaténer les éléments de la liste en un texte. Hope ça éclaircit. -- Daniel
De : Patrick Proniewski <patrick.proniewski@xxxxxxx.fr> Date : Mon, 27 Nov 2000 18:13:42 +0100 Objet : [AS] Re: Import d'images (Long) Je réponds en publique ca peut interesser des gens le 27/11/00 12:50, lavocat à daniel.lavocat@xxxxxxx.net a écrit : > 1ère question : > J'ai ajouté set applescript's delimiters comme vous le voyez et, entre > chaque ligne j'avais ajouté un display dialog pour visualiser le contenu des > variables ce qui donne : > > set AppleScript's text item delimiters to ".jpg" > set Mon_index to text items of Index_image > Display dialog " mon index " default answer (Mon_index) as string > Là ; mon index affiche toujours 0001.jpg > set AppleScript's text item delimiters to "" > set Index_Sans_Suffixe to Mon_index as string > Là Index_Sans_Suffixe affiche bien 0001 c'est à dire sans le suffixe. > > Or je croyais (voir l'admirable cours sur le site de Patpro ) que le fait de > valider en delimiters to " .jpg " supprimait en fait le .jpg > > J'ai donc loupé une marche pourquoi à mon premier dispaly dialog je ne > récupère pas 0001 (sans suffixe) ? > > Merci de bien vouloir détailler. alors ton analyse est bonne, si le délimiteur est ".jpg" ce string précis est éliminé. MAIS ! tant que le délimiteur est égal à ".jpg", tout string que tu formeras par concaténation contiendra le ".jpg" par exemple : set MonString to "ahaha" set AppleScript's text item delimiters to "h" set MaList to text items of MonString set MonStringOriginal to MaList as string -- donne "ahaha" set AppleScript's text item delimiters to "(point d'insertion)" set MonAutreString to MaList as string -- donne "a(point d'insertion)a(point d'insertion)a" voila l'explication :-) patpro -- "Rien ne se perd, rien ne se crée, tout s'empile" - Mon Bureau -