Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic Couleur RGB

Couleur RGB

6 réponses
Avatar
Christophe
Bonjour,

voila le pb:

je veux afficher 256 couleurs.

soit i&=0 to 255

quelle est la valeur de couleur& en fonction de i& pour afficher une palette
de 256 couleur ?

Christophe Vergon
Signaler un problème avec ce contenu

6 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Zoury
Salut Christophe! :O)

Peux-tu nous préciser un peu plus le contexte? si tu te créer une image
(avec CreateBitmap) par exemple tu peux spécifier toi même les couleurs
contenu dans ta palette..

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous
"Christophe" wrote in message
news:bljpkd$o0$
Bonjour,

voila le pb:

je veux afficher 256 couleurs.

soit i&=0 to 255

quelle est la valeur de couleur& en fonction de i& pour afficher une


palette
de 256 couleur ?

Christophe Vergon




Avatar
Christophe
Bonjour,
je voudrais faire une form de selection de couleur, (moi même sans common
qqchose) ,

je dessine des carrés sur un pictureBox, enfin regarde le code ci-dessous
(qui ne marche pas comme il faut)

mydc.rectanglereal dessine un rectangle de la couleur spécifiée sur le DC.
(classe metricDC que tu connais)


couleur& = RGB(0, 0, 0)
X1 = 0
Y1 = 0
c& = 0
For i& = 0 To 7
For j& = 0 To 31
myDC.rectanglereal X1, Y1, X1 + 100, Y1 + 100, couleur&
X1 = X1 + 100
c& = c& + 32
couleur = RGB(i& * 32, (j& 4) * 32, (j& Mod 4) * 32)

'comment afficher 256 couleurs differentes ?? en fonction de i&,j&
Next j&
X1 = 0
Y1 = Y1 + 100
Next i&

Christophe Vergon

"Zoury" a écrit dans le message de news:

Salut Christophe! :O)

Peux-tu nous préciser un peu plus le contexte? si tu te créer une image
(avec CreateBitmap) par exemple tu peux spécifier toi même les couleurs
contenu dans ta palette..

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous
"Christophe" wrote in message
news:bljpkd$o0$
> Bonjour,
>
> voila le pb:
>
> je veux afficher 256 couleurs.
>
> soit i&=0 to 255
>
> quelle est la valeur de couleur& en fonction de i& pour afficher une
palette
> de 256 couleur ?
>
> Christophe Vergon
>
>




Avatar
Zoury
Salut Christophe! :O)

À mon avis ce sera à toi décider. Tu te créer un tableau de 256 éléments et
tu y places les couleurs dont tu as besoin, ensuite l'index de 0 à 255
indiquera la couleur contenue dans le tableau.

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous
"Christophe" wrote in message
news:blk02d$gl3$
Bonjour,
je voudrais faire une form de selection de couleur, (moi même sans common
qqchose) ,

je dessine des carrés sur un pictureBox, enfin regarde le code ci-dessous
(qui ne marche pas comme il faut)

mydc.rectanglereal dessine un rectangle de la couleur spécifiée sur le DC.
(classe metricDC que tu connais)


couleur& = RGB(0, 0, 0)
X1 = 0
Y1 = 0
c& = 0
For i& = 0 To 7
For j& = 0 To 31
myDC.rectanglereal X1, Y1, X1 + 100, Y1 + 100, couleur&
X1 = X1 + 100
c& = c& + 32
couleur = RGB(i& * 32, (j& 4) * 32, (j& Mod 4) * 32)

'comment afficher 256 couleurs differentes ?? en fonction de i&,j&
Next j&
X1 = 0
Y1 = Y1 + 100
Next i&

Christophe Vergon

"Zoury" a écrit dans le message de news:

> Salut Christophe! :O)
>
> Peux-tu nous préciser un peu plus le contexte? si tu te créer une image
> (avec CreateBitmap) par exemple tu peux spécifier toi même les couleurs
> contenu dans ta palette..
>
> --
> Cordialement
> Yanick Lefebvre - MVP pour Visual Basic
> http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
> http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/
>
> Merci de poster les réponses au groupe afin d'en faire profiter à tous
> "Christophe" wrote in message
> news:bljpkd$o0$
> > Bonjour,
> >
> > voila le pb:
> >
> > je veux afficher 256 couleurs.
> >
> > soit i&=0 to 255
> >
> > quelle est la valeur de couleur& en fonction de i& pour afficher une
> palette
> > de 256 couleur ?
> >
> > Christophe Vergon
> >
> >
>
>




