> hallo claudius,
>
> wenn ich deine funktion auf einen dunklen braunton anwende,
> ihn mit weiss
> vermische, m�chte ich eigentlich einen helleren braunton
> haben, irgendwie
> kommt aber immer nur ein gr�nton raus.
War gestern nur mal so runtergeschrieben... Habe es jetzt getestet und
einen fehler entdeckt...
mixcolors = R*&Hff0000 + G*&H00ff00 + B
M�sste nat�rlich so heissen:
mixcolors = R*&H10000 + G*&H100 + B
Aber selbst danach funktioniert es immer noch nicht, weil VBS davon
�berzeugt ist, dass &HFF00 = -256 ... Er interpretiert das als
2Byte-Word...
Dann halt alles dezimal, auch wenn es nicht mehr so gut lesbar ist...
Function mixcolors(byval C1, byval C2, byval T)
dim R1, G1, B1, R2, G2, B2, R, G, B
R1 = (C1 and 16711680)/65536
G1 = (C1 and 65280)/256
B1 = (C1 and 255)
R2 = (C2 and 16711680)/65536
G2 = (C2 and 65280)/256
B2 = (C2 and 255)
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*65536 + G*256 + B
End function
Claudius
>
> gruss
>
> matthias
>
> <%
> H = &Hf7f7f7 'rot
> F = &H804000 '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
> %>
> <html>
>
> <head>
>
> </head>
>
> <body>
>
> <div align="center">
> <center>
> <table border="0" cellpadding="0" cellspacing="0" width="200"
> height="100">
> <tr>
> <td bgcolor="#804000"></td>
> <td bgcolor="#<% = C %>"></td>
> </tr>
> </table>
> </center>
> </div>
>
> </body>
>
> </html>
>
>
>
> -----Urspr�ngliche Nachricht-----
> Von: Claudius Ceteras [mailto:[EMAIL PROTECTED]]
> Gesendet: Sonntag, 8. September 2002 21:53
> An: AspGerman Kaffeehaus
> Betreff: [aspdecoffeehouse] RE: AW: RE: Farben berechnen
>
>
> Verstehe nicht genau was du meinst mit verdoppeln...
> Aber wenn Du eine Farbe mit 50% transparenz auf eine andere legst,
> passiert genau das....
> Die farbe wird gemischt!
>
> Claudius
>
> > -----Original Message-----
> > From: Matthias Winkler [mailto:[EMAIL PROTECTED]]
> > Sent: Sonntag, 8. September 2002 20:39
> > To: AspGerman Kaffeehaus
> > Subject: [aspdecoffeehouse] AW: RE: Farben berechnen
> >
> >
> > hallo claudius,
> >
> > danke erstmal, aber es ist nicht das was ich suche. wenn ich
> > die function so
> > ansehe und probiere werden die farben nur gemischt.
> >
> > ich will den effekt haben, habe eine hfarbe und ein objekt
> > mit der farbe x
> > welches auf hintergrund liegt, ich verdoplle mein objekt,
> > gehe in meinem
> > grafikprogramm auf 50% transparenz. das objekt wird nun bei weissem
> > hintergund etwas heller.
> >
> > gruss
> > matthias
> >
> > -----Urspr�ngliche Nachricht-----
> > Von: Claudius Ceteras [mailto:[EMAIL PROTECTED]]
> > Gesendet: Sonntag, 8. September 2002 19:25
> > An: AspGerman Kaffeehaus
> > Betreff: [aspdecoffeehouse] RE: Farben berechnen
> >
> >
> > > 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/aspdecoffee
> house.asp
>
>
> | [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/aspdecoffee
house.asp
| [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
| [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
| [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
