VisualFreeBasic游戏趣味编程_4.2_RGB颜色模型

勇芳

2026-1-21 / 0 评论 / 69 阅读

01/21

当我们需要在代码中输入颜色时，点击这个按钮

出现的颜色对话框，点击一个颜色即可，颜色选择 RGB

会在代码处，自动插入代码

提示：
代码中函数是 BGR(r,g,b) 参数顺序是 r,g,b ，另外函数名 RGB(b,g,r) 需要反过来参数，结果是一样的。
因此我选择了，参数顺序习惯，用了 BGR(r,g,b)

根据三原色原理，任何色彩均可由红（Red）、绿（Green）、蓝（Blue）3种基本颜色混合而成，如图所示。

代码

Sub 游戏执行过程(hWndForm As hWnd)
   Dim gg As yGDI = hWndForm
   gg.Cls BGR(255,255,255) '使用白色为底色
   gg.Pen 1, BGR(229, 0, 0) '设置红色线
   gg.Brush    '不填充
   gg.DrawEllipse 10, 10, 220, 220 '画红线圆形
   gg.Pen 0, 0 '设置线条为没有
   画扇形(gg,120,120,110, 330,300,BGR(0,229,0) )

End Sub

绘制效果如图所示。