כיצד להשיג יותר ערכי צבע RBG עבור דלפי

בתוך דלפי, סוג TColor מציין את צבעו של אובייקט. הוא משמש על ידי מאפייני הצבע של רכיבים רבים ועל ידי מאפיינים אחרים המפרטים ערכי צבע.

יחידת הגרפיקה מכילה הגדרות של קבועים שימושיים עבור TColor. לדוגמה, מפות ClBlue לכחול, מפות ClRed לאדום.

ערכי "CL" נוספים = צבעים נוספים

אתה יכול לציין TColor כ- 4 בתים מספר הקסדצימלי במקום להשתמש בקבועים המוגדרים ביחידת הגרפיקה. שלושת הביטים הנמוכים מייצגים עוצמות צבע RGB (אדום, ירוק, כחול) עבור כחול, ירוק ואדום בהתאמה. שימו לב להיפוך מצבע משושה טיפוסי: עבור TColor, הרצף הוא כחול-ירוק-אדום.

לדוגמה, אדום ניתן להגדיר TColor (0000FF $).

המרת RBG ל- TColor

אם יש לך ערכים לעוצמות אדומות, ירוקות וכחולות (מספר בין 0 ל 255 - סוג "בייט"), הנה איך לקבל את הערך TColor:

var r, g, b: בייט; צבע: TColor; התחל r: = StrToInt (ledRed. טקסט); g: = StrToInt (ledGreen. טקסט); b: = StrToInt (ledBlue. טקסט); צבע: = RGB (r, g, b); צורה 1. צבע: = צבע; סוף; 

"LedRed", "ledGreen" ו- "ledBlue" הם שלושה פקדי עריכה המשמשים לציון העוצמה של כל רכיב צבע. Shape1 הוא בקרת TShape Delphi.

מנווט טיפים של דלפי:

instagram viewer

»כיצד לנתח קבצים מופרדים של TAB בדלפי
«IsDirectoryEmpty - פונקציית Delphi לקבוע אם הספרייה ריקה (ללא קבצים, ללא תיקיות משנה)

instagram story viewer