Titre de fenêtre AutoCAD

[Olivier_CEA_Grenoble]

Bonjour

 

Voila plusieurs années que nous travaillons avec deux applications différentes qui sous un aspect totalement identique, ne font pas du tout les même actions.

 

Malheureusement, cela impact directement le travail d'autre collègues.

 

Pour pouvoir différencier ces deux applis, je souhaiterais faire apparaître en lieux et place du titre "Autocad MAP 3D 'ver' [Dessin1.dwg]" un truc du genre "Application1" et "Application2"

 

Sachant que nous avons des lisp's différent a l'ouverture de chaque applications.

 

Je pensais a un truc du genre 'vl-registry-write'?

 

A+

[nG! Hebus]

Deux cessions utilisateurs?

 

Je vois que ça pour changer les paramètres, LISP et le reste du tout au tout.

 

ptét que d'autres auront des solutions...

[vincentp010]

Bonjour,

 

essai avec ChangeTitleForAutoCAD

Je n'ai pas testé.

[sbosarl]

bonjour,

Eventuellement coller une ligne de code dans chaque lisp

(setvar "modemacro" "Application 1 ")

[Olivier_CEA_Grenoble]

Super :D

 

Merci vincentp010 cela fonctionne tout a fait comme je l'attendais.

Dans ma version 2008 la dll suffit largement.

Je porte ça immédiatement sur nos applications.

 

Merci beaucoup.

 

Bonjour,

 

essai avec ChangeTitleForAutoCAD

Je n'ai pas testé.

 

http://www.gifs-animes.net/images-image/Boissons/Biere/Biere-2.gifhttp://www.gifs-animes.net/images-image/Boissons/Biere/Biere-2.gifhttp://www.gifs-animes.net/images-image/Boissons/Biere/Biere-2.gif

[Olivier_CEA_Grenoble]

Bonjour,

Je me confronte a un nouveau problème sur ce change de titre.

Lors de l'utilisation de changetitle.dll en direct pas de problème.

Mais lors du lancement au travers des chargements par profil (appload) cela ne fonctionne pas a tous les coups.

En effet si je lance un Autocad avec un profil standard puis un Autocad avec un profil qui utilise changetitle.dll j'ai ce message d'erreur.

 

Commande: netload Nom du fichier d'assemblage: changetitle.dll Impossible de 
charger l'assemblage. Détails de l'erreur: Autodesk.AutoCAD.Runtime.Exception: 
eDuplicateKey
  à Autodesk.AutoCAD.Runtime.Interop.Check(Int32 returnValue)
  à AcMgCommandClass.AddCommand(AcMgCommandClass* , ICommandLineCallable ca, 
MethodInfo mi)
  à 
Autodesk.AutoCAD.ApplicationServices.AutoCADApplicationHolder.Initialize(Assembl
y assembly)
  à 
Autodesk.AutoCAD.ApplicationServices.ExtensionLoader.ProcessAssembly(Assembly 
assembly)
Commande: .changetitle
Enter new title: CEA Grenoble Test

 

Je regarde la piste de lancement via un 'ACAD.lsp' mais l'application étant capricieuse ... :(

 

Si quelqu'un a une idée?

 

Olivier

[Olivier_CEA_Grenoble]

Voila ce que je viens de mettre en place.

J'ai récupérer le profil courant avec les "VLA" que je ne maîtrise absolument pas :ph34r:

J'ai récupérer ça chez Patrick35

;;Définition du titre en fonction du profiles
(setq CourantProfil(vla-get-activeprofile (vla-get-profiles (vla-get-preferences (vlax-get-acad-object)))))
(command "netload" "changetitle.dll")
(if(/= CourantProfil "Profil-1")
(if ( = CourantProfil "Profil-2")
	(command ".changetitle" "Titre-2")
	(alert "L'application courante n'est pas nommée\n\n\t Veuillez prévenir l'adminstrateur")
)
(command ".changetitle" "Titre-1")
)

 

Merci Patrick35 donc