Come posso ottenere un colore da Integer ?

[vuott]

https://www.gambas-club.de/viewtopic.php?f=3&t=5658

[Gianluigi]

Forse così 

Codice: [Seleziona]

Public Sub Form_Open()

  Dim hColorInfo As ColorInfo

  hColorInfo = Color[6357247]
  Print hColorInfo.Alpha
  Print hColorInfo.Blue
  Print hColorInfo.Color
  Print hColorInfo.Green
  Print hColorInfo.Hue
  Print hColorInfo.Luminance
  Print hColorInfo.Red
  Print hColorInfo.Saturation
  Print hColorInfo.Value

  ' Show color in a label (Label1)
  Label1.Background = Color.RGB(hColorInfo.Red, hColorInfo.Green, hColorInfo.Blue, hColorInfo.Alpha)

End

[vuott]

Probabilmente è quello che lui cerca, ma io non ho capito proprio niente di quello che cerca.

[Gianluigi]

Neanche io ho capito cosa vuol fare, ma ho capito e ho risposto a questa domanda:
"Was für eine Farbe ist der zahl 6357247 zugeordnet? Wie komme ich dahin?"

 

[Top Fuel]

E' molto più pratico scrivere i valori in esadecimale, così hai immediatamente davanti i livelli di rosso verde e blu.
6357247 diventa &H6100FF e vedi subito che è un viola un pò scuro.

[Top Fuel]

Probabilmente è quello che lui cerca, ma io non ho capito proprio niente di quello che cerca.

Si, vuole ottenere dei colori partendo da dei valori interi, però facendo come vuole lui diventa difficilissimo ottenere dei risultati leggibili.