En Delphi, el tipo TColor especifica el color de un objeto. Lo utiliza la propiedad de color de muchos componentes y otras propiedades que especifican valores de color.
La unidad de gráficos contiene definiciones de constantes útiles para TColor. Por ejemplo, clBlue se asigna a azul, clRed se asigna a rojo.
Más valores "CL" = más colores
Puede especificar TColor como 4 bytes número hexadecimal en lugar de usar las constantes definidas en la unidad de gráficos. Los tres bytes bajos representan intensidades de color RGB (rojo, verde, azul) para azul, verde y rojo, respectivamente. Tenga en cuenta la inversión de un color hexadecimal típico: para TColor, la secuencia es azul-verde-rojo.
Por ejemplo, el rojo se puede definir como TColor ($ 0000FF).
Convertir RBG a TColor
Si tiene valores para las intensidades roja, verde y azul (un número de 0 a 255 - tipo "byte"), aquí le mostramos cómo obtener el valor TColor:
var r, g, b: Byte; color: TColor; empezar r: = StrToInt (ledRed. Texto); g: = StrToInt (ledGreen. Texto); b: = StrToInt (ledBlue. Texto); color: = RGB (r, g, b); Forma 1. Cepillo. Color: = color;
final; "LedRed", "ledGreen" y "ledBlue" son tres controles de edición que se utilizan para especificar la intensidad de cada componente de color. Shape1 es un control TShape Delphi.
Navegador de consejos de Delphi:
»Cómo analizar archivos delimitados por TAB en Delphi
«IsDirectoryEmpty - Función Delphi para determinar si un directorio está vacío (sin archivos, sin subcarpetas)