Hogyan szerezzen be több RBG színértéket a Delphi számára

Ban ben Delphi, a TColor típus határozza meg az objektum színét. Számos összetevő színtulajdonsága és más színértékeket meghatározó tulajdonságok használják.

A Grafikus egység a TColor számára hasznos állandók meghatározásait tartalmazza. Például a clBlue kékre, clRed térképre pirosra térképez.

Több "CL" érték = több szín

Megadhatja a TColor 4 bájtot hexadecimális szám a Grafikus egységben meghatározott állandók használata helyett. Az alacsony három bájt az RGB (piros, zöld, kék) színintenzitást jelöli kék, zöld és piros színben. Vegye figyelembe az inverziót egy tipikus hexa színből: TColor esetén a sorozat kék-zöld-piros.

Például a piros meghatározható TColor-ként ($ 0000FF).

Konvertálni az RBG-t TColor-ra

Ha van vörös, zöld és kék intenzitása (0-tól 255-ig terjedő szám - "byte" típusú), akkor itt lehet megtudni a TColor értéket:

var r, g, b: Byte; szín: TColor; kezdődik r: = StrToInt (ledRed. Szöveg); g: = StrToInt (ledGreen. Szöveg); b: = StrToInt (ledBlue. Szöveg); szín: = RGB (r, g, b); Shape1.Brush. Szín: = szín; vég; 
instagram viewer

A „ledRed”, „ledGreen” és „ledBlue” három szerkesztési vezérlés, amelyeket az egyes színkomponensek intenzitásának meghatározására használnak. A Shape1 egy TShape Delphi vezérlő.

Delphi tippek navigátor:
»Hogyan elemezhetjük a TAB elválasztott fájljait a Delphiben
«IsDirectoryEmpty - Delphi függvény annak meghatározására, hogy egy könyvtár üres-e (nincs fájl, nincs almappa)

instagram story viewer