Nel Delphi, il tipo TColor specifica il colore di un oggetto. Viene utilizzato dalla proprietà color di molti componenti e da altre proprietà che specificano i valori di colore.
L'unità grafica contiene definizioni di costanti utili per TColor. Ad esempio, clBlue mappa in blu, clRed in rosso.
Più valori "CL" = Più colori
È possibile specificare TColor come 4 byte numero esadecimale invece di usare le costanti definite nell'unità grafica. I tre byte bassi rappresentano intensità di colore RGB (rosso, verde, blu) rispettivamente per blu, verde e rosso. Nota l'inversione da un tipico colore esadecimale: per TColor, la sequenza è blu-verde-rosso.
Ad esempio, il rosso può essere definito come TColor ($ 0000FF).
Convertire RBG in TColor
Se hai valori per intensità rosso, verde e blu (un numero compreso tra 0 e 255 - tipo "byte"), ecco come ottenere il valore TColor:
var r, g, b: byte; colore: TColor; inizio r: = StrToInt (ledRed. Testo); g: = StrToInt (ledGreen. Testo); b: = StrToInt (ledBlue. Testo); colore: = RGB (r, g, b); Shape1.Brush. Colore: = colore; fine;
"LedRed", "ledGreen" e "ledBlue" sono tre controlli di modifica utilizzati per specificare l'intensità di ciascun componente di colore. Shape1 è un controllo TShape Delphi.
Navigatore suggerimenti Delphi:
»Come analizzare i file delimitati da TAB in Delphi
«IsDirectoryEmpty - Funzione Delphi per determinare se una directory è vuota (nessun file, nessuna sottocartella)