给图片的四边都加白边，使用GDI画板，求例子 - 精易论坛

窗口程序集名	保留	保留	备注
窗口程序集_启动窗口
变量名	类型	数组	备注
白边宽度	整数型

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

Gdiplus初始化 ()
图片框1.图片＝ #图片
白边宽度＝ hk条1.位置

子程序名	返回值类型	公开	备注
_按钮1_被单击

变量名	类型	静态	数组	备注
图片	字节集
位图	位图
图像	GP图像
画布	GP图像
图形	GP图形
画笔	GP画笔
结果	字节集

图片＝ #图片
图像.创建自字节集 (图片)
位图.创建 (图像.取宽度 () ＋白边宽度, 图像.取高度 () ＋白边宽度, 32, )
画布.创建自字节集 (位图.取位图数据 ())
图形.创建自图像 (画布)
画笔.创建自颜色 (RGB到ARGB ( #白色 ), 白边宽度＋ 1)
图形.画矩形 (画笔, 0, 0, 画布.取宽度 (), 画布.取高度 ())
图形.画图像 (图像, 白边宽度 ÷ 2, 白边宽度 ÷ 2)
结果＝画布.保存到字节集 ()
图片框1.图片＝结果

子程序名	返回值类型	公开	备注
_hk条1_位置被改变

白边宽度＝ hk条1.位置

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