Messages postés par KW

Bonjour,

Pour contourner le problème et creer fichier ".dwg" bloc :
1°) Créer une définition de bloc
2°) Le créer
3°) SendCommand "WB " et le controle de l'interface via des sendkeys...

C'est pas propre mais malheureusement pas le choix...

J'attends un retour du correctif s'il existe !

Bonjour,

J'ai un problème concernant la création de bloc suivant une sélection :

Sur Autocad 2023 ce code marche :

Set sset = ThisDrawing.SelectionSets.Add("BLOC_SET")
sset.SelectOnScreen
NOM_BLOCK = "test"
fichier_export = "C:\test\" & NOM_BLOCK & ".dwg"
ThisDrawing.Wblock fichier_export, sset

Mais sur ZWcad le code ne fonctionne pas... une idée ?

@kw
Je m'auto répond :

Réponse :

Créer un bouton qui execute la commande lisp tout simplement... vu que le fichier scrpit n'est pas reconnu

L'outil pour transformer les pc3 vers PC5 marche bien (vu avec Zwcad france)

Pour le .getPoint (, "sélectionner un point) / j'ai modifié mon code pour trouver une autre solution.

@jl Merci de votre réponse

Bonjour,

Oui et le lisp fonctionne aussi avec le raccourcis clavier.

;;^c^c ^p -vbarun "C:/.../wipple.zvb!Launch.PROG_MAIN" code bouton marche pas
(defun c:ZWI ()
 (vl-vbaload "C:/.../fichier.zvb")
 (vl-vbarun "MODULE.NOMMACRO") 
 (princ)
)

mais je veux proposer des solutions que je pourrais maitriser suivants les différents dessinateurs
J'ai d'autres problèmes :
PC3 vers PC5 ?
création de block dynamique (arriver vers mai 2023 d'apres support)

On Error GoTo forcing:
forcing:
   SELECT_PT = ThisDrawing.Utility.GetPoint(, TEXTE_POINT & ":")

il me donne une erreur aussi

Bonjour à vous,

je viens de me mettre sur Zwcad, les proghramme VBA fonctionne à merveille il ne me manque plus qu'un bouton... et/ou un raccouris clavier via lisp

Donc sur Autocad dans le menu personnalisation pour le bouton j'écrivais ça :

^c^c ^p -vbarun "C:\...\fichier.zvb!Launch.PROG_MAIN"

sur Zwcad il me dit : fichier introuvable ???