山寨机中的战斗机！	程序优化工程师到底对IT界有没有贡献

哪位兄弟知道PB中各种颜色对应的RGB(?,?,?)数值(不包括参考手册中介绍的标准色)?

楼主whisperlgy（）2003-07-01 22:33:06 在 PowerBuilder / 基础类提问

哪位兄弟知道PB中各种颜色对应的RGB(?,?,?)数值(不包括参考手册中介绍的标准色)?
以前好像看到过这样的贴子,那位兄弟给我发一份问题点数：20、回复次数：11Top

1 楼yeqiufeng（叶秋枫）回复于 2003-07-01 22:55:39 得分 0

你连Windows 画图程序都没用好么

太专业了吧Top

2 楼klbt（快乐白兔）回复于 2003-07-01 23:40:32 得分 0

自己编写一个小程序，显示一遍，即可。Top

3 楼cmaboy（浪子）回复于 2003-07-02 02:43:19 得分 0

其实，你自己可以在数据窗口中自己定义颜色，不用reg,需要什么颜色，就自己定义个颜色，再查看数据窗口的源代码，就能拿到颜色的值。不用搞得那么专业Top

4 楼shahand（死磕）回复于 2003-07-02 09:13:28 得分 0

有一个折中的方法，
在dwsyntax中有rgb工具，选中你想要的颜色，点确定

然后你的剪贴板中就有了该颜色的rgb值，注意：这个是一个整数值，即rgb的返回值

再粘贴出来就行了Top

5 楼killerdanny（堕落的瓦拉斯塔兹）回复于 2003-07-02 09:25:48 得分 20

String is_ColorNames[] = { "AliceBlue", "AntiqueWhite", "Aqua", "Aquamarine", "Azure", "Beige", &
"Bisque", "Black", "BlanchedAlmond", "Blue", "BlueViolet", &
"Brown", "BurlyWood", "CadetBlue", "Chartreuse", "Chocolate", &
"Coral", "CornflowerBlue", "Cornsilk", "Crimson", "Cyan", &
"DarkBlue", "DarkCyan", "DarkGoldenrod", "DarkGray", "DarkGreen", &
"DarkKhaki", "DarkMagenta", "DarkOliveGreen", "DarkOrange", &
"DarkOrchid", "DarkRed", "DarkSalmon", "DarkSeaGreen", "DarkSlateBlue", &
"DarkSlateGray", "DarkTurquoise", "DarkViolet", "DeepPink", "DeepSkyBlue",&
"DimGray", "DodgerBlue" , "FireBrick", "FloralWhite", "ForestGreen", &
"Fuchsia", "Gainsboro", "GhostWhite", "Gold", "Goldenrod", "Gray", "Green", &
"GreenYellow", "Honeydew", "HotPink", "IndianRed", "Indigo", "Ivory", &
"Khaki", "Lavender", "LavenderBlush", "LawnGreen", "LemonChiffon", "LightBlue", &
"LightCoral", "LightCyan", "LightGoldenrodYellow", "LightGreen", "LightGrey", &
"LightPink", "LightSalmon", "LightSeaGreen", "LightSkyBlue", "LightSlateGray", &
"LightSteelBlue", "LightYellow", "Lime", "LimeGreen", "Linen", "Magenta", &
"Maroon", "MediumAquamarine", "MediumBlue", "MediumOrchid", "MediumPurple", &
"MediumSeaGreen", "MediumSlateBlue", "MediumSpringGreen", "MediumTurquoise", &
"MediumVioletRed", "MidnightBlue", "MintCream", "MistyRose", "Moccasin", &
"NavajoWhite", "Navy", "OldLace", "Olive", "OliveDrab", "Orange", "OrangeRed", &
"Orchid", "PaleGoldenrod", "PaleGreen", "PaleTurquoise", "PaleVioletRed", &
"PapayaWhip", "PeachPuff", "Peru", "Pink", "Plum", "PowderBlue", "Purple", &
"Red", "RosyBrown", "RoyalBlue", "SaddleBrown", "Salmon", "SandyBrown", &
"SeaGreen", "Seashell", "Sienna", "Silver", "SkyBlue", "SlateBlue", "SlateGray", &
"Snow", "SpringGreen", "SteelBlue", "Tan", "Teal", "Thistle", "Tomato", "Turquoise", &
"Violet", "Wheat", "White", "WhiteSmoke", "Yellow", "YellowGreen" }

