PDA

View Full Version : COLOR TO RGB


شفیعی
جمعه 16 تیر 1385, 11:43 صبح
سلام
می خواهیم رنگی را که از ColorBox1.Color می گیریم تبدیل به RGB بکنیم و در دستور glColor3ub استفاده کنیم
dkhatibi
شنبه 17 تیر 1385, 08:34 صبح
این تابع جواب نمی دهد؟


ColorToRGB(Color)
شفیعی
شنبه 17 تیر 1385, 19:07 عصر
سلام
دوست عزیز COLOR را چگونه به R-G-B تبدیل کنم


glColor3ub(B,G,R);
vcldeveloper
یک شنبه 18 تیر 1385, 06:23 صبح
از همون ColorToRGB می تونید استفاده کنید. اگه عدد بدست اومده را در مبنا هگزا در نظر بگیرید 2 رقم سمت راست میزان رنگ قرمز، 2 رقم بعدی میزان رنگ سبز و 2 رقم سمت چپ میزان رنگ آبی را نشون میده. می تونید اونها را در متغییر هایی ذخیره کنید و به تابع glColor3ub پاس بدید.
شفیعی
یک شنبه 18 تیر 1385, 19:40 عصر
سلام


GraphColor.R := FORM1.ColorBox1.Selected AND $000000FF;
GraphColor.G :=(FORM1.ColorBox1.Selected AND $0000FF00) DIV 256;
GraphColor.B :=(FORM1.ColorBox1.Selected AND $00FF0000) DIV 65536;

کد بالا را از یکجا پیدا کردم ولی درست جواب نمی دهد علت چیست