Carnets EO passé en Présentation

[oran]

Salut Grand Sapin,

 

Tu dis que l'ancienne version fonctionne, celle qui est dans le post précédent ???

[lili2006]

Bonjour à toutes et tous,

 

Le problème ne vient pas de toi alors, mais plutôt de ta version AutoCAD ! (A valider tout de même)

 

Si grand-sapin repasse dans le coin,...

 

Sur mon gabarit, INSUNITS est à (5) => cm !

 

Teste tout de même, mais j'y crois pas trop,....

 

 

"la présentation dont je fais référence "

,

 

celle-ci est entièrement paramétré je suppose,...

 

http://images4.hiboox.com/images/2808/2dc48a31862641333f5a73dfe410f80d.jpg

[grand_sapin]

Re,

 

lili2006, personnellement je conclurai sur un pb de version.

 

Après, d'ici demain, je passe à la 2009, du coup je ne pourrai plus être testeur 2005 !

 

a+

[lili2006]

Re,

 

Après, d'ici demain, je passe à la 2009,

 

Que du bonheur,....!!!!

 

Merci grand_sapin.

[Bred]

Salut,

Vu qu'a la dernière modif j'avais récupéré le calque et le verrouillage de la fenêtre existante, j'ai chuinter le truc pour la version avant 2006.

J'ai éditer le code ci-dessus, chez grand_sapin et oran cela doit maintenant fonctionner...

 

Mais, ceux qui ont une version 2005, dans votre fichier test, pourriez-vous lancer ceci et me retourner ce que cela dit svp ?

 

merci !

 

(defun c:test (/ A-P ACDOC I LAYS ONG-BASE)
(setq	AcDoc (vla-get-activedocument (vlax-get-acad-object))	
layS  (layoutlist))
(if (> (length layS) 1)
   (progn
     (princ "\n Copie configuration traceur d'onglet Existant. \n Plusieurs Présentations détectées.")
     (while (not ong-base)
(princ "\n")
(repeat	(setq i (length layS))
  (princ (strcat (nth (- (length layS) i) layS) " * "))
  (setq i (1- i))	  )

(setq ong-base (getstring t "\n Présentation d'où la configuration du traceur sera récupérée :"))
(if (not (member ong-base layS))
  (setq ong-base nil)))
     )
   (setq ong-base (car layS))
   )

 (setq a-p (vla-item (vla-get-layouts AcDoc) ong-base))  

 (vla-put-ActiveLayout AcDoc a-p)
 (vlax-for e (vla-get-paperspace AcDoc)
   (if	(equal (vla-get-ObjectName e) "AcDbViewport")
     (vlax-dump-object e t)   ) )
(command "ecrantxt")  
)

 

 

 

[Edité le 9/7/2008 par Bred]

[grand_sapin]

Salut Bred,

 

déjà, voici l'erreur de CEP:

 

 Commande: CEP
Choix du cadre (Bloc) :
Choix des objets: Spécifiez le coin opposé: 1 trouvé(s)

Choix des objets:

Nom des Onglets à Créer :PT
Régénération de la présentation.
Régénération de l'objet - fenêtres en mémoire cache.
; erreur: no function definition: VLA-GET-XEFFECTIVESCALEFACTOR

Commande:

 

A titre informatif, tu en es à combien de dizaines de retouches de ton code ???? :cool:

 

Merci encore de prendre du temps pour nous

 

a+

 

edit : suppression du résultat de test.lsp

 

[Edité le 9/7/08 par grand_sapin]

[Bred]

:casstet: :casstet: :casstet:

; erreur: no function definition: VLA-GET-XEFFECTIVESCALEFACTOR

 

C'est quoi ce bordel ?

Tu as cette erreur là aussi oran ?

 

1 - Vu ce que vous me retournez, ce n'es pas ce que je pensais au sujet des fenêtres (calque et verrouillage présent en 2005)

Vous pouvez éditer vos message pour enlever les résultats, c'est pas ça (et ça éviteras de mettre le désordre dans le post)

 

2 - Vous pourriez charger ça, sélectionner un bloc, et me dire ce que ça retourne svp ?

(defun c:test ()
(vlax-dump-object (vlax-ename->vla-object (car (entsel "\n Sélectionner bloc :"))))
(command "ecrantxt") 
 )

 

[oran]

Lili,

 

...excuse moi, mais que veux-tu dire par là ?? :cool:

 

sinon pour Bred:

 

Edit : Correction pour version 2005 mais non récupération calque et verrouillage de fenêtre

 

[Edité le 9/7/2008 par Bred]

 

...ça ne fonctionne tjs pas, mais par contre j'ai repris ce même lisp à partir du post précédent impression de feuillets à partir de l'EO....et lui fonctionne.... ;)

 

[Edité le 9/7/2008 par oran]

[oran]

...résultat des courses... :)

 

 

Commande: test

 

Sélectionner bloc :; IAcadBlockReference: Interface AutoCAD Block Reference

; Valeurs de propriétés:

; Application (RO) = #

