| KUVAUS |
| Tällä funktiolla voit muuttaa haluamasi ikkunan otsikkopalkin aktiivista ja ei-aktiivista liukuväriä. Voit asettaa värit myös oletusväreiksi seuraaville uusille ikkunoille. Huom! Funktiolle ei kelpaa CoolBasicin värivakiot! Lisäksi ikkunan otsikkopalkin päivitys vaatii myös sen, että CoolBasicin piirtoväri muutetaan. |
| KÄYTTÖ |
| ChangeWindowHeadbarColors(id, r1,g1,b1, r2,g2,b2, ra1,ga1,ba1, ra2,ga2,ba2) |
| Id - Muutettavan ikkunan id. Voit korvata tämän myös ALL_WINDOWS-vakiolla, jolloin väreistä tulee oletusvärit. r1,g1,b1 - Ei-aktiivisen liukuvärin se ääripää, joka tulee uloimmaksi koko ikkunassa. r2,g2,b2 - Ei-aktiivisen liukuvärin se ääripää, joka tulee ikkunassa sisemmäksi. ra1,ga1,ba1 - Aktiivisen liukuvärin se ääripää, joka tulee uloimmaksi koko ikkunassa. ra2,ga2,ba2 - Aktiivisen liukuvärin se ääripää, joka tulee ikkunassa sisemmäksi. |
Katso myös: ChangeWindowBorderColors, ChangeWindowBackgroundColor
| ESIMERKKI |
SCREEN 800,600
Include "sdk/include/cbJanelas.cb"
w = NewWindow("Väritettävä ikkuna",100,150,300,100)
Repeat
DrawToWindow(w)
Color 255,255,255
Text 0,0, "Paina Enter vaihtaaksesi värejäni."
DrawToScreen
If KeyHit(cbkeyreturn) Then
r1 = Rand(0,255)
g1 = Rand(0,255)
b1 = Rand(0,255)
r2 = Rand(0,255)
g2 = Rand(0,255)
b2 = Rand(0,255)
ra1 = Rand(0,255)
ga1 = Rand(0,255)
ba1 = Rand(0,255)
ra2 = Rand(0,255)
ga2 = Rand(0,255)
ba2 = Rand(0,255)
ChangeWindowBorderColors(w, r1,g1,b1, r2,g2,b2)
ChangeWindowBackgroundColor(w, Rand(255),Rand(255),Rand(255))
ChangeWindowHeadbarColors(w, r1,g1,b1, r2,g2,b2, ra1,ga1,ba1, ra2,ga2,ba2)
End If
UpdateWindows()
DrawScreen
Forever |