में डेल्फी, TColor प्रकार किसी वस्तु का रंग निर्दिष्ट करता है। इसका उपयोग कई घटकों की रंग संपत्ति और अन्य गुणों द्वारा किया जाता है जो रंग मूल्यों को निर्दिष्ट करते हैं।
ग्राफिक्स यूनिट में टीसीरोल के लिए उपयोगी स्थिरांक की परिभाषाएँ हैं। उदाहरण के लिए, नीले रंग के नक्शे को दबाएं, लाल रंग के नक्शे को दबाएं।
अधिक "सीएल" मान = अधिक रंग
आप टीसीरोल को 4-बाइट के रूप में निर्दिष्ट कर सकते हैं हेक्साडेसिमल संख्या ग्राफिक्स यूनिट में परिभाषित स्थिरांक का उपयोग करने के बजाय। निम्न तीन बाइट क्रमशः नीले, हरे और लाल रंग के लिए RGB (लाल, हरा, नीला) रंग की तीव्रता का प्रतिनिधित्व करते हैं। एक विशिष्ट हेक्स रंग से उलटा ध्यान दें: टीसीरोल के लिए, अनुक्रम नीला-हरा-लाल है।
उदाहरण के लिए, लाल को TColor ($ 0000FF) के रूप में परिभाषित किया जा सकता है।
बदलना RBG तक टीसीरोल
यदि आपके पास लाल, हरे और नीले रंग की तीव्रता (0 से 255 तक की संख्या - "बाइट" प्रकार) के मान हैं, तो यहां बताया गया है कि टीसीरोल मान कैसे प्राप्त करें:
वर आर, जी, बी: बाइट; रंग: टीसीरोल; शुरू r: = StrToInt (ledRed) पाठ); g: = StrToInt (ledGreen)। पाठ); b: = StrToInt (ledBlue) पाठ); रंग: = आरजीबी (आर, जी, बी); Shape1.Brush। रंग: = रंग;
समाप्त; "LedRed", "ledGreen" और "ledBlue" तीन रंग नियंत्रण हैं जो प्रत्येक रंग घटक की तीव्रता को निर्दिष्ट करने के लिए उपयोग किए जाते हैं। Shape1 एक TShape डेल्फी नियंत्रण है।
डेल्फी टिप्स नाविक:
कैसे डेल्फी में TAB डिलीट की गई फाइलें पार्स करें
«IsDirectoryEmpty - एक निर्देशिका खाली होने पर निर्धारित करने के लिए डेल्फी फ़ंक्शन (कोई फ़ाइल नहीं, कोई उप-फ़ोल्डर नहीं)