couleur en integerRésolu

Question

bonjour,

je voudrais, dans une appli, dessiner certains objets dans une couleur qui d&#233;pend de param&#232;tres; par exemple si on met 102 dans le param&#232;tre, la couleur sera :R 102   G 102   B = 102

ce qui donnera toujours du gris &#233;tant donn&#233; qu'il y a la m&#234;me quantit&#233; de chaque couleur. Mais pour 102 par exemple j'obtiens du vert... Pour 178 du kaki, pour 204 c'est entre les 2...

voila une partie du code :

couleur := round(decimal*255)*1000000 + round(decimal*255)*1000 + round(decimal*255);
//la couleur est &#224; abcabcabc par ex 102102102
CoulGris := couleur;
Canvas.Pen.Color := CoulGris;
Canvas.MoveTo(PosX,YDeb);
Canvas.LineTo(PosX,YDeb-round(Longueur_Min_Hamp*CZ*CPG));

merci de votre aide...


<HR>
My heart is broke, but I have some BLOU...

Heart Shaped Box

WhiteHippo · Accepted Answer

Directement en utilisant la fonction RGB de Windows (Penser &#224; "uses Windows")

 CoulGris := TColor(RGB(102, 102, 102)); 

Cordialement.

BlouMan · Answer

merci &#231;a marche nickel chrome...


<HR>
My heart is broke, but I have some BLOU...

Heart Shaped Box

Couleur en integer

2 réponses

Votre réponse

Discussions similaires