.版本 2 .程序集 窗口程序集_启动窗口 .程序集变量 标志, 整数型 .程序集变量 g, GP图形 .程序集变量 画刷, GP纯色画刷 .程序集变量 颜色, 整数型, , "3" .程序集变量 坐标, 小数型, , "3" .程序集变量 颜色1, 小数型, , "4" .程序集变量 坐标1, 小数型, , "4" .程序集变量 矩形, 矩形F .子程序 __启动窗口_被激活 标志 ＝ Gdiplus初始化 () .子程序 __启动窗口_将被销毁 Gdiplus关闭 (标志) .子程序 _按钮1_被单击 .局部变量 画刷1, GP线性渐变画刷 .局部变量 画刷2, GP线性渐变画刷 .局部变量 画刷3, GP线性渐变画刷 初始化 () g.创建自窗口句柄 (取窗口句柄 ()) 画刷.创建 (RGB到ARGB (#白色)) g.填充矩形 (画刷, 0, 0, 宽度, 高度) 画刷1.创建 (制坐标F (0, 0), 制坐标F (180, 0), RGB到ARGB (#黑色), RGB到ARGB (#白色)) 画刷1.置预设混合 (颜色, 坐标) g.填充矩形 (画刷1, 0, 0, 180, 100) 画刷2.创建 (制坐标F (0, 0), 制坐标F (60, 0), RGB到ARGB (#红色), RGB到ARGB (#绿色)) 画刷3.创建 (制坐标F (60, 0), 制坐标F (181, 0), RGB到ARGB (#绿色), RGB到ARGB (#蓝色)) g.填充矩形 (画刷2, 0, 120, 60, 100) g.填充矩形 (画刷3, 60, 120, 120, 100) .子程序 _按钮2_被单击 .局部变量 画刷1, GP线性渐变画刷 初始化 () g.创建自窗口句柄 (取窗口句柄 ()) 画刷.创建 (RGB到ARGB (#白色)) g.填充矩形 (画刷, 0, 0, 宽度, 高度) 画刷1.创建自矩形 (矩形, RGB到ARGB (#红色), RGB到ARGB (#蓝色), #线性渐变模式_从左到右) 画刷1.置混合 (颜色1, 坐标1) g.填充矩形2 (画刷1, 矩形) .子程序 初始化 颜色 [1] ＝ 取颜色值 (255, 0, 0) 颜色 [2] ＝ 取颜色值 (255, 0, 0) 颜色 [3] ＝ 取颜色值 (255, 0, 0) 坐标 [1] ＝ 0 坐标 [2] ＝ 0.3 坐标 [3] ＝ 1 颜色1 [1] ＝ 0 颜色1 [2] ＝ 0.9 颜色1 [3] ＝ 0.3 颜色1 [4] ＝ 0 坐标1 [1] ＝ 0 坐标1 [2] ＝ 0.1 坐标1 [3] ＝ 0.6 坐标1 [4] ＝ 1 矩形.左边 ＝ 0 矩形.顶边 ＝ 0 矩形.宽度 ＝ 200 矩形.高度 ＝ 200 .子程序 __启动窗口_创建完毕