Avatar
Christophe
En effet ça fait deux heures que je le tourne dans tous les sens
y'a pas moyen de trouver une fonction de i,j qui donnent 255 couleurs
differente couvrant tout le spectre.

Christophe Vergon
"Zoury" a écrit dans le message de news:
#ZNIP$
Salut Christophe! :O)

À mon avis ce sera à toi décider. Tu te créer un tableau de 256 éléments


et
tu y places les couleurs dont tu as besoin, ensuite l'index de 0 à 255
indiquera la couleur contenue dans le tableau.

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous
"Christophe" wrote in message
news:blk02d$gl3$
> Bonjour,
> je voudrais faire une form de selection de couleur, (moi même sans


common
> qqchose) ,
>
> je dessine des carrés sur un pictureBox, enfin regarde le code


ci-dessous
> (qui ne marche pas comme il faut)
>
> mydc.rectanglereal dessine un rectangle de la couleur spécifiée sur le


DC.
> (classe metricDC que tu connais)
>
>
> couleur& = RGB(0, 0, 0)
> X1 = 0
> Y1 = 0
> c& = 0
> For i& = 0 To 7
> For j& = 0 To 31
> myDC.rectanglereal X1, Y1, X1 + 100, Y1 + 100, couleur&
> X1 = X1 + 100
> c& = c& + 32
> couleur = RGB(i& * 32, (j& 4) * 32, (j& Mod 4) * 32)
>
> 'comment afficher 256 couleurs differentes ?? en fonction de i&,j&
> Next j&
> X1 = 0
> Y1 = Y1 + 100
> Next i&
>
> Christophe Vergon
>
> "Zoury" a écrit dans le message de news:
>
> > Salut Christophe! :O)
> >
> > Peux-tu nous préciser un peu plus le contexte? si tu te créer une


image
> > (avec CreateBitmap) par exemple tu peux spécifier toi même les


couleurs
> > contenu dans ta palette..
> >
> > --
> > Cordialement
> > Yanick Lefebvre - MVP pour Visual Basic
> > http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
> > http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/
> >
> > Merci de poster les réponses au groupe afin d'en faire profiter à tous
> > "Christophe" wrote in message
> > news:bljpkd$o0$
> > > Bonjour,
> > >
> > > voila le pb:
> > >
> > > je veux afficher 256 couleurs.
> > >
> > > soit i&=0 to 255
> > >
> > > quelle est la valeur de couleur& en fonction de i& pour afficher une
> > palette
> > > de 256 couleur ?
> > >
> > > Christophe Vergon
> > >
> > >
> >
> >
>
>




Avatar
4B Ingenierie
Salut Christophe,

Voici une solution à ton problème,

Dim it AS integer
Dim rc As Integer 'rang couleur
Dim R As Integer 'variable rouge
Dim G As Integer 'variable vert
Dim B As Integer 'variable bleu
Dim Couleur As Long

For it = 0 To 255
rc = it Mod 3 'car trois couleurs primaires

If it > 0 Then ' pour calculer toutes les couleurs différentes de
noir

Select Case rc
Case 0
B = B + 3
Case 1
R = R + 3
Case 2
G = G + 3
End Select

End If

Couleur = RGB(R, G, B)
myDC.rectanglereal X1, Y1, X1 + 100, Y1 + 100, Couleur
X1 = X1 + 100

Next it


à bientot,

Dominique




"Christophe" a écrit dans le message de news:
blk02d$gl3$
Bonjour,
je voudrais faire une form de selection de couleur, (moi même sans common
qqchose) ,

je dessine des carrés sur un pictureBox, enfin regarde le code ci-dessous
(qui ne marche pas comme il faut)

mydc.rectanglereal dessine un rectangle de la couleur spécifiée sur le DC.
(classe metricDC que tu connais)


