请问视觉红色的RGB值范围是多少?

取昵称麻烦 2010-08-22 12:03:09
如题,或者是用什么方法自己能算出来?请知道的朋友不吝赐教。
...全文
4505 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
gemanman1218 2012-09-27
  • 打赏
  • 举报
回复
我现在急需此问题的答案。。我这还要写出其他颜色的RGB值范围,有没有什么资料依据。。。。。。。。。
请不吝赐教!!!!
ybqwf 2010-11-18
  • 打赏
  • 举报
回复
我也在找这个,你在哪里找到的啊?有什么资料根据吗?
取昵称麻烦 2010-08-22
  • 打赏
  • 举报
回复
唉,所问非所答,这个是视觉红色的取值判断
if (GetRValue(vColor) >= 200) and
(GetRValue(vColor) <= 255) and
(GetGValue(vColor) >= 0) and
(GetGValue(vColor) <= 50) and
(GetBValue(vColor) >= 0) and
(GetBValue(vColor) <= 50) then
sg_knight 2010-08-22
  • 打赏
  • 举报
回复
红色:RGB(255,0,0)
kye_jufei 2010-08-22
  • 打赏
  • 举报
回复
RGB(a,b,c)中三个参数,分别代表:红、绿、兰3基色,a、b、c的取值都是在0~255之间...

procedure TForm1.FormCreate(Sender: TObject);
begin
timer1.Enabled :=false;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
timer1.Enabled :=true;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
var
a,b,c:integer;
begin
a:=random(255);
b:=random(255);
c:=random(255);
label1.Font.Color :=RGB(a,b,c);
end;

1,183

社区成员

发帖
与我相关
我的任务
社区描述
Delphi GAME,图形处理/多媒体
社区管理员
  • GAME,图形处理/多媒体社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