Long il_Colors[] = { RGB( 240, 248, 255 ), RGB( 250, 235, 215 ), RGB( 0, 255, 255 ), RGB( 127, 255, 212 ), &
RGB( 240, 255, 255 ), RGB( 245, 245, 220 ), RGB( 255, 228, 196 ), RGB( 0, 0, 0 ), &
RGB( 255, 235, 205 ), RGB( 0, 0, 255 ), RGB( 138, 43, 226 ), RGB( 165, 42, 42 ), &
RGB( 222, 184, 135 ), RGB( 95, 158, 160 ), RGB( 127, 255, 0 ), RGB( 210, 105, 30 ), &
RGB( 255, 127, 80 ), RGB( 100, 149, 237 ), RGB( 255, 248, 220 ), RGB( 220, 20, 60 ), &
RGB( 0, 255, 255 ), RGB( 0, 0, 139 ), RGB( 0, 139, 139 ), RGB( 184, 134, 11 ), RGB( 169, 169, 169 ), &
RGB( 0, 100, 0 ), RGB( 189, 183, 107 ), RGB( 139, 0, 139 ), RGB( 85, 107, 47 ), &
RGB( 255, 140, 0 ), RGB( 153, 50, 204 ), RGB( 139, 0, 0 ), RGB( 233, 150, 122 ), &
RGB( 143, 188, 143 ), RGB( 72, 61, 139 ), RGB( 47, 79, 79 ), RGB( 0, 206, 209 ), &
RGB( 148, 0, 211 ), RGB( 255, 20, 147 ), RGB( 0, 191, 255 ), RGB( 105, 105, 105 ), &
RGB( 30, 144, 255 ), RGB( 178, 34, 34 ), RGB( 255, 250, 240 ), RGB( 34, 139, 34 ), &
RGB( 255, 0, 255 ), RGB( 220, 220, 220 ), RGB( 248, 248, 255 ), RGB( 255, 215, 0 ), &
RGB( 218, 165, 32 ), RGB( 128, 128, 128 ), RGB( 0, 128, 0 ), RGB( 173, 255, 47 ), &
RGB( 240, 255, 240 ), RGB( 255, 105, 180 ), RGB( 205, 92, 92 ), RGB( 75, 0, 130 ), &
RGB( 255, 255, 240 ), RGB( 240, 230, 140 ), RGB( 230, 230, 250 ), RGB( 255, 240, 245 ), &
RGB( 124, 252, 0 ), RGB( 255, 250, 205 ), RGB( 173, 216, 230 ), RGB( 240, 128, 128 ), &
RGB( 224, 255, 255 ), RGB( 250, 250, 210 ), RGB( 144, 238, 144 ), RGB( 211, 211, 211 ), &
RGB( 255, 182, 193 ), RGB( 255, 160, 122 ), RGB( 32, 178, 170 ), RGB( 135, 206, 250 ), &
RGB( 119, 136, 153 ), RGB( 176, 196, 222 ), RGB( 255, 255, 224 ), RGB( 0, 255, 0 ), &
RGB( 50, 205, 50 ), RGB( 250, 240, 230 ), RGB( 255, 0, 255 ), RGB( 128, 0, 0 ), &
RGB( 102, 205, 170 ), RGB( 0, 0, 205 ), RGB( 186, 85, 211 ), RGB( 147, 112, 219 ), &
RGB( 60, 179, 113 ), RGB( 123, 104, 238 ), RGB( 0, 250, 154 ), RGB( 72, 209, 204 ), &
RGB( 199, 21, 133 ), RGB( 25, 25, 112 ), RGB( 245, 255, 250 ), RGB( 255, 228, 225 ), &
RGB( 255, 228, 181 ), RGB( 255, 222, 173 ), RGB( 0, 0, 128 ), RGB( 253, 245, 230 ), &
RGB( 128, 128, 0 ), RGB( 107, 142, 35 ), RGB( 255, 165, 0 ), RGB( 255, 69, 0 ), &
RGB( 218, 112, 214 ), RGB( 238, 232, 170 ), RGB( 152, 251, 152 ), RGB( 175, 238, 238 ), &
RGB( 219, 112, 147 ), RGB( 255, 239, 213 ), RGB( 255, 218, 185 ), RGB( 205, 133, 63 ), &
RGB( 255, 192, 203 ), RGB( 221, 160, 221 ), RGB( 176, 224, 230 ), RGB( 128, 0, 128 ), &
RGB( 255, 0, 0 ), RGB( 188, 143, 143 ), RGB( 65, 105, 225 ), RGB( 139, 69, 19 ), &
RGB( 250, 128, 114 ), RGB( 244, 164, 96 ), RGB( 46, 139, 87 ), RGB( 255, 245, 238 ), &
RGB( 160, 82, 45 ), RGB( 192, 192, 192 ), RGB( 135, 206, 235 ), RGB( 106, 90, 205 ), &
RGB( 112, 128, 144 ), RGB( 255, 250, 250 ), RGB( 0, 255, 127 ), RGB( 70, 130, 180 ), &
RGB( 210, 180, 140 ), RGB( 0, 128, 128 ), RGB( 216, 191, 216 ), RGB( 255, 99, 71 ), &
RGB( 64, 224, 208 ), RGB( 238, 130, 238 ), RGB( 245, 222, 179 ), RGB( 255, 255, 255 ), &
RGB( 245, 245, 245 ), RGB( 255, 255, 0 ), RGB( 154, 205, 50 ) }
Top

6 楼qqf（我就是我）回复于 2003-07-02 09:29:54 得分 0

有这么长吗？直接复制屏幕，然后在PHOTOSHOP中粘贴，用吸管取得颜色的RGB不就行了吗？Top

7 楼booksfount（books）回复于 2003-07-02 09:47:11 得分 0

严重同意 shahand(死磕) ，在pb中就有颜色提取的工具：）Top

8 楼2dian1G（小硬盘）回复于 2003-07-02 09:53:18 得分 0

我用过5楼与7楼的方法，都很方便Top

9 楼will521（中国DotNet程序员俱乐部 -- www.willsft.com）回复于 2003-07-02 14:09:04 得分 0

先在窗口上放一个标签st_1,将它设为你想要的颜色然后放个按钮来取值

Long c,gc
Integer R,G,B
C = st_1.backcolor
gc=rgb(0,1,0)
R = Mod(c,gc)
C = C / gc
G = Mod(c,gc)
C = C / gc
B = Mod(c,gc)
Messagebox("RGB Value"," Red = "+string(R)+" Green = "+string(G)+" Blue = "+string(B))

当我想知道哪种色的RGB值时就时这么取的，非常方便，祝你好运！

Top

10 楼pjjia（飘曳）回复于 2003-07-02 16:35:41 得分 0

我有一个，留下mail给你发过去！Top

11 楼wzhgsww（石头）回复于 2003-12-06 23:46:37 得分 0

upTop