GP图形如何画文本啊？

2446626490

  

变量名	类 型	静态	数组	备 注
i	整数型
arrW	整数型		0
arrH	整数型		0
maxW	整数型
maxH	整数型
bmap	GP位图
grap	GP图形
img	GP图像
t	整数型
bin	字节集
水印文字	文本型
水印宽度	整数型

' 取出图片宽和高
计次循环首 (取数组成员数 (图片组), i)
加入成员 (arrW, 图片_取宽度 (读入文件 (图片组 [i])))
加入成员 (arrH, 图片_取高度 (读入文件 (图片组 [i])))
计次循环尾 ()
' 对比取出最大宽度和总高度，用于创建内存画布尺寸
maxW ＝ 0
maxH ＝ 0
计次循环首 (取数组成员数 (arrW), i)
如果真 (maxW ＜ arrW [i])
maxW ＝ arrW [i]
maxH ＝ maxH ＋ arrH [i]
计次循环尾 ()
bmap.创建自像素格式 (maxW, maxH)
grap.创建自图像 (bmap)
如果真 (取反 (是否为空 (背景色)))
grap.清除 (背景色)
计次循环首 (取数组成员数 (图片组), i)
img.创建自文件 (图片组 [i])
grap.画图像I (img, 0, t)
' 销毁字体对象
img.销毁 ()
t ＝ t ＋ arrH [i]
计次循环尾 ()
bin ＝ bmap.保存到字节集 ( #图像格式_PNG )
grap.销毁 ()
bmap.销毁 ()
返回 (bin)

.版本 2<br /> <br /> .局部变量 i, 整数型<br /> .局部变量 arrW, 整数型, , "0"<br /> .局部变量 arrH, 整数型, , "0"<br /> .局部变量 maxW, 整数型<br /> .局部变量 maxH, 整数型<br /> .局部变量 bmap, GP位图<br /> .局部变量 grap, GP图形<br /> .局部变量 img, GP图像<br /> .局部变量 t, 整数型<br /> .局部变量 bin, 字节集<br /> .局部变量 水印文字, 文本型<br /> .局部变量 水印宽度, 整数型<br /> <br /> <br /> ' 取出图片宽和高<br /> .计次循环首 (取数组成员数 (图片组), i)<br />     加入成员 (arrW, 图片_取宽度 (读入文件 (图片组 <i>)))<br />     加入成员 (arrH, 图片_取高度 (读入文件 (图片组 <i>)))<br /> .计次循环尾 ()<br /> ' 对比取出最大宽度和总高度，用于创建内存画布尺寸<br /> maxW ＝ 0<br /> maxH ＝ 0<br /> .计次循环首 (取数组成员数 (arrW), i)<br />     .如果真 (maxW ＜ arrW <i>)<br />         maxW ＝ arrW <i><br />     .如果真结束<br />     maxH ＝ maxH ＋ arrH <i><br /> .计次循环尾 ()<br /> <br /> <br /> bmap.创建自像素格式 (maxW, maxH)<br /> grap.创建自图像 (bmap)<br /> .如果真 (取反 (是否为空 (背景色)))<br />     grap.清除 (背景色)<br /> .如果真结束<br /> .计次循环首 (取数组成员数 (图片组), i)<br />     img.创建自文件 (图片组 <i>)<br />     grap.画图像I (img, 0, t)<br /> <br />     ' 销毁字体对象<br /> <br />     img.销毁 ()<br />     t ＝ t ＋ arrH <i><br /> .计次循环尾 ()<br /> bin ＝ bmap.保存到字节集 (#图像格式_PNG)<br /> grap.销毁 ()<br /> bmap.销毁 ()<br /> 返回 (bin)

我想在画图象的时候，给每一个图片加上水印 有什么好例子么！