PowerBuilder 颜色值的转换(RGB转整数,整数转RGB)

最新推荐文章于 2024-08-11 08:44:55 发布

菜鸟--\(˙<>˙)/--战斗机

最新推荐文章于 2024-08-11 08:44:55 发布

阅读量863

点赞数

分类专栏： PowerBuilder 文章标签： PowerBuilder 颜色 RGB

本文链接：https://blog.csdn.net/weixin_37914760/article/details/103283154

版权

PowerBuilder 专栏收录该内容

70 篇文章 31 订阅

订阅专栏

废话不多说，直接上代码

string ls_r = '70',ls_g = '90',ls_b = '110'
long ll_rgb,ll_r,ll_g,ll_b

//============================================
//RGB转整数
//============================================
ll_rgb = 65536 * long(ls_b) + 256 * long(ls_g) + long(ls_r)
messagebox("rgb转整数",ll_rgb)

//============================================
//整数转RGB
//============================================
//将颜色值除以65536,得到整数就是b
ll_b = Truncate(ll_rgb / 65536,0)
//然后将余数除以256,得到整数就是g
ll_rgb = mod(ll_rgb,65536)
ll_g = Truncate(ll_rgb / 256,0)
//最后的余数就是r
ll_r = Mod(ll_rgb,256)
messagebox("整数转rgb",string(ll_r) + "," + string(ll_g) + "," + string(ll_b))
ll_rgb = rgb(ll_r,ll_g,ll_b)