> 1 Hintergrundfarbe
> 1 Farbe x die auf Hintergrund liegt
>
> ich suche:
>
> 1 Farbe y die 50% transparenz besitzt zur Farbe x (nat�rlich
> auf meinem
> Hintergrund)
>
> alle Farben liegen Hexadezimal vor.
>
> ... weiss jemand von Euch wie man das hinbekommt/ausrechnet
> bzw. wo ich
> Informationen zu dem Thema finde.
>
H = &Hff0000 'rot
F = &H00ff00 'gr�n
C = mixcolors(H,F,0.5)
Function mixcolors(byval C1, byval C2, byval T)
dim R1, G1, B1, R2, G2, B2, R, G, B
R1 = (C1 and &Hff0000)/&H10000
G1 = (C1 and &H00ff00)/&H100
B1 = (C1 and &H0000ff)
R2 = (C2 and &Hff0000)/&H10000
G2 = (C2 and &H00ff00)/&H100
B2 = (C2 and &H0000ff)
R = int(R1*T) + int(R2*(1-T))
G = int(G1*T) + int(G2*(1-T))
B = int(B1*T) + int(B2*(1-T))
mixcolors = R*&Hff0000 + G*&H00ff00 + B
End function
Claudius
| [aspdecoffeehouse] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp
