如何在GIF图片上写文字？？
如何在GIF图片上写文字？？
是否要组件？？
问题点数：20、回复次数：12Top
1 楼ebbc（枫影）回复于 2005-04-01 10:20:23 得分 7
用adodb.streamTop
2 楼yongz_0（涩男郎）回复于 2005-04-01 10:24:23 得分 7
http://community.csdn.net/Expert/ForumList_Search.asp?searchtype=1&bigclassid=3&smallclassid=301&searchKeys=%CB%AE%D3%A1&author=&tabletype=now&Submit2=%B6%D4%D1%A1%D4%F1%B5%C4%D0%A1%C0%E0%BD%F8%D0%D0%CB%D1%CB%F7Top
3 楼qiangtian（tq）回复于 2005-04-01 10:27:12 得分 0
借助与组件吧Top
4 楼TSD（智之选,商欲达--智商购物系统zhishop.com）回复于 2005-04-01 10:39:58 得分 0
用组件
dim Jpeg
dim stxt '要添加水印的文字
dim l '要添加水印的纵坐标
dim t '要添加水印的横坐标
stxt="这是添加的文字"
Set Jpeg = Server.CreateObject("Persits.Jpeg")
Jpeg.Open Server.MapPath("g.jpg")
l=Jpeg.Width/3
t=Jpeg.Height/1.8
response.write "Width:" & Jpeg.Width & " Height:" & Jpeg.Height
Jpeg.Canvas.Font.Color = &HFF0000' red '文字颜色
Jpeg.Canvas.Font.Family = "黑体" '字体
Jpeg.Canvas.Font.Size =28 '字体
Jpeg.Canvas.Font.Bold = True '设置字体是否为粗体
Jpeg.Canvas.Print l,t,stxt '设置水印
Jpeg.Save Server.MapPath("t.jpg")
set Jpeg=nothing
Top
5 楼xqi8（星期八）回复于 2005-04-01 11:14:29 得分 0
TSD(因为你有而精彩)：是否有具体例子？谢谢！Top
6 楼lxw81p（小乌）回复于 2005-04-01 11:16:10 得分 0
没有具体的实例呀!????Top
7 楼zhangjinzhicn（依米）回复于 2005-04-01 14:38:17 得分 0
缩略图水印组件wsImage2.0
功能特点：
1、导入多种图片格式，目前支持BMP，JPG，GIF等。
2、输出JPG格式缩略图，自定义输出压缩参数
3、高效率生成缩略图，4种导出方式，方便灵活。
4、图片裁减功能，自定义裁减区域。
5、能购获取图片尺寸。
6、支持文字水印，可自定义字体、颜色、旋转角度等。
7、支持图片水印，图片水引支持透明度。
8、性能更稳定,消耗系统资源少。
详情：http://www.wave12.com/dll_wsImage.aspTop
8 楼moonvan（<修炼内功>）回复于 2005-04-01 15:57:32 得分 0
到网上找水印组件，里边都有例子的。Top
9 楼lovebanyi（风云）回复于 2005-04-01 19:00:45 得分 0
用Graphics这个类就可以了..Top
10 楼jhwcd（王东）回复于 2005-04-02 02:13:21 得分 0
我也学习一下！Top
11 楼liuxiaoyi666（MSMVP 小猪妹荣誉马甲之八卦兔子）回复于 2005-04-02 08:07:26 得分 6
Public Declare Function TextOut Lib "gdi32" Alias "TextOutA" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal lpString As String, ByVal nCount As Long) As Long
Top
12 楼mid7576535（灰色小猫）回复于 2005-04-02 09:39:45 得分 0
UPTop
