如何生成色盲测试图？

hulala889

如：

精易论坛龙

动画框，然后做好多种形状，再随机大小范围，并定义好颜色，最后加上数字或汉字图层，分析上下重叠部分颜色稍微变色，但做起来有些困难，有很多算法。这种肯定要找专业定做。

花间一壶酒

用GDI内存画板画  弄随机形状之后 延路径排列  总之挺复杂的  但是他有例子  有类似的案例

飞羽软件

这个用python比较方便

2224848

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

.局部变量 位图, 位图操作类
.局部变量 宽度, 整数型
.局部变量 高度, 整数型
.局部变量 数字, 文本型
.局部变量 字体大小, 整数型

' 设置图片大小
宽度 = 400
高度 = 400

' 创建位图
位图.创建 (宽度, 高度, 24, )

' 填充背景色
位图.填充矩形 (0, 0, 宽度, 高度, #浅 **)

' 添加随机点背景
添加随机点 (位图, 宽度, 高度)

' 绘制测试数字
数字 = "5"  ' 测试数字
字体大小 = 120  ' 字体大小
位图.文本输出 ( (宽度 - 文本_取宽度 (数字, 字体大小, "Arial")) \ 2,
(高度 - 文本_取高度 (字体大小, "Arial")) \ 2,
数字, #红色, 字体大小, "Arial", , )

' 显示图片
图片框1.图片 = 位图.取位图数据 ()

' 设置窗口标题
标题 = "色盲测试图 - 数字 " + 数字

子程序名	返回值类型	公开	备 注
添加随机点
参数名	类 型	参考	可空	数组	备 注
位图	位图操作类
宽度	整数型
高度	整数型

变量名	类 型	静态	数组	备 注
i	整数型
x	整数型
y	整数型
点大小	整数型
颜色	整数型

计次循环首 (500, i)  ' 添加500个随机点
x = 取随机数 (0, 宽度 - 1)
y = 取随机数 (0, 高度 - 1)
点大小 = 取随机数 (2, 5)

' 随机颜色（红、绿、蓝）
判断 (取随机数 (1, 3) = 1)
颜色 = #浅红色
判断 (取随机数 (1, 3) = 2)
颜色 = #浅绿色
颜色 = #浅蓝色

位图.填充椭圆 (x, y, 点大小, 点大小, 颜色)
计次循环尾 ()

子程序名	返回值类型	公开	备 注
文本_取宽度	整数型
参数名	类 型	参考	可空	数组	备 注
文本	文本型
字体大小	整数型
字体名称	文本型

变量名	类 型	静态	数组	备 注
画板	画板

画板.创建 ()
画板.字体.字体大小 = 字体大小
画板.字体.字体名称 = 字体名称
返回 (画板.取文本宽度 (文本))

子程序名	返回值类型	公开	备 注
文本_取高度	整数型
参数名	类 型	参考	可空	数组	备 注
字体大小	整数型
字体名称	文本型

变量名	类 型	静态	数组	备 注
画板	画板

画板.创建 ()
画板.字体.字体大小 = 字体大小
画板.字体.字体名称 = 字体名称
返回 (画板.取文本高度 ("A"))

i支持库列表	支持库注释
BmpOperate	位图操作支持库

.版本 2<br /> .支持库 BmpOperate<br /> <br /> .子程序 __启动窗口_创建完毕<br />     .局部变量 位图, 位图操作类<br />     .局部变量 宽度, 整数型<br />     .局部变量 高度, 整数型<br />     .局部变量 数字, 文本型<br />     .局部变量 字体大小, 整数型<br />     <br />     ' 设置图片大小<br />     宽度 = 400<br />     高度 = 400<br />     <br />     ' 创建位图<br />     位图.创建(宽度, 高度, 24, )<br />     <br />     ' 填充背景色<br />     位图.填充矩形(0, 0, 宽度, 高度, #浅**)<br />     <br />     ' 添加随机点背景<br />     添加随机点(位图, 宽度, 高度)<br />     <br />     ' 绘制测试数字<br />     数字 = "5"  ' 测试数字<br />     字体大小 = 120  ' 字体大小<br />     位图.文本输出((宽度 - 文本_取宽度(数字, 字体大小, "Arial")) \ 2, <br />                  (高度 - 文本_取高度(字体大小, "Arial")) \ 2, <br />                  数字, #红色, 字体大小, "Arial", , )<br />     <br />     ' 显示图片<br />     图片框1.图片 = 位图.取位图数据()<br />     <br />     ' 设置窗口标题<br />     标题 = "色盲测试图 - 数字 " + 数字<br /> <br /> .子程序 添加随机点<br /> .参数 位图, 位图操作类<br /> .参数 宽度, 整数型<br /> .参数 高度, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 x, 整数型<br /> .局部变量 y, 整数型<br /> .局部变量 点大小, 整数型<br /> .局部变量 颜色, 整数型<br /> <br /> .计次循环首(500, i)  ' 添加500个随机点<br />     x = 取随机数(0, 宽度 - 1)<br />     y = 取随机数(0, 高度 - 1)<br />     点大小 = 取随机数(2, 5)<br />     <br />     ' 随机颜色（红、绿、蓝）<br />     .判断开始 (取随机数(1, 3) = 1)<br />         颜色 = #浅红色<br />     .判断 (取随机数(1, 3) = 2)<br />         颜色 = #浅绿色<br />     .默认<br />         颜色 = #浅蓝色<br />     .判断结束<br />     <br />     位图.填充椭圆(x, y, 点大小, 点大小, 颜色)<br /> .计次循环尾()<br /> <br /> .子程序 文本_取宽度, 整数型<br /> .参数 文本, 文本型<br /> .参数 字体大小, 整数型<br /> .参数 字体名称, 文本型<br /> .局部变量 画板, 画板<br /> <br /> 画板.创建()<br /> 画板.字体.字体大小 = 字体大小<br /> 画板.字体.字体名称 = 字体名称<br /> 返回(画板.取文本宽度(文本))<br /> <br /> .子程序 文本_取高度, 整数型<br /> .参数 字体大小, 整数型<br /> .参数 字体名称, 文本型<br /> .局部变量 画板, 画板<br /> <br /> 画板.创建()<br /> 画板.字体.字体大小 = 字体大小<br /> 画板.字体.字体名称 = 字体名称<br /> 返回(画板.取文本高度("A"))

在窗口上添加一个图片框组件