Kuinka saada enemmän RBG-väriarvoja Delphille

click fraud protection

Sisään Delfoi, TColor-tyyppi määrittelee kohteen värin. Sitä käyttävät monien komponenttien väriominaisuudet ja muut ominaisuudet, jotka määrittävät väriarvot.

Grafiikkayksikkö sisältää määritelmät hyödyllisistä vakioista TColorille. Esimerkiksi, clBlue kartat sinisiksi, clRed kartat punaisiksi.

Lisää "CL" -arvoja = enemmän värejä

Voit määrittää TColorin 4-tavuksi heksadesimaaliluku sen sijaan, että käytettäisiin grafiikkayksikössä määritettyjä vakioita. Alemmat kolme tavua edustavat vastaavasti sinisen, vihreän ja punaisen RGB (punainen, vihreä, sininen) värivoimakkuutta. Huomaa käänteinen tyypillisestä kuusiväristä: TColorin sekvenssi on sinivihreä-punainen.

Punainen voidaan määritellä esimerkiksi TColoriksi ($ 0000FF).

Muunna RBG TColoriksi

Jos sinulla on punaisen, vihreän ja sinisen intensiteetin arvot (luku välillä 0 - 255 - "tavu" tyyppi), TColor-arvo saadaan seuraavalla tavalla:

var r, g, b: Tavu; väri: TColor; alkaa r: = StrToInt (ledRed. Teksti); g: = StrToInt (ledGreen. Teksti); b: = StrToInt (ledBlue. Teksti); väri: = RGB (r, g, b); Shape1.Brush. Väri: = väri; pää; 
instagram viewer

"LedRed", "ledGreen" ja "ledBlue" ovat kolme muokkausohjainta, joita käytetään kunkin värikomponentin voimakkuuden määrittämiseen. Shape1 on TShape Delphi -ohjaus.

Delphi tips navigaattori:
»Kuinka jäsentää TAB: n rajatut tiedostot Delphissä
«IsDirectoryEmpty - Delphi-toiminto sen määrittämiseksi, onko hakemisto tyhjä (ei tiedostoja, ei alikansioita)

instagram story viewer