couleur& = RGB(0, 0, 0)
X1 = 0
Y1 = 0
c& = 0
For i& = 0 To 7
For j& = 0 To 31
myDC.rectanglereal X1, Y1, X1 + 100, Y1 + 100, couleur&
X1 = X1 + 100
c& = c& + 32
couleur = RGB(i& * 32, (j& 4) * 32, (j& Mod 4) * 32)

'comment afficher 256 couleurs differentes ?? en fonction de i&,j&
Next j&
X1 = 0
Y1 = Y1 + 100
Next i&

Christophe Vergon

"Zoury" a écrit dans le message de news:

> Salut Christophe! :O)
>
> Peux-tu nous préciser un peu plus le contexte? si tu te créer une image
> (avec CreateBitmap) par exemple tu peux spécifier toi même les couleurs
> contenu dans ta palette..
>
> --
> Cordialement
> Yanick Lefebvre - MVP pour Visual Basic
> http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
> http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/
>
> Merci de poster les réponses au groupe afin d'en faire profiter à tous
> "Christophe" wrote in message
> news:bljpkd$o0$
> > Bonjour,
> >
> > voila le pb:
> >
> > je veux afficher 256 couleurs.
> >
> > soit i&=0 to 255
> >
> > quelle est la valeur de couleur& en fonction de i& pour afficher une
> palette
> > de 256 couleur ?
> >
> > Christophe Vergon
> >
> >
>
>




Avatar
Christophe
Je vais tester ça

Merci !!

Christophe Vergon
"4B Ingenierie" a écrit dans le message de news:

Salut Christophe,

Voici une solution à ton problème,

Dim it AS integer
Dim rc As Integer 'rang couleur
Dim R As Integer 'variable rouge
Dim G As Integer 'variable vert
Dim B As Integer 'variable bleu
Dim Couleur As Long

For it = 0 To 255
rc = it Mod 3 'car trois couleurs primaires

If it > 0 Then ' pour calculer toutes les couleurs différentes de
noir

Select Case rc
Case 0
B = B + 3
Case 1
R = R + 3
Case 2
G = G + 3
End Select

End If

Couleur = RGB(R, G, B)
myDC.rectanglereal X1, Y1, X1 + 100, Y1 + 100, Couleur
X1 = X1 + 100

Next it


à bientot,

Dominique




"Christophe" a écrit dans le message de news:
blk02d$gl3$
> Bonjour,
> je voudrais faire une form de selection de couleur, (moi même sans


common
> qqchose) ,
>
> je dessine des carrés sur un pictureBox, enfin regarde le code


ci-dessous
> (qui ne marche pas comme il faut)
>
> mydc.rectanglereal dessine un rectangle de la couleur spécifiée sur le


DC.
> (classe metricDC que tu connais)
>
>
> couleur& = RGB(0, 0, 0)
> X1 = 0
> Y1 = 0
> c& = 0
> For i& = 0 To 7
> For j& = 0 To 31
> myDC.rectanglereal X1, Y1, X1 + 100, Y1 + 100, couleur&
> X1 = X1 + 100
> c& = c& + 32
> couleur = RGB(i& * 32, (j& 4) * 32, (j& Mod 4) * 32)
>
> 'comment afficher 256 couleurs differentes ?? en fonction de i&,j&
> Next j&
> X1 = 0
> Y1 = Y1 + 100
> Next i&
>
> Christophe Vergon
>
> "Zoury" a écrit dans le message de news:
>
> > Salut Christophe! :O)
> >
> > Peux-tu nous préciser un peu plus le contexte? si tu te créer une


image
> > (avec CreateBitmap) par exemple tu peux spécifier toi même les


couleurs
> > contenu dans ta palette..
> >
> > --
> > Cordialement
> > Yanick Lefebvre - MVP pour Visual Basic
> > http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
> > http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/
> >
> > Merci de poster les réponses au groupe afin d'en faire profiter à tous
> > "Christophe" wrote in message
> > news:bljpkd$o0$
> > > Bonjour,
> > >
> > > voila le pb:
> > >
> > > je veux afficher 256 couleurs.
> > >
> > > soit i&=0 to 255
> > >
> > > quelle est la valeur de couleur& en fonction de i& pour afficher une
> > palette
> > > de 256 couleur ?
> > >
> > > Christophe Vergon
> > >
> > >
> >
> >
>
>