分享
 
 
 

ASP.NET图象处理详解(2)

王朝asp·作者佚名  2008-05-19
窄屏简体版  字體: |||超大  

二、读取和改变图象文件大小

读取图片?直接使用HTML不就可以了?当然可以,我们这里只是提供一种选择和方法来实现这一功能,具体这一功能的使用,我们可能需要在实践中更多的学习。先来看程序源代码:

<% ' import all relevant namespaces %>

<%@ import namespace="System" %>

<%@ import namespace="System.Drawing" %>

<%@ import namespace="System.Drawing.Imaging" %>

<%@ import namespace="System.IO" %>

<script runat="server">

Sub sendFile()

dim g as System.Drawing.Image = System.Drawing.Image.FromFile(server.mappath(request("src")))

dim thisFormat=g.rawformat

dim imgOutput as New Bitmap(g, cint(request("width")), cint(request("height")))

if thisformat.equals(system.drawing.imaging.imageformat.Gif) then

response.contenttype="image/gif"

else

response.contenttype="image/jpeg"

end if

imgOutput.save(response.outputstream, thisformat)

g.dispose()

imgOutput.dispose()

end sub

Sub sendError()

dim imgOutput as New bitmap(120, 120, pixelformat.format24bpPRgb)

dim g as graphics = graphics.fromimage(imgOutput)

g.clear(color.yellow)

g.drawString("错误!", New font("黑体",14,fontstyle.bold),systembrushes.windowtext, New pointF(2,2))

response.contenttype="image/gif"

imgOutput.save(response.outputstream, imageformat.gif)

g.dispose()

imgOutput.dispose()

end sub

</script>

<%

response.clear

if request("src")="" or request("height")="" or request("width")="" then

call sendError()

else

if file.exists(server.mappath(request("src"))) then

call sendFile()

else

call sendError()

end if

end if

response.end

%>

在以上的程序中,我们看到两个函数,一个是SendFile,这一函数主要功能为显示服务器上的图片,该图片的大小通过Width和Height设置,同时,程序会自动检测图片类型;另外一个是SendError,这一函数的主要功能为服务器上的图片文件不存在时,显示错误信息,这里很有趣,错误信息也是通过图片给出的(如图):

以上的程序显示图片并且改变图片大小,现在,我们将这个程序进一步,显示图片并且保持图片的长宽比例,这样,和实际应用可能比较接近,特别是需要制作电子相册或者是图片网站的时候比较实用。我们先来看主要函数:

Function NewthumbSize(currentwidth, currentheight)

dim tempMultiplier as Double

if currentheight > currentwidth then

tempMultiplier = 200 / currentheight

Else

tempMultiplier = 200 / currentwidth

end if

dim NewSize as New Size(CInt(currentwidth * tempMultiplier), CInt(currentheight * tempMultiplier))

return NewSize

End Function

以上程序是增加的一个函数NewthumbSize,该函数专门处理改变一会的图片大小,这个图片的长宽和原图片的长宽保持相同比例。其他部分请参考上文程序代码。

三、画图特效

如果只是将图片显示在网页上,这样未免显得简单。现在,我们来进一步感受asp.net的强大功能。我们将学习图象处理中常用的图象反转、图象切割、图象拉伸等技巧。

先来看看程序效果:

仔细看,我们可以找到各种图象处理效果。现在,我们来看看程序代码:

<%@ Page Language="vb" Debug="True" %>

<%@ import namespace="system.drawing" %>

<%@ import namespace="system.drawing.imaging" %>

<%@ import namespace="system.drawing.drawing2d" %>

<%

dim strFilename as string

dim i as System.Drawing.Image

strFilename = server.mappath("./chris-fsck.jpg")

i = System.Drawing.Image.FromFile(strFilename)

dim b as New system.drawing.bitmap(i.width, i.height, pixelformat.format24bpprgb)

dim g as graphics = graphics.fromimage(b)

g.clear(color.blue)

'旋转图片

i.RotateFlip(System.Drawing.RotateFlipType.Rotate90FlipX)

g.drawimage(i,New point(0,0))

i.RotateFlip(System.Drawing.RotateFlipType.Rotate270FlipY)

g.RotateTransform(10)

g.drawimage(i,New point(0,0))

g.RotateTransform(10)

g.drawimage(i,New point(20,20))

g.RotateTransform(10)

g.drawimage(i,New point(40,40))

g.RotateTransform(10)

g.drawimage(i,New point(40,40))

g.RotateTransform(-40)

g.RotateTransform(90)

g.drawimage(i,New rectangle(100,-400,100,50),New rectangle(20,20,i.width-20,i.height-20),GraphicsUnit.Pixel)

g.RotateTransform(-90)

' 拉伸图片

g.drawimage(i,New rectangle(10,10,50,50),New rectangle(20,20,i.width-20,i.height-20),GraphicsUnit.Pixel)

g.drawimage(i,New rectangle(50,10,90,50),New rectangle(20,20,i.width-20,i.height-20),GraphicsUnit.Pixel)

g.drawimage(i,New rectangle(110,10,150,50),New rectangle(20,20,i.width-20,i.height-20),GraphicsUnit.Pixel)

'切割图片

g.drawimage(i,50,100,New rectangle(180,80,60,110),GraphicsUnit.Pixel)

g.drawimage(i,140,100,New rectangle(180,80,60,110),GraphicsUnit.Pixel)

'旋转图片

i.RotateFlip(System.Drawing.RotateFlipType.Rotate180FlipX)

g.drawimage(i,230,100,New rectangle(180,110,60,110),GraphicsUnit.Pixel)

response.contenttype="image/jpeg"

b.save(response.outputstream, imageformat.jpeg)

b.dispose()

%>

在以上的程序中,我们看到实现图象处理的各种技巧,仔细观察,我们可以知道旋转图片其实是用了一个RotateFlip方法;而切割和拉伸图片,完全是通过设置DrawImage的不同参数来实现。

四、总结

ASP.NET的图象处理可以实现的功能很多,我们在这里其实只是简单的介绍,更多功能的应用,需要我们在实践中摸索、总结。

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有