---

Hallo VB-ler,

ich habe in einer Form den CommonDialog eingebunden, um mit dem Farben-Schema eine Farbe auszuwaehlen. Der Rückgabewert ist Long, ich brauche aber RGB. Wie komme ich von diesem Long-Wert auf den RGB-Wert ?

Besten Dank fuer Euere hilfe.

Gruesse,

Paul

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Paul,

Der Long-Wert ist R + G*256 + B*256^2

HTH pablo

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Paul,

ich habe mittlerweile meine Funktion dafür gefunden:

Public Sub GetRGB(ByVal LongValue As Long, _
                  ByRef Red As Integer, _
                  ByRef Green As Integer, _
                  ByRef Blue As Integer)
  Blue = Int(LongValue / 65536)
  LongValue = LongValue - Blue * CLng(65536)
  Green = Int(LongValue / 256)
  Red = LongValue - Green * CLng(256)
End Sub

mfG pablo

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Pablo,

ist ja super ! Vielen herzlichen Dank - 10 unities und ein Haendedruck sind Dir gewiss !

Gruesse,

Paul

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP