Kaip gauti daugiau „Delphi“ RBG spalvų verčių

Į Delfi, TColor tipas nurodo objekto spalvą. Jį naudoja daugelio komponentų spalvų savybės ir kitos savybės, kurios nurodo spalvų reikšmes.

Grafikos skyriuje pateikiamos naudingos TColor konstantos. Pvz., „ClBlue“ žemėlapiai yra mėlyni, „clRed“ žemėlapiai - raudoni.

Daugiau „CL“ reikšmių = daugiau spalvų

Galite nurodyti „TColor“ kaip 4 baitų šešioliktainis skaičius užuot naudoję grafikos skyriuje apibrėžtas konstantas. Trys žemi baitai rodo RGB (raudonos, žalios, mėlynos) spalvų intensyvumą atitinkamai mėlynai, žaliajai ir raudonajai. Atkreipkite dėmesį į tipiškos šešiabriaunės spalvos inversiją: „TColor“ seka yra mėlynai žalia, raudona.

Pavyzdžiui, raudona spalva gali būti apibrėžta kaip „TColor“ (0000FF).

Konvertuoti RBG į TColor

Jei turite raudonos, žalios ir mėlynos spalvos ryškumo reikšmes (skaičius nuo 0 iki 255 - „baito“ tipo), štai kaip sužinoti „TColor“ vertę:

var r, g, b: baitas; spalva: TColor; prasideda r: = StrToInt (ledRed. Tekstas); g: = StrToInt (ledGreen. Tekstas); b: = StrToInt (ledBlue. Tekstas); spalva: = RGB (r, g, b); Forma1.Skrudutis. Spalva: = spalva; galas; 
instagram viewer

„LedRed“, „ledGreen“ ir „ledBlue“ yra trys redagavimo valdikliai, naudojami kiekvieno spalvos komponento intensyvumui nurodyti. „Shape1“ yra „TShape Delphi“ valdiklis.

„Delphi“ patarimų navigatorius:
Kaip parsisiųsti TAB atskirtus failus Delfyje
«IsDirectoryEmpty -„ Delphi “funkcija norint nustatyti, ar katalogas tuščias (nėra failų, nėra pakatalogių)

instagram story viewer