déclarer etutiliser RGB pour niveau de gris ? Comment faire ?

Question

J'ai toujours des difficulter. Je ne parviens pas &#224; utiliser RGB(10,10,10) Avec AUTOCAD 2000.
sur Autocad 2004 je d&#233;clare Color1 comme &#231;a :
'
Dim color1 As New AcadAcCmColor
'
et la macro s'ex&#233;cute sans probl&#232;me.
Par contre sur Autocad 2000 je ne parviens pas &#224; faire cette d&#233;claration. J'&#233;cris ce qui suit, et je me plante. 

Public Sub ImportPoints()
'
 Dim lineobj As AcadLine
 Dim Color1 As Long
'Set lineobj ThisDrawing.ModelSpace.AddLine(PointD&#233;part, PointFin)                Color1 RGB(1, 1, 1)
lineObj.Color = Color1
'
Comment faire pour utiliser correctement RGB et le d&#233;clarer sur AUTOCAD 2000 ?

Avec ceci je compte faire des images en niveau de gris en r&#233;cup&#233;rant des nuages de points(x,y,z) avec une fraiseuse. La hauteur Z me donne le niveau de gris. 
Merci pour tout renseignement me permettant de colorier mes lignes en niveaux de gris tel que : RGB(z,z,z)

  raftanellel

PCPT · Answer

la fonction RGB existe-t'elle sous AUTOCAD ?

sinon il faut la faire toi-m&#234;me

raftanelle · Answer

La fonction RGB existe mes d&#232;s que le r&#233;sultat ex&#232;de 255 un message d'erreur s'affiche. le probl&#232;me est dans l'utilisation de :

lineObj.Color = RGB(100,100,100)

"color"  n'accepte que des valeur inf&#233;rieure &#224; 255, aucune valeur RGB &#224; premi&#232;re vue.
Comment affecter une couleur RGB &#224; un objet ?

 raftanellel

PCPT · Answer

beh si color est en Byte, il n'y a pas de solution miracle....

c'est particulier &#224; AutoCad, tu es donc sans doute le mieux plac&#233;.
essai de tracer ta ligne d'une autre mani&#232;re, de voir s'il existe des
constantes < 256, ou peut-&#234;tre uniquement en Hexa (&#231;&#224;
m'&#233;tonnerait..) pour OLE_COLOR

++

Déclarer etutiliser RGB pour niveau de gris ? Comment faire ?

3 réponses

Discussions similaires