作者SmallBeeWayn (喵喵叫的蜜蜂猫)
看板Visual_Basic
标题Re: [VB6 ] 请问CommonDialog控制项内的ShowColor
时间Sat May 6 12:15:17 2006
※ 引述《winstonlim (wayne)》之铭言：
: 请问各位大大...
: CommonDialog 控制项内的ShowColor
: 由於我想在我选好一种颜色後
: 而要让Text1.Text上显示ShowColor的RGB值，如(255,155,200)
: 该如何抓它的值呢？
: Private Sub Command1_Click()
: CommonDialog1.flags = 2
: CommonDialog1.ShowColor
: Text1.BackColor = CommonDialog1.Color
: End Sub
: 拜托各位大大了...
如果是系统颜色的话，要先用
Declare Function GetSysColor Lib "user32.dll" (ByVal nIndex As Long) As Long
去抓值
出来的Long值用16进位表示就是bbggrr
用"\"跟"/"两个运算子就可以求出原来的RGB值了
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.115.207.65