Attribuer une famille de polices monospécifiques au texte sélectionné à l'aide d'un raccourci clavier dans mac os x

Je ne connais pas de moyen d'accéder à l'ensemble du système pour script le panneau des polices, mais voici quelques moyens d'accéder rapidement aux polices monospaciales dans Mail.app

Méthode 1 : Planifier un message texte

Allez dans les préférences de Mail.app > Polices et couleurs et cochez la case "Utiliser une police à largeur fixe pour les messages en texte brut"

Désormais, lorsque vous êtes dans un message et que vous souhaitez utiliser une police monospatiale, il vous suffit de cliquer sur : Command - Shift - T et vous pouvez alterner entre la police à largeur fixe de votre choix et votre police standard (message en texte simple et texte enrichi).

L'inconvénient de cette méthode est que si le destinataire n'a pas réglé sa police sur une largeur fixe, il risque de ne pas voir le message comme prévu.

Méthode 2 : Définir la police avec Applescript

La deuxième façon de procéder consiste à créer un nouveau message en choisissant la bonne police de caractères à l'aide d'Applescript. Vous pouvez procéder comme suit :

tell application "Mail"
    set outgoingMessage to make new outgoing message
    set fontFace to "Times"
    tell outgoingMessage
        set the content to " "
        set font of content to fontFace
        set size of content to (14)
        set visible to true
    end tell
end tell

Vous devez définir le contenu avec ce script. Il semble que Mail ne vous permette pas de définir la police d'un message vide.

Méthode 3 : Utiliser TextExpander

Cette méthode coûte de l'argent, mais elle peut vous donner ce que vous recherchez. Vous pourriez mettre en place quelques TextExpander ($34.99 USD sur l'app store) des raccourcis pour les caractères à largeur fixe et les caractères normaux afin que vous puissiez passer de l'un à l'autre en tapant quelques caractères.

TextExpander vous permet d'insérer du texte enrichi (texte avec une police, une couleur, un style, etc.). Il vous suffit de créer un extrait de type Texte formaté, Images et de définir une police pour le texte que vous allez insérer. Vous devrez inclure au moins un espace pour que cette stratégie fonctionne.

Vous devrez inclure dans vos extraits au moins un espace pour que la police soit prise en compte.

Ce que j'ai fini par utiliser, c'est la spécification manuelle de l'espace monospacial dans un texte, puis l'utilisation de la fonction Format -> Style de copie (Option+Cmd+C) qui copie le format mais pas le texte. Sélectionnez ensuite un autre texte brut et Format->Coller le style (Option+Cmd+V) qui attribue ce format à la sélection. Après le redémarrage, il faut recommencer, et cela ne fonctionne que pour un seul style, mais cela répond à mes besoins.

Copier un personnage avec un style spécifique :

echo "<span style=\"font:14px 'Monaco'\">&nbsp;</span>" | textutil -format html -convert rtf -stdin -stdout | pbcopy -Prefer rtf

pbcopy -Prefer rtf n'inclut pas les données en texte brut, de sorte que le collage ne fonctionnera que dans les affichages en texte enrichi.

Insérer un personnage avec un style spécifique :

try
    try
        set old to the clipboard
    end try
    set html to quoted form of "<span style=\"font:14px 'Monaco'\">&nbsp;</span>"
    do shell script "echo " & html & " | textutil -format html -convert rtf -stdin -stdout | pbcopy -Prefer rtf"
    tell application "System Events" to keystroke "v" using command down
    delay 0.03
    set the clipboard to old
end try

Style collé :

try
    try
        set old to the clipboard
    end try
    tell application "System Events" to keystroke "c" using command down
    delay 0.03
    set input to Unicode text of (the clipboard as record)
    set txt to quoted form of ("<span style=\"font:14px 'Monaco'\">" & input & "</span>")
    do shell script "echo " & txt & " | textutil -format html -convert rtf -stdin -stdout | pbcopy -Prefer rtf"
    tell application "System Events" to keystroke "v" using command down
    delay 0.03
    set the clipboard to old
end try