Cum să obțineți mai multe valori de culoare RBG pentru Delphi

În Delphi, tipul TColor specifică culoarea unui obiect. Este utilizat de proprietatea de culoare a multor componente și de alte proprietăți care specifică valorile culorii.

Unitatea Grafică conține definiții ale constantelor utile pentru TColor. De exemplu, hărți clBlue la albastru, hărți clRed la roșu.

Mai multe valori „CL” = mai multe culori

Puteți specifica TColor ca 4 octeți număr hexadecimal în loc să folosească constantele definite în unitatea Grafică. Cele trei octeți scăzute reprezintă intensități de culoare RGB (roșu, verde, albastru) pentru albastru, verde și respectiv roșu. Notă inversarea dintr-o culoare tip hex: pentru TColor, secvența este albastru-verde-roșu.

De exemplu, roșu poate fi definit ca TColor ($ 0000FF).

Convertiți RBG în TColor

Dacă aveți valori pentru intensități roșu, verde și albastru (un număr de la 0 la 255 - tip „byte”), iată cum puteți obține valoarea TColor:

var r, g, b: octet; culoare: TColor; începe r: = StrToInt (ledRed. Text); g: = StrToInt (ledGreen. Text); b: = StrToInt (ledBlue. Text); culoare: = RGB (r, g, b); Shape1.Brush. Culoare: = culoare; 
instagram viewer
Sfârșit;

"LedRed", "ledGreen" și "ledBlue" sunt trei controale de editare utilizate pentru a specifica intensitatea fiecărei componente de culoare. Shape1 este un control TShape Delphi.

Navigator pentru sfaturi Delphi:
»Cum să analizați fișierele delimitate TAB în Delphi
«IsDirectoryEmpty - funcția Delphi pentru a determina dacă un director este gol (fără fișiere, fără sub-foldere)

instagram story viewer