In Delphi, het type TColor specificeert de kleur van een object. Het wordt gebruikt door de kleureigenschap van veel componenten en door andere eigenschappen die kleurwaarden specificeren.
De grafische eenheid bevat definities van bruikbare constanten voor TColor. ClBlue-kaarten worden bijvoorbeeld blauw en clRed-kaarten rood.
Meer "CL" -waarden = meer kleuren
U kunt TColor specificeren als een 4-byte hexadecimaal getal in plaats van de constanten te gebruiken die zijn gedefinieerd in de grafische eenheid. De lage drie bytes vertegenwoordigen RGB (rood, groen, blauw) kleurintensiteiten voor respectievelijk blauw, groen en rood. Let op de inversie van een typische hex-kleur: voor TColor is de reeks blauw-groen-rood.
Rood kan bijvoorbeeld worden gedefinieerd als TColor ($ 0000FF).
Zet RBG om naar TColor
Als u waarden heeft voor de intensiteiten rood, groen en blauw (een getal van 0 tot 255 - type "byte"), kunt u als volgt de TColor-waarde ophalen:
var r, g, b: Byte; kleur: TColor; beginnen r: = StrToInt (ledRed. Tekst); g: = StrToInt (ledGreen. Tekst); b: = StrToInt (ledBlue. Tekst); kleur: = RGB (r, g, b); Shape1.Brush. Kleur: = kleur;
einde; De "ledRed", "ledGreen" en "ledBlue" zijn drie bewerkingsknoppen die worden gebruikt om de intensiteit van elke kleurcomponent op te geven. Shape1 is een TShape Delphi-besturing.
Delphi tips navigator:
»Hoe door TAB gescheiden bestanden te parseren in Delphi
«IsDirectoryEmpty - Delphi-functie om te bepalen of een directory leeg is (geen bestanden, geen submappen)