Ako získať viac farebných hodnôt RBG pre Delphi

v Delphi, typ TColor určuje farbu objektu. Používa sa pre vlastnosti farby mnohých komponentov a pre ďalšie vlastnosti, ktoré určujú hodnoty farieb.

Grafická jednotka obsahuje definície užitočných konštánt pre TColor. Napríklad, clBlue mapy na modrú, clRed mapy na červenú.

Viac hodnôt „CL“ = viac farieb

Môžete zadať TColor ako 4-bajt hexadecimálne číslo namiesto použitia konštánt definovaných v grafickej jednotke. Nízke tri bajty predstavujú intenzitu farieb RGB (červená, zelená, modrá) pre modrú, zelenú a červenú. Všimnite si inverziu z typickej hexánovej farby: Pre TColor je sekvencia modro-zelená-červená.

Napríklad červenú možno definovať ako TColor ($ 0000FF).

Premeniť RBG na TColor

Ak máte hodnoty pre intenzitu červenej, zelenej a modrej (číslo od 0 do 255 - typ „byte“), získajte hodnotu TColor takto:

var r, g, b: bajt; farba: TColor; začať r: = StrToInt (ledRed. Text); g: = StrToInt (ledGreen. Text); b: = StrToInt (ledBlue. Text); farba: = RGB (r, g, b); Shape1.Brush. Farba: = farba; koniec; 
instagram viewer

„LedRed“, „ledGreen“ a „ledBlue“ sú tri ovládacie prvky úprav, ktoré sa používajú na špecifikovanie intenzity každej farebnej zložky. Shape1 je ovládací prvok Delphi TShape.

Navigátor tipov pre Delphi:
»Ako analyzovať súbory oddelené TAB v Delphi
«IsDirectoryEmpty - funkcia Delphi na určenie, či je adresár prázdny (žiadne súbory, žiadne podpriečinky)