Comment créer lisp pour sélectionner du TEXTE

[t_pam]

Bonjour à tous,

 

Je cherche un moyen de sélectionner automatiquement le texte de mon dessin.

Faire une recherche et sélection du texte en ligne ou multiligne d'une hauteur définie appartenant au même calque "TEXTES".

Car j'ai plusieurs hauteurs de texte dans mon dessin et je voudrais redéfinir une couleur pour chaques hauteurs.

Puis je recherche aussi un moyen de lancer ce lisp pour un ensemble des dessins se trouvant dans le même dossier, et même répertoire.

 

Merci à vous pour votre aide.

 

Bonne journée.

 

Thierry

[pointpower]

Bonjour,

 

Tu as regardé la sélection rapide dans outils....

 

A+

[lecrabe]

 

Hello

 

OUI , en effet tu laisses seulement visible UN ou N calque(s) de texte

et on suppose que c'est le calque courant ...

 

Tu selectionnes tout par une grande fenetre puis bouton droit puis selection rapide

 

Dans l'ascenseur , tu dis que tu traites seulement les TEXT ou MTEXT

et tu precises en plus dont la propriete Hauteur = 2.5 par exemple

 

Et tu forces la couleur des objets selectionnes

 

Manipulation a repeter N fois si tu as N hauteurs differentes

x 2 si tu as des TEXT ET des MTEXT !

 

C jouable si tu n'as pas trop de hauteurs differentes !!

 

Le Decapode

 

[zebulon_]

Bonjour,

 

(defun ChPropTx (HT COL / ss)
 (setq ss
   (ssget "_X"
     (list
       '(8 . "TEXTES")   ;; le calque
       '(0 . "*TEXT")    ;; les text et mtext
       (cons 40 HT)      ;; la hauteur
     )
   )
 )
 (if ss
   (command "_chprop" ss "" "_c" COL "")
 )
)

(defun c:ChPropTxMain ()
 (ChPropTx 0.15 1)   ;; texte de hauteur 0.15 -> couleur 1
 (ChPropTx 0.25 2)   ;; texte de hauteur 0.25 -> couleur 2
 (ChPropTx 0.35 3)   ;; texte de hauteur 0.35 -> couleur 3
 ;;; etc
 (princ)
) 

 

Puis je recherche aussi un moyen de lancer ce lisp pour un ensemble des dessins se trouvant dans le même dossier, et même répertoire.

Le moyen c'est le script ou mieux SuperAutoScript, ou sas pour les intimes.

 

Amicalement

Vincent

 

[Tramber]

Hopppla !

[t_pam]

Bonjour,

 

Tu as regardé la sélection rapide dans outils....

 

A+

 

Bonjour,

 

Merci pour ton aide, mais je connais très bien cette fonction mais ce n'est pas ce que je recherchais.

 

Bonne journée.

 

Thierry

[t_pam]

Bonjour,

 

Merci Vincent (Zebulon_), c'est tout à fait ce qu'il me fallait.

 

J'ai changé les hauteurs et les couleurs dont j'avais besoin pour mon gabarit, c'est nikel.

 

Par contre aurais-tu un moyen de m'aider, pour lancer un lisp pour un ensemble de fichier DWG d'un même dossier et d'un même répertoire ?

 

Merci d'avance.

 

Bonne journée.

 

Thierry

[zebulon_]

Bonjour,

 

pour lancer un lisp pour un ensemble de fichiers dwg, il faut passer par un script (fichier .scr) qui est un simple fichier texte (fait avec notepad) dans lequel tu décris toutes les actions dans l'ordre.

 

_open "C:\rep1\rep2\fichier1.dwg"
(load "ChPropTx")
chproptxmain
_qsave
_close
_open "C:\rep1\rep2\fichier2.dwg"
(load "ChPropTx")
chproptxmain
_qsave
_close
...
etc
...

 

Un script se lance avec la commande SCRIPT.

 

Le truc pour avoir la liste des noms de fichiers d'un répertoire est de passer par une antique commande MS-DOS.

dir /b > monfichier.scr

Comme ça, on a déjà la liste des noms de fichiers dans un fichier .scr qu'il suffit d'éditer pour rajouter les commandes adéquates.

 

Sinon, il y a également un outil beaucoup plus évolué (et dont j'ai donné l'adresse dans mon message précédent). Il s'agit de SAS, qui

permet d'appliquer un script à plusieurs fichiers DWG

et qui semble répondre à ta requête.

 

Amicalement

Vincent

 

[Edité le 24/11/2009 par zebulon_]

[t_pam]

Bonjour zebulon, bonjour à tous

 

Je reviens vers vous car j'ai besoin de compléter ce lisp.

 

Après vérification, j'ai deux nouveaux problèmes.

 

Car suite à ce changement de gabarit de travail, je m'aperçois au fur et à mesure des problèmes.

 

Le premier serait de modifier une hauteur (soit par le style de texte ou par sa hauteur) et cei avant sa modification de couleur.

 

Puis ma deuxième est que j'ai besoin que mes blocs dynamiques soient redéfinis avec les nouveaux paramétrages (calques, couleurs et formes).

Ils portent le même nom et sont sauvegardés dans le même répertoire.

 

Merci à nouveau pour votre aide.

 

Bonne journée à tous.

 

Thierry.