; Document (RO) = #

; Handle (RO) = "239"

; HasAttributes (RO) = 0

; HasExtensionDictionary (RO) = 0

; Hyperlinks (RO) = #

; InsertionPoint = (300.0 -400.0 0.0)

; Layer = "DEFPOINTS"

; Linetype = "ByLayer"

; LinetypeScale = 1.0

; Lineweight = -1

; Name = "cadre"

; Normal = (0.0 0.0 1.0)

; ObjectID (RO) = 2127408392

; ObjectName (RO) = "AcDbBlockReference"

; OwnerID (RO) = 2130365688

; PlotStyleName = "ByLayer"

; Rotation = 0.0

; TrueColor = #

; Visible = -1

; XScaleFactor ecrantxt

Commande: = 1.0

; YScaleFactor = 1.0

; ZScaleFactor = 1.0

nil

[grand_sapin]

Re,

 

voila le 2ème test

 

Commande: test
Sélectionner bloc :; IAcadBlockReference: Interface AutoCAD Block Reference
; Valeurs de propriétés:
;   Application (RO) = #
;   Document (RO) = #
;   Handle (RO) = "6C10"
;   HasAttributes (RO) = 0
;   HasExtensionDictionary (RO) = 0
;   Hyperlinks (RO) = #
;   InsertionPoint = (2000.0 55240.0 0.0)
;   Layer = "0"
;   Linetype = "ByLayer"
;   LinetypeScale = 1.0
;   Lineweight = -1
;   Name = "cadre"
;   Normal = (0.0 0.0 1.0)
;   ObjectID (RO) = 2113061376
;   ObjectName (RO) = "AcDbBlockReference"
;   OwnerID (RO) = 2113654008
;   PlotStyleName = "ByLayer"
;   Rotation = 0.0
;   TrueColor = #
;   Visible = -1
;   XScaleFactor = 100ecrantxt
Commande: 0.0
;   YScaleFactor = 1000.0
;   ZScaleFactor = 1000.0
nil

Commande:

 

 

 

citation extraite du message original:

Après, d'ici demain, je passe à la 2009,

 

 

 

Que du bonheur,....!!!!

 

ça me fait flipper ce genre de petit message, c'est sincère ou ironique ????

 

[Edité le 9/7/08 par grand_sapin]

[lili2006]

Re,

 

grand_sapin,

 

C'est un peu ironique.

Pour moi, les grandes nouveautés :

2005 => les jeux de feuilles, le début des palettes (suite 2004)

2006 => les blocs dyns,

2007 => la 3D,

2008 => Echange Excel-AutoCAD, les annotatifs (bien que pas au point,...)

2009 => Heu, rien trouvé encore (as-tu lu les autres post concernant 2009 ?)

 

Plutôt une régression même en ce qui concerne la convivialité, pourquoi des rubans sur AutoCAD, là j'pige pas !

Pourquoi plutôt ne pas pouvoir avoir accès à plusieurs séries de palettes à la place, ou de "tableaux de bord personnalisable à souhait" ?

 

Je suis toujours entousiasme à la sortie d'un nouveau produit, mais là !! Plus tous les petits bugs que nous avons déjà recencés.

 

Il est clair que pour le moment, je garde aussi ma 2008, ;)

 

 

 

 

[oran]

Re,

 

...en ce qui me concerne je peux très bien me contenter du lisp que j'ai repris dans le post précédent de Bred, puisqu'il fonctionne sur 2005.. ;) Le seul bémol c'est qu'il faut que je sélectionne mes feuillets en commençant par le dernier dans l'EO pour que mes présentations apparaissent dans le bon ordre dans l'EP............mais bon!! quand on le sait ....!

Merci tout de même pour tout ce temps passé à essayer e nous dépanner,

Oran

[grand_sapin]

Re,

 

Je suis toujours entousiasme à la sortie d'un nouveau produit, mais là !! Plus tous les petits bugs que nous avons déjà recencés.

 

Il est clair que pour le moment, je garde aussi ma 2008,

 

ben en fait, si ça n'avait tenu qu'à moi ... pour te resituer :

 

- je m'en vais de ma boite fin aout, autant te dire que j'avais pas forcément envie de me prendre la tête à 1 mois et demi de partir, et que ma 2005, j'en étais très content !

- on m'a dit hier au téléphone "il parait que tu fais parti des volontaire" j'adore cette manière détourné de dire "t'as pas le choix"

