So erhalten Sie mehr RBG-Farbwerte für Delphi

Im DelphiDer Typ TColor gibt die Farbe eines Objekts an. Es wird von der Farbeigenschaft vieler Komponenten und von anderen Eigenschaften verwendet, die Farbwerte angeben.

Die Grafikeinheit enthält Definitionen nützlicher Konstanten für TColor. Zum Beispiel werden clBlue blau und clRed rot zugeordnet.

Sie können TColor als 4-Byte angeben Hexadezimalzahl anstatt die in der Grafikeinheit definierten Konstanten zu verwenden. Die niedrigen drei Bytes repräsentieren die RGB-Farbintensitäten (rot, grün, blau) für blau, grün bzw. rot. Beachten Sie die Umkehrung von einer typischen Hex-Farbe: Für TColor ist die Sequenz blau-grün-rot.

Beispielsweise kann Rot als TColor ($ 0000FF) definiert werden.

Wenn Sie Werte für die Intensitäten Rot, Grün und Blau haben (eine Zahl von 0 bis 255 - Typ "Byte"), erhalten Sie den TColor-Wert folgendermaßen:

var r, g, b: Byte; Farbe: TColor; Start r: = StrToInt (ledRed. Text); g: = StrToInt (ledGreen. Text); b: = StrToInt (ledBlue. Text); Farbe: = RGB (r, g, b); Shape1.Brush. Farbe: = Farbe; Ende; 

"LedRed", "ledGreen" und "ledBlue" sind drei Bearbeitungssteuerelemente, mit denen die Intensität jeder Farbkomponente festgelegt wird. Shape1 ist ein TShape Delphi-Steuerelement.

Delphi Tipps Navigator:
»Analysieren von TAB-getrennten Dateien in Delphi
«IsDirectoryEmpty - Delphi-Funktion zum Feststellen, ob ein Verzeichnis leer ist (keine Dateien, keine Unterordner)