Path: ...!news.mixmin.net!weretis.net!feeder8.news.weretis.net!3.eu.feeder.erje.net!feeder.erje.net!news.alphanet.ch!alphanet.ch!.POSTED.aannecy-652-1-11-48.w86-209.abo.wanadoo.fr!josephb
From: josephb@nowhere.invalid (Joseph-B)
Newsgroups: fr.comp.sys.mac.programmation
Subject: Re: Comment passer SignAuPif =?ISO-8859-1?Q?=E0_la_vitesse_sup?=
 =?ISO-8859-1?Q?=E9rieure=A0=3F?=
Date: Thu, 10 Feb 2022 23:43:25 +0100
Organization: Aucune
Sender: joseph25b@aannecy-652-1-11-48.w86-209.abo.wanadoo.fr
Message-ID: <1pn6oob.1jnbeqy11ey2yoN%josephb@nowhere.invalid>
References: <stj4f8$iuq$1@shakotay.alphanet.ch> <1pn64p7.1256jl67qvsrlN%gd2512@free.fr> <su41vm$5vh$1@shakotay.alphanet.ch>
Mime-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Injection-Info: shakotay.alphanet.ch; posting-host="aannecy-652-1-11-48.w86-209.abo.wanadoo.fr:86.209.24.48";
	logging-data="16957"; mail-complaints-to="usenet@alphanet.ch"
User-Agent: MacSOUP/F-2.8.4 (6da4d6e6d0) (Mac OS X version 10.11.6 (x86))
X-NO-ARCHIVE: YES
Bytes: 2947
Lines: 39

"Benoît L." <benoit@com.invalid> wrote:

> Cela étant, faire une version sans interface, juste un raccourci-clavier
> qui lance le script pourquoi pas.

je te propose une autre solution à interface minimaliste de sélection au hasard d'une GMP.
Ce qui te chagrinait c'était les coupures de lignes dans le display dialog ? Là, c'est réglé.

Dans le script que tu as posté l'autre jour, tu vas changer tout le bloc [repeat… end repeat] existant par celui que je te mets en dessous et tu essaies. 
Regarde ce qui est dans le presse-papier.
Ce n'est pas très conventionnel mais ça peut marcher ?  (tu fixeras la largeur de la boite à ta convenance)
Un Dble-Click dans la boite et ça te présente un autre GMP.

Si ça te convient, après tu verras à étendre avec un dialogue modal à 3 boutons ce que tu veux faire avec ce qui est dans le presse-papier.


########################

repeat
   set SignatureString to some item of theSignatureList as text
   log SignatureString
   set AppleScript's text item delimiters to "¬"
   set tempSig to every text item of SignatureString
   log tempSig
   set AppleScript's text item delimiters to linefeed
   set finalSig to every text item of tempSig as text
   set the clipboard to finalSig
   set widthForced to {"*******************************************************************************************************"}
   set ShowList to widthForced & tempSig as list
   set textChoosen to choose from list ShowList with title "Signature GMP" with prompt "La citation affichée est copiée dans le Presse-Papier" OK button name "Choisir Autre GMP" cancel button name "Accepter"
   if textChoosen = false then exit repeat
end repeat

########################


N'y a pas de quoi

-- 
J. B.