Où sont les fichiers de Macro

Bonjour,

À quel endroit sont installés les fichiers (ou le fichier) de macro ? J’ai besoin de modifier celui-ci, mais je ne le trouve pas.

Merci à l’avance de votre aide

Francois Cloutier
Concepts logiques 4DI inc.

Comme j’ai le même problème, je demande à 4D. Le chemin des macros est https://forums.4d.com/Post/FR/28836328/1/28837054#28837054ligne 47>.

Tant qu’à faire, le même en v17 :
<code 4D>
//Dev_show4Dfolder
C_TEXTE($values_t)
C_TEXTE($choix_t)
C_TEXTE($path_t)
C_COLLECTION($menu_c)

$menu_c:=Créer collection
$menu_c.push(Nom commande(491)) //Fichier application
$menu_c.push(Nom commande(489)) //Fichier structure, si client = ressources locales
$menu_c.push(Nom commande(490)) //Fichier donnees, #TODO : pas de sens en C/S…
$menu_c.push(“Active 4D”) //Dossier 4D actif
$menu_c.push(“Base”) //Dossier base
$menu_c.push(“Base client”) //Dossier base 4D Client
$menu_c.push(“HTML”) //Dossier racine HTML
$menu_c.push(“Licenses”) //Dossier Licenses
$menu_c.push(“Logs”) //Dossier Logs
$menu_c.push(“Macros”) //Dossier des macros
$menu_c.push(“Resources”) //Dossier Resources courant
$menu_c.push(“Preferences4D”) //Dossier Préférences 4D
$menu_c.push(Nom commande(486)) //Dossier temporaire
$menu_c.push(“Recent”) //Dossier des bases récentes
$i_l:=Pop up menu($menu_c.join(";"))
Si ($i_l>0)
$choix_t:=$menu_c[$i_l-1]
Au cas ou
: ($choix_t=Nom commande(491))
$path_t:=Fichier application
: ($choix_t=Nom commande(489))
$path_t:=Fichier structure() //celui de la base hôte…
: ($choix_t=Nom commande(490))
$path_t:=Fichier données //
: ($choix_t=“Active 4D”)
$path_t:=Dossier 4D(Dossier 4D actif)
: ($choix_t=“Licenses”)
$path_t:=Dossier 4D(Dossier Licenses)
: ($choix_t=“Base”)
$path_t:=Dossier 4D(Dossier base)
: ($choix_t=“Resources”)
$path_t:=Dossier 4D(Dossier Resources courant)
: ($choix_t=“Preferences4D”)
$path_t:=Convertir chemin système vers POSIX(Dossier système(Préférences utilisateur))
$path_t:=$path_t+"/4D/4D Preferences VERSION.4DPreferences"
$version_t:=“v”+Sous chaîne(Version application;1;2)
$path_t:=Remplacer chaîne($path_t;“VERSION”;$version_t;
)
$path_t:=Convertir chemin POSIX vers système($path_t)
: ($choix_t=“Logs”)
$path_t:=Dossier 4D(Dossier Logs)
: ($choix_t=“HTML”)
$path_t:=Dossier 4D(Dossier racine HTML)
: ($choix_t=“Macros”)
$path_t:=Dossier 4D+“Macros v2”
: ($choix_t=Nom commande(486))
$path_t:=Dossier temporaire
: ($choix_t=“Recent”)
$path_t:=Dossier système(Bureau)
$path_t:=Convertir chemin système vers POSIX(FS_pathGetParent ($path_t))
$path_t:=$path_t+“Library/Application Support/4D Server/Favorites v_VERSION_/Local/”
$path_t:=Remplacer chaîne($path_t;“VERSION”;Sous chaîne(Version application;1;2))
$path_t:=Convertir chemin POSIX vers système($path_t)
Fin de cas
Si (Tester chemin acces($path_t)<0)
ALERTE(“Not found:\r”+$path_t)
Sinon
MONTRER SUR DISQUE($path_t)
Fin de si
Fin de si
//_
</code 4D>

Merci de ne pas me demander le code de push et join, malgré l’apparence je n’en suis pas l’auteur :mrgreen:

(et merci aux auteurs pour tous ces belles innovations de la v17)