couleur de texte de type rgb

[Worms69]

Bonjour,

 

Pour les lignes, il est possible de modifier les couleurs par des types RGB.

Pour les textes, est-il possible de faire la même chose? Cela ne semble pas être le cas à première vue.

Faut-il que j'affecte ces textes, en type du calque, dans un calque qui lui aura une couleur de type RGB?

 

Merci de votre aide

[(gile)]

Salut,

 

C'est possible avec les textes comme avec toutes les entités graphiques.

 

Mais si tu disais comment tu procèdes (command, entmod, ou vla-put-TrueColor) on pourrait certainement t'aider plus avant.

[Worms69]

Je comptais faire avec command mais c'est parce que je connais que ca pour l'instant.

( defun c:convline ()
;affecter la bon type et la bonne couleur aux textes
(setq t70_et_t100 (ssget "X" '(
		       (-4 . "			        (-4 . "			       	 (0 . "TEXT,MTEXT")
		         (62 . 70)
		        (-4 . "and>")
		        (-4 . "			       	 (0 . "TEXT,MTEXT")
		         (62 . 100)
		        (-4 . "and>")
		       (-4 . "or>")
		       );pour sélectionner les textes et mtextes qui ont 70 ou 100 comme couleur
	  )
)
(sssetfirst nil t70_et_t100)
(command "_modtext" t70_et_t100 "" "co" "150")) 

 

Sachant qu'ensuite, je souhaite modifier le style de texte et éventuellement la hauteur.

 

[Edité le 20/8/2010 par Worms69]

[Patrick_35]

Salut

 

J'ai aussi un peu simplifié le filtre

 

(defun c:convline (/ t70_et_t100)
 (if (setq t70_et_t100 (ssget "_x" (list (cons -4 "					    (cons 0 "TEXT,MTEXT")
				    (cons -4 "					      (cons 62 2)
				      (cons 62 3)
				    (cons -4 "or>")
				  (cons -4 "and>")
			    )
		)
     )
   (command "_.chprop" t70_et_t100 "" "_color" "150" "")
 )
)

 

Sachant qu'ensuite, je souhaite modifier le style de texte et éventuellement la hauteur.

Alors, regarde un peu les codes dxf et les fonctions entget, subst et entmod

 

@+

[Worms69]

En fait, je voulais juste changer l'inclinaison des textes et la couleur.

Et après avoir lu diverses contributions sur _style ici et là, j'en déduis que c'est plus rentable de le faire à la main. A priori, je n'ai qu'une inclinaison pour tous mes textes...

Par contre, je voudrais bien pouvoir changer avec command la couleur et mettre une couleur RGB, si possible.

Je vais continuer à chercher

 

Merci de votre aide

[(gile)]

Salut,

 

Pour changer la couleur avec command, tu peux utiliser la commande CHPROP comme montré par Patrick_35 (j'ai encore simplifié le filtre, le AND est inutile) :

 

(defun c:convline (/ t70_et_t100)
 (if (setq t70_et_t100
     (ssget '((0 . "TEXT,MTEXT")
	      (-4 . "		      (62 . 2)
	      (62 . 3)
	      (-4 . "or>")
	     )
     )
     )
   (command "_.chprop"	t70_et_t100 "" "_color"	"_true"	"195,150,60" "")
 )
 (princ)
)

 

 

[Worms69]

Mercid e votre aide!

 

Je vais essayer de comprendre les simplifications du filtre.

 

[Edité le 23/8/2010 par Worms69]