Aller au contenu

Mise en page


Messages recommandés

Posté(e)

Bonjour,

 

J'aimerais pouvoir modifier la mise en page sur plusieurs présentation.

 

Je m'explique:

Sur un projet, j'ai une vingtaine de présentation prédéfini ( Plan aménagement, électrique, clim etc). Et j'ai découvert que l'on pouvait centrer automatiquement le tracé sur la zone d'impression. Et j'aimerais l'appliquer à l'ensemble de mes présentation de manière rapide. Eviter de faire ce réglage sur chaque présentation.

 

Je sais que la solution existe grâce au .dwt, mais je ne m'en sors pas...

 

Quelqu'un pourrait m'expliquer étape par étape cette réalisation ?

 

Merci d'avance pour votre aide.

 

Jarl

Posté(e)

Bonjour,

 

il y a le lisp suivant qui répond peut etre à ton problème:

 

;;;*********************************************************

;;; Sauvegarde toutes les présentation dans une vue étendue

;;; Pour philsogood de CadXP.com

;;;*********************************************************

(defun c:SauvPresZoomEtendu (/ lay Pos LstPresent)

(vlax-for lay (vla-get-layouts (vla-get-activedocument (vlax-get-acad-object)))

(setq LstPresent (cons (cons (vla-get-taborder lay) (vla-get-name lay)) LstPresent))

) ;_ Fin de vlax-for

(setq Pos 1)

(while (/= (cdr (assoc Pos LstPresent)) nil)

(command "_.layout" "_set" (vl-princ-to-string (cdr (assoc Pos LstPresent))))

(command "_zoom" "t")

(setq Pos (1+ Pos))

) ;_ Fin de while

(command "_qsave")

;;(command "_close")

(princ)

) ;_ Fin de defun

Autocad MAP2019 - Covadis V17.1i

Posté(e)

Merci pour ton aide. J'aimerais modifier la mise en page des présentations de manière général. Pas seulement pour centrer le tracé. Pour d'autre projet j'aimerais modifier: le format, le style de tracé, l'echelle etc...

 

Et je t’avouerais que je ne sais pas comment installer un LIPS... Un jour, une personne m'a installé plusieurs LIPS mais c'était des fichiers LSP ou .dll

Et je ne sais pas quoi faire de ton texte ^^' désolé

 

Est-il possible de passer par une commande classique de AutoCAD ?

  • 2 semaines après...
Posté(e)

C'est drôle, j'ai l'impression qu'il est de moi (en partie), ce Lisp... Heureux d'être utile...

Windows 11 / AutoCAD 2024

Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net).
Davantage d'avantages, avantagent davantage (Bobby Lapointe).
La connaissance s'accroît quand on la partage (Socrate).
Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)

  • 2 mois après...
Posté(e)

Salut

pour créer un lips :

-créer un document texte

-coller le LIPS à l’intérieur du document texte

-enregistrer le document texte

-renommer le document texte en changeant l’extension du fichier ".txt" par ".LSP"

 

Cordialement.

Invité
Répondre à ce sujet…

×   Collé en tant que texte enrichi.   Coller en tant que texte brut à la place

  Seulement 75 émoticônes maximum sont autorisées.

×   Votre lien a été automatiquement intégré.   Afficher plutôt comme un lien

×   Votre contenu précédent a été rétabli.   Vider l’éditeur

×   Vous ne pouvez pas directement coller des images. Envoyez-les depuis votre ordinateur ou insérez-les depuis une URL.

×
×
  • 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é