- je travaille sur Mensura et je vais avoir civil 3D (c'était moins cher !!!)

 

et donc sauter 4 versions, j'appréhende un tout petit peu !!! j'attends donc le cours de rebcao avec impatience

 

a+

 

[Bred]

Re,

bon, c'est bon, ça doit fonctionner maintenant (version 1.1)

 

Grâce au dernier test on peux s'apercevoir que sous 2005 il n'y a pas de XEFFECTIVESCALEFACTOR... (et ve savoir pourquoi je prenais "l'effective"...)

Et comme le X à l'air aussi bizarre, je prends le Y.

oran et grand_sapin, si vous pouvez tester le dernier svp, normalement ça doit fonctionner...

 

Pour info, lorsque vous avez des lisps qui ne fonctionnent pas, retournez bien ce qu'il y a marqué en ligne de commande : le message de grand_sapin met le doigt sur le bug.

[grand_sapin]

Royal !!!!

 

c'est énorme ce que tu as fait, quelle que soit l'échelle, ça fonctionne.

 

Je pense que bonuscad, (gile), Patrick_35, et les autres peuvent t'adouber et te faire rentrer à la table ronde des lispeurs, si ce n'est déja fait !

 

Merci encore pour l'énergie que tu as dépensé dans ce projet

 

Et désolé de ne m'en servir qu'une journée !!!!!!

 

a+

[oran]

:) :) :) :) :) :) ...

 

...respect et chapeau bas MONSIEUR, voilà une place dans la cour des grands qui est bien méritée, je suis tout à fait de l'avis de Grand Sapin.. ;)

Ceci dit, tout est nickel désormais.................et même mes présentation sont restituées dans le bon ordre.

Tout simplement et avec beaucoup de reconnaissance....... MERCI pour ce magnifique travail.

 

Bonne fin de journée,

Oran

[lili2006]

Re,

 

et donc sauter 4 versions, j'appréhende un tout petit peu !!! j'attends donc le cours de rebcao avec impatience

 

Pour moi, il n'y a pas de raison,...

 

tu ne vas rien perdre de ce que tu sais déjà faire et au contraire, tu vas découvrir des choses qui peuvent te rendre la vie plus facile (et encore, c'est à voir !).

 

Tu prend 2 jours pour parcourir l'atelier des nouvelles fonctionnalités et tu y verras déjà plus clair,...

 

http://images4.hiboox.com/images/2808/28d74f96dab8d892dc17a567cd103e9d.jpg

 

Tu peux revenir jusquà deux versions en arrière, ce qui n'est pas rien,...(2009,2008,2007, il te manquera donc la 2006 !)

 

j'attends donc le cours de rebcao avec impatience

 

Moi aussi,!!!

 

J'me dis qu'j'ai du rater quelque chose, ;)

 

 

 

 

[Bred]

Merci,

mais je ne me mets pas au niveau des pré-cités... je suis encore brouillon et je manque de précision (la preuve : la longueurs des posts ou je propose mon aide...)

mais j'essaye de me corriger...

[ludo07]

Bonjour à tous,

 

C'est exactement le programme que je recherche.

 

Sauf quand je l'utilise il m'indique:

 

Régénération de la présentation.

; erreur: type d'argument incorrect: numberp: nil

 

Il crée un onglet présentation avec le nom incrémenté mais il n'y a rien dedans.

 

Une idée?

 

A+

 

 

[Bred]

Salut,

; erreur: type d'argument incorrect: numberp: nil

Cela veux dire qu'il manque une donnée...

 

pourrais-tu me dire dans quelle version d'Autocad tu travail, et qu'elle est tes manipultations avant cette erreur ?

 

merci.

[ludo07]

je travail avec la version complete 2009. je selectionne un bloc puis je selectionne mes autre blocs que je voeux imprimer.ensuite je choisis le nom de la presentation.puis ca coince. de rage je me sus lancer dans la realisation d'un programme en VBA. i

[lili2006]

Bonjour à toutes et tous,

 

Pas de pb chez moi sur une V2009 MAP !

 

As-tu configuré "complètement" ta présentation de référence ?

[ludo07]

bonjour à tous,

 

lili2006 il me semble avois tous bien fait.

 

Mais je vais rééssayer.

 

Good WE

[lili2006]

Re,

 

Voici ce que me dis ma ligne de commande =>

 

Commande:

Commande: CEP

Choix du cadre (Bloc) :

Choix des objets: 1 trouvé(s)

Choix des objets: 1 trouvé(s), 2 au total

Choix des objets: 1 trouvé(s), 3 au total

Choix des objets: 1 trouvé(s), 4 au total

Choix des objets: 1 trouvé(s), 5 au total

Choix des objets: 1 trouvé(s), 6 au total

Choix des objets: Spécifiez le coin opposé: 20 trouvé(s), 26 au total

Choix des objets:

Nom des Onglets à Créer :1-

Copie configuration traceur d'onglet Existant.

Plusieurs Présentations détectées.

1-100 * 1-20 * 1-25 * 1-50 * A3 H -Cartouche * Format Libre * Sommaire Carnet

A3 *

Présentation d'où la configuration du traceur sera récupérée :1-25

Régénération de la présentation.

Régénération de l'objet - fenêtres en mémoire cache.

Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Régénération de la présentation.

Régénération de la présentation.

Commande: Régénération du modèle.

Commande: Régénération du modèle.

Commande:

Commande: Restauration des fenêtres enregistrées en mémoire cache.

Commande:

 

Et tout se déroule comme prévu,...

[Bred]

Re,

Pourrais-tu joindre ton fichier pour que je test le proclème stp ?

merci !