标题:请教:下面一段代码是开打winds的颜色对话框,取RGB值
取消只看楼主
sylknb
Rank: 4
等 级:贵宾
威 望:14
帖 子:1519
专家分:174
注 册:2006-6-3
结帖率:79.3%
已结贴  问题点数:20 回复次数:1 
请教:下面一段代码是开打winds的颜色对话框,取RGB值
下面一段代码是开打winds的颜色对话框,取RGB值  

nColor=GETCOLOR()  &&获得颜色编号
**注:RGB(R,G,B)=R+G*256+B*256*256
IF nColor#-1
   nR=BITAND(nColor,255)
   nG=BITAND(nColor,255*256)/256                           

  nB=BITAND(nColor,255*256*256)/(256*256)
   This.BackColor=RGB(nR,nG,nB)
   WITH Thisform.MSChart1.Backdrop
       .Fill.Style= 1  && VtFillStyleBrush
       .Fill.Brush.FillColor.Set(nR,nG,nB)
   ENDWITH
ENDIF   
 1、 为什么255*256?难道地G开始也是255吗?为什么还再除以256,

 2、BITAND()的作用?

 3.getcolor()返回的颜色编号,它是几进制?RGB()颜色值它是几进制?二者有何关系?
搜索更多相关主题的帖子: 对话框 
2010-12-31 09:02
sylknb
Rank: 4
等 级:贵宾
威 望:14
帖 子:1519
专家分:174
注 册:2006-6-3
得分:0 
1\这里用BITAND()的作用是什么?
2\为什么用了BITAND()后还要除以256或除以256*256?
2010-12-31 19:58



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-330329-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.983247 second(s), 10 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved