|
好东西大家分享：一个用来画图的组件（画饼图，条形图，各种形状图象的 组件） 为什么说是个好东西了，大家看看下面的介绍就知道了 该组件有两个版本，一个是注册版本，一个是非注册版本 非注册版本功能：（虽然是非注册的，但是可以一直使用下去的哦,这也是一个为 什么我大力推荐的原因之一） 1。可生成JPEG格式的图形文件 2。可生成透明的GIF格式的图形文件 3。可生成交错的GIF格式的图形文件 4。可以使用两种方式保存图形文件：一种是直接生成图形文件 另外一种是保存到数组中然后直接输出到WWW页面中 5。可以绘制文本图形，并且支持安装在你机器上的任何字体的文本 6。可以导出和预览由OLE服务程序生成的文档，例如MS Word,Excel等等。 7。可以使用位图方式自由的缩放，镜像，旋转和剪切图形 8。可使用本地图形缓存 9。可以ZOOM图片 10。可以获取任何JPEG, GIF ，BMP格式文件的详细信息 11。可以进行Windows抓屏 12。可生成动态GIF 非注册版本的限制如下： 1。只能够最多使用8种颜色，不过我认为对大多数人来说根本不算什么限制的， 呵呵 2。能够生成的最大图形尺寸为320x240 如果是注册版本： 13。可在线修改现有的GIF, JPEG 和 BMP文件 14。可自定义调色板 15。可循环放映GIF动画 例子程序： VBScript的例子： set obj=CreateObject("shotgraph.image") size=201 obj.CreateImage size,size,4 obj.SetColor 0,255,255,255 obj.SetColor 1,0,0,0 obj.SetColor 2,255,108,0 obj.SetColor 3,0,0,204 obj.SetBgColor 0 obj.FillRect 0,0,size-1,size-1 obj.SetDrawColor 1 obj.Line size-1,0,0,size-1 obj.SetBgColor 2 obj.Ellipse 5,5,size-6,size-6 obj.SetBgColor 3 obj.Ellipse 5,(size-5)/4,size/2,(size-5)*3/4 obj.GifImage 0,1,"test.gif" ASP的例子代码： Response.ContentType="image/gif" set obj=Server.CreateObject("shotgraph.image") size=201 obj.CreateImage size,size,4 obj.SetColor 0,255,255,255 |