Aller au contenu

cui to mns


Messages recommandés

Posté(e)

Bonjour Fraid,

Moi aussi je suis interressé par cette conversion et j'ai essayé cet utilitaire mais il ne fonctionne pas!

Dommage alors je me suis tapé des copies d'ecran du menu map 2006 et j'ai copié collé pour créer mon mns.

En attendant de trouver mieux...

fabcad

Posté(e)

Salut,

 

C'est pas que le sujet ne nous passionne pas mais pour ma part je me sens désarmé face à ce problème. J'ai failli t'écrire pour te dire d'essayer le compilo de Tramber mais je ne l'ai pas encore essayé moi même. J'ai pensé décompiler le cui en hexadécimal pour en extraire les données mais cela me parait hasardeux... je ne suis pas sûr que la hiérarchie des données dans un cui soit la même, donc compatible, avec un "ancien" mns...

 

J'y pense parfois mais là je sèche... :(

 

A suivre...

 

"La ligne droite est le plus court chemin entre deux points, à condition que les deux points soient bien en face l'un de l'autre" P. Desproges.

Posté(e)
J'ai failli t'écrire pour te dire d'essayer le compilo de Tramber mais je ne l'ai pas encore essayé moi même.

 

Le Compilo est un outil formidable :cool:

Malheureusement, il ne convertit pas les CUI en MNS.

 

En revanche il est compatible avec toutes les versions puisque la commande CHARGMNU est toujours disponible sur les nouveaux AutoCAD.

 

Son intérêt réside essentiellement dans le fait qu'on crée boutons et/ou menus (y compris menus descandants) d'un seul coup avec une syntaxe rapide. Et ceci depuis plusieurs fichiers en un seul MNU si on le souhaite.

 

Voilà.

 

Pour le VLX qui ne marche pas (je n'ai pas essayé) c'est peut-être un américain qui n'a mis aucune "_" devant les noms de commande. Je serais étonné car des gens de tout pays disent l'avoir utilisé avec succès.

 

 

Bureau d'études dessin.

Spécialiste Escaliers

Développement - Formation

 

./__\.
(.°=°.)
Posté(e)

bonjour ,

Je ne sais pas si c'est le meme mais j'en est essayé un du meme nom sur acad2006

"CUI to MNU.vlx" commande "CuitoMnu" il m'a généré le fichier suivant pour ABSTools.cui :

 

 
//
//      AutoCAD menu file
//

//
//      Default AutoCAD NAMESPACE declaration:
//

***MENUGROUP=ABSTOOLS

//
//   Begin AutoCAD Digitizer Button Menus
//

//
//   Begin System Pointing Device Menus
//

//
//   Begin AutoCAD Pull-down Menus
//

***POP1
ABSTOOLSID_Mnu [&ABS Tools]
ABSTOOLSID_ClashReporter [Clash Reporter]^C^C_.ABSTOOLSCLASHREPORT
ABSTOOLSID_FabStyle [&Fabrication Styles]^c^c_.ABSTOOLSFABRICATIONSTYLE
ABSTOOLSID_HgrStyle [Hanger &Styles]^c^c_.ABSTOOLSHANGERSTYLE
            [--]
ABSTOOLSID_Help [ABS Tools &Help]^c^c_.ABSTOOLSHELP
ABSTOOLSID_About [&About ABS Tools]^c^c_.ABSTOOLSABOUT

//
//   Begin AutoCAD ToolBars
//

//
//      Begin AutoCAD Image Menus
//

//
//  AutoCAD Screen Menus
//

//
//      Begin AutoCAD Tablet Menus
//

//
//      Help Strings
//

***HELPSTRINGS
ABSTOOLSID_About [About ABS Tools]
ABSTOOLSID_FabStyle [Fabrication Styles]
ABSTOOLSID_HgrStyle [Hanger Styles]

//
//  Keyboard Accelerators
//

//
//      End of AutoCAD menu file
//

 

Je suis plus que sceptique , il y en a un gratuit à cette adresse :

http://home.pacifier.com/~nemi/

qui s'appelle : "lprof.lsp" que je joins ,mais je n'ai pas réussi a le faire fonctionner .Si je trouve un peu de temps je regarderai cela de plus près et si quelqu'un veut le faire .

 

 
(defun c:lprof ()
(setq cmd (getvar "cmdecho"))
(setvar "cmdecho" 0)
(vl-load-com)
(setq acadobject (vlax-get-Acad-Object)) 
(setq acadprefs (vla-get-preferences acadobject)) 
(setq acadprofiles (vla-get-profiles acadprefs)) 
(vlax-dump-object acadprofiles T) 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(initget 1 "Menu Cui")
(setq key (getkword "\nLoad MENU or CUI file>: "))
(cond
 ((= key "Menu")(setq word "Load Menu File")(setq mn "mnu"))
 ((= key "Cui")(setq word "Load CUI File")(setq mn "cui"))
)
(setq lok1 (getfiled word "c:/Documents and Settings/" mn 8))
(setq lgt (strlen lok1))
(setq aa (substr lok1 1 (- lgt 4)))
(setq lgtaa (strlen aa))
(setq count (- lgtaa 1))
(setq chk "0")
(while
(/= chk "\\")
 (setq chk (substr aa lgtaa 1))
   (cond
    ((/= chk "\\")(setq count (- count 1))  (setq lgtaa (- lgtaa 1)))
    ((= chk "\\")(setq bb (substr aa (+ 2 count))))
   )
)

(setq bb (strcase bb))
(setq cc (strcase (strcat bb "-PROFILE")))

(setq ACAD1 (strcat ";" (substr aa 1 lgtaa)))
(setq mname  (strcat aa   ".mnu"))
(setq mmname (strcat"P15=+" bb ".POP15")) 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(vla-put-ActiveProfile acadProfiles "<>") 
(setq ACAD2 (getenv "ACAD")) 
(setq ACAD3 (strcat acad2 ACAD1)) 
(setq prname (getvar "cprofile")) 
(vlax-invoke-method acadProfiles 'CopyProfile prname cc) 
(vla-put-ActiveProfile acadProfiles cc) 
(setenv "ACAD" ACAD3) 
(command "_.menuload" mname) 
(menucmd mmname) 
(setvar "cmdecho" cmd)
(princ)
)

 

Nota: à l'invite : mnu ou cui , tapez votre choix pour le sens de conversion .

 

 

Créer un compte ou se connecter pour commenter

Vous devez être membre afin de pouvoir déposer un commentaire

Créer un compte

Créez un compte sur notre communauté. C’est facile !

Créer un nouveau compte

Se connecter

Vous avez déjà un compte ? Connectez-vous ici.

Connectez-vous maintenant
×
×
  • Créer...

Information importante

Nous avons placé des cookies sur votre appareil pour aider à améliorer ce site. Vous pouvez choisir d’ajuster vos paramètres de cookie, sinon nous supposerons que vous êtes d’accord pour continuer. Politique de confidentialité