|
|
导航: |
论坛 -> DELPHI技术
斑竹:liumazi,sephil |
|
作者: |
asddd (白菜帮子) |
★☆☆☆☆ |
-
|
普通会员 |
|
2004/3/5 21:04:33 |
标题: |
|
加入我的收藏 |
楼主: |
老大,TColor 表示的颜色值是怎么换算的?我习惯于 用#FFFFFF表示颜色,谁知道怎样将#000000----#FFFFFF 表示的颜色值换算为delphi的 TColor 值?反过来又该怎样换算?
怎样读取鼠标处的颜色值呢?
多谢啊!老大,助我啊!!!
----------------------------------------------
-我菜,就想我最喜欢吃的白菜... |
作者: |
cjrb (Thinking In 魂) |
★☆☆☆☆ |
-
|
盒子活跃会员 |
|
2004/3/5 21:32:39 |
1楼: |
var t:TColor; r,g,b:Byte;
canvas.pixels[x,y]; r:=GetRValue(t); g:=GetGValue(t); b:=GetBValue(t); LABEL2.COLOR := T; LABEL1.CAPTION := '$00' + HEXB(R) + HEXB(G) + HEXB(B);
----------------------------------------------
充电..........
|
作者: |
|
2004/3/6 9:38:24 |
2楼: |
学到!
----------------------------------------------
我来自农村广阔的田野我的每一个动作都很夸张http://waterstone.51r.com
|
作者: |
asddd (白菜帮子) |
★☆☆☆☆ |
-
|
普通会员 |
|
2004/3/6 9:50:42 |
3楼: |
收到,老大,多谢了!
还有个问题:GetRValue(), GetGValue(),函数干吗用的?我在delphi的帮助中找不到啊!!!
另外,如果由#FFAACC 转化为delphi的 tcolor 如何转化?
----------------------------------------------
-我菜,就想我最喜欢吃的白菜...
|
作者: |
|
2004/3/6 12:56:04 |
4楼: |
var RGBColor : String; DelphiColor : TColor; begin RGBColor := '#FFAACC'; RGBColor := AnsiReplaceStr('#','$00'); DelphiColor := StrToInt(RGBColor); end;
没试过的。。
----------------------------------------------
米软科技有限公司http://www.szmesoft.com
|
|