I Delphi, spesifiserer TColor-typen fargen på et objekt. Det brukes av fargeegenskapene til mange komponenter og av andre egenskaper som spesifiserer fargeverdier.
Grafikkenheten inneholder definisjoner av nyttige konstanter for TColor. For eksempel, clBlue-kart til blå, clRed-kart til rødt.
Flere "CL" -verdier = Flere farger
Du kan spesifisere TColor som en 4-byte heksadesimal antall i stedet for å bruke konstantene som er definert i Grafikkenheten. De lave tre byteene representerer RGB (rød, grønn, blå) fargeintensitet for henholdsvis blå, grønn og rød. Legg merke til inversjonen fra en typisk heksefarge: For TColor er sekvensen blå-grønn-rød.
Rød kan for eksempel defineres som TColor ($ 0000FF).
Konverter RBG til TColor
Hvis du har verdier for rød, grønn og blå intensitet (et tall fra 0 til 255 - "byte" -type), slik får du TColor-verdien:
Var r, g, b: Byte; farge: TColor; begynne r: = StrToInt (ledRed. Tekst); g: = StrToInt (ledGreen. Tekst); b: = StrToInt (ledBlue. Tekst); farge: = RGB (r, g, b); Shape1.Brush. Farge: = farge; slutt; "LedRed", "ledGreen" og "ledBlue" er tre redigeringskontroller som brukes til å spesifisere intensiteten til hver fargekomponent. Shape1 er en TShape Delphi-kontroll.
Delphi tipser navigatøren:
»Hvordan analysere TAB-avgrensede filer i Delphi
«IsDirectoryEmpty - Delphi-funksjon for å bestemme om en katalog er tom (ingen filer, ingen undermapper)