Aller au contenu

Protéger un bloc


Messages recommandés

Bonjour à tous,

 

Une petite question en passant, j'ai réalisé pour un client des objets que j'ai convertis en blocs. J'aimerai savoir s'il était possible de protéger un bloc pour qu'il soit non modifiable par ce client (A l'image des fichiers protégés par un mot de passe). C' est à dire que les blocs conservent leurs propriétés, qu'il puisse les insérer dans des fichiers 2d et 3d mais pas les modifiés.

 

Merci pour vos réponses

Lien à poster
Partager sur d’autres sites

Salut

Un lisp vite fait

 

(defun c:pbl(/ bl sel)
 (vl-load-com)
 (if (setq sel (entsel "\nVeuillez selectionner un bloc à protéger : "))
   (if (eq (vla-get-objectname (setq sel (vlax-ename->vla-object (car sel)))) "AcDbBlockReference")
     (progn
(if (vlax-property-available-p sel 'effectivename)
  (setq bl (vla-get-effectivename sel))
  (setq bl (vla-get-name sel))
)
(setq bl (vla-item (vla-get-blocks (vla-get-activedocument (vlax-get-acad-object))) bl))
(if (eq (vla-get-explodable bl) :vlax-false)
  (princ (strcat "\nLe bloc " (vla-get-name bl) " est déjà protégé."))
  (progn
    (vla-put-explodable bl :vlax-false)
    (princ (strcat "\nLe bloc " (vla-get-name bl) " est maintenant protégé."))
  )
)
     )
     (princ "\nCe n'est pas un bloc.")
   )
 )
 (princ)
)

 

@+

Les Lisps de Patrick

Le but n'est pas toujours placé pour être atteint, mais pour servir de point de mire.

Joseph Joubert, 1754-1824

Lien à poster
Partager sur d’autres sites

Salut Patrick,

 

Merci pour ta réponse, en excusant que la mienne soit aussi tardive.

Tout ça m'a l'air bien joli, mais il faut encore que j'améliore ma technique sur les lisps. Une bonne vingtaine de tutos et 10 litres de cafés devraient m'aider à en venir à bout.

 

Merci encore

 

 

Lien à poster
Partager sur d’autres sites
  • 7 ans après...

Rejoindre la conversation

Vous pouvez publier maintenant et vous inscrire plus tard. Si vous avez un compte, connectez-vous maintenant pour publier avec votre compte.

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.

Chargement
×
×
  • Créer...