/
Forside
/
Teknologi
/
Udvikling
/
VB/Basic
/
Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn
*
Kodeord
*
Husk mig
Brugerservice
Kom godt i gang
Bliv medlem
Seneste indlæg
Find en bruger
Stil et spørgsmål
Skriv et tip
Fortæl en ven
Pointsystemet
Kontakt Kandu.dk
Emnevisning
Kategorier
Alfabetisk
Karriere
Interesser
Teknologi
Reklame
Top 10 brugere
VB/Basic
#
Navn
Point
1
berpox
2425
2
pete
1435
3
CADmageren
1251
4
gibson
1230
5
Phylock
887
6
gandalf
836
7
AntonV
790
8
strarup
750
9
Benjamin...
700
10
tom.kise
610
Værdi i CommonDialog1.ShowColor
Fra :
Kasper Katzmann
Dato :
15-11-01 10:55
Er der nogen der kan fortælle mig hvad det er
for en værdi der bliver returneret, når jeg bruger
CommonDialog.ShowColor.
Har jeg valgt hvid, returnerer CommonDialog.Color
værdien: 16777215
Det kan jo ikke være RGB, da det ville levere 255 255 255
Det kan heller ikke være Hex, da det ville levere FF FF FF
Hvad er det så og hvordan får jeg konverteret det til Hexadecimal?
Hilsen Kasper K
Kasper Katzmann (
15-11-2001
)
Kommentar
Fra :
Kasper Katzmann
Dato :
15-11-01 10:57
Den returnerer for øvrigt den rigtige farve.
Det er blot den numeriske værdi jeg ikke helt forstår.
/Kasper K
Harald Staff (
15-11-2001
)
Kommentar
Fra :
Harald Staff
Dato :
15-11-01 12:03
Kasper
VB bruker en long-verdi for farve. Det er bare sånn det er. Du kan
konvertere med disse:
Function RGBfromLong(WhatColor As Long) As String
Dim R As Integer
Dim G As Integer
Dim B As Integer
R = (WhatColor And &HFF&)
G = (WhatColor And &HFF00&) / &H100&
B = (WhatColor And &HFF0000) / &H10000
RGBfromLong = "(" & R & ", " & G & ", " & B & ")"
End Function
Function HTMLfromLong(WhatColor As Long) As String
Dim Red As String, Green As String, Blue As String
Red$ = Hex(WhatColor And 255)
Green$ = Hex(WhatColor \ 256 And 255)
Blue$ = Hex(WhatColor \ 65536 And 255)
If Len(Red$) < 2 Then Red$ = "0" & Red
If Len(Green$) < 2 Then Green$ = "0" & Green
If Len(Blue$) < 2 Then Blue$ = "0" & Blue
HTMLfromLong = "#" & Red$ & Green$ & Blue$
End Function
HTH. Beste hilsen Harald
Kasper Katzmann <kasper@katzmann.dk> skrev i news:9t03hp$ba6$1@sunsite.dk...
> Den returnerer for øvrigt den rigtige farve.
> Det er blot den numeriske værdi jeg ikke helt forstår.
>
>
> /Kasper K
>
>
Søg
Alle emner
Teknologi
Udvikling
VB/Basic
Indstillinger
Spørgsmål
Tips
Usenet
Reklame
Statistik
Spørgsmål :
177558
Tips :
31968
Nyheder :
719565
Indlæg :
6408928
Brugere :
218888
Månedens bedste
Årets bedste
Sidste års bedste
Copyright © 2000-2024 kandu.dk. Alle rettigheder forbeholdes.