怎样将后台生成的在内存中的图象显示到客户端

怎样将后台生成的在内存中的图象显示到客户端？  
由C＃和VB.net生成  
thanks！  
 
---------------------------------------------------------------  
 
感谢您使用微软产品。  
 
下面是以前做过的帖子，供您参考：  
 
/  
 
主　　题：    asp.net页面中有一个image控件，想用C＃生成一个4位的随机数，并将它写成图片，显示出来  
 
这个问题可能需要使用到.NET的画图功能。  
 
我们可以在一个页面中，根据提交的内容，使用DrawString来画出数字，然后把它输入到另外一个页面的Image控件的imageURL中。  
 
中间可能需要一些技巧，比如，如何在ASP.NET的服务器端做图，然后如何把图片直接绑定给image控件等。我写了下面的程序，供您参考：  
 
WebForm1.aspx:  
============  
一个TextBox控件，用来输入数字；  
一个image控件，用来显示图片；  
一个Button控件，  用来提交TextBox;  
 
在Button的click事件中，加入下面的代码：  
 
this.Image1.ImageUrl=@"draw.aspx?number="+this.TextBox1.Text;  
 
Draw.aspx:  
=======  
 
using  System.Drawing.Drawing2D;  
using  System.Drawing.Imaging;  
 
 
private  void  Page_Load(object  sender,  System.EventArgs  e)  
{  
           //  Put  user  code  to  initialize  the  page  here  
 
           if(null!=this.Request["number"])  
           {  
                       string  myNumber=this.Request["number"].ToString();  
 
                       Response.Clear();  
 
                       int  height=100;  
                       int  width=300;  
 
                       Bitmap  bmp=new  Bitmap(width,height,PixelFormat.Format24bppRgb);  
                       Graphics            g=Graphics.FromImage(bmp);  
 
                       g.SmoothingMode=SmoothingMode.AntiAlias;  
                       g.Clear(Color.LightGray);  
                       g.DrawRectangle(Pens.WhiteSmoke,0,0,width,height);  
                       g.DrawString(myNumber,new  Font("Arial",10),SystemBrushes.WindowText,new  PointF(10,50));  
                                                 
                       bmp.Save(this.Response.OutputStream,ImageFormat.Gif);  
 
                       g.Dispose();  
                       bmp.Dispose();  
                       Response.End();  
           }  
}                          
 
/  
 
希望对您有所帮助。    
   
-微软全球技术中心    -zgh  
   
本贴子以“现状”提供且没有任何担保，同时也没有授予任何权利。具体事项可参见使用条款(http://support.microsoft.com/directory/worldwide/zh-cn/community/terms_chs.asp)。  
为了为您创建更好的讨论环境，请参加我们的用户满意度调查(http://support.microsoft.com/directory/worldwide/zh-cn/community/survey.asp?key=(S,49854782))。  
---------------------------------------------------------------  
 
在使用ASP的时候，我们时常要借助第三方控件来实现一些图象功能。而现在，ASP.NET的推出，我们已经没有必要再使用第三方控件来实现，因为ASP.NET  已经具有强大的功能来实现一些图象处理。现在，我们就来看看怎样使用ASP.NET的这一强大功能。    
 
一、System.Drawing的使用    
以下的举例将演示在内存中生成一张图片，然后，将这张图片通过网页显示出来。需要了解的是，我们这里输出的不是HTML效果，而是实实在在的图片（图象），我们可以使用“另存为…”将输出图象保存起来。    
我们先来看看效果：    
 
我们看到，这张图片是一个渐变背景上有“看见了吗”几个字，当然，这个效果在PhotoShop等图象处理软件里面很容易实现，但是，一些与数据库结合的应用我们不可能将所有图片都事先设计出来，这时候，利用ASP.NET来实现这些功能就显得很重要了。我们来看源代码：    
<  %@  page  language="vb"  contenttype="image/jpeg"  %  >    
<  %@  import  namespace="system.drawing"  %  >    
<  %@  import  namespace="system.drawing.imaging"  %  >    
<  %@  import  namespace="system.drawing.drawing2d"  %  >    
 
<  %    
’清空Response    
response.clear    
 
’建立一个120*30大小，24bit的BMP图象；    
dim  imgOutput  as  New  bitmap(120,  30,  pixelformat.format24bpprgb)    
 
’根据以上BMP建立一个新图象；    
dim  g  as  graphics  =  graphics.fromimage(imgOutput)    
 
g.clear(color.Green)    
g.smoothingMode  =  smoothingMode.antiAlias    
 
g.drawString("看见了吗？",  New  font("黑体",16,fontstyle.bold),new  SolidBrush(Color.White),New  pointF(2,4))    
 
g.FillRectangle(New  linearGradientBrush(New  point(0,0),  New  point(120,30),  color.fromArgb(0,0,0,0),color.fromArgb(255,255,255,255)),0,0,120,30)    
 
imgOutput.save(response.outputstream,  imageformat.jpeg)    
 
g.dispose()    
imgOutput.dispose()    
response.end    
%  >    
在以上代码中，我们看到和数据库程序不同，这里专门引入了图象处理的名字空间system.drawing等。程序首先清空了Response，确保没有输出；然后，程序建立了一个120乘30大的BMP图象，再在这个基础上建立一个新图象，建立图象以后，我们首先“画”出了字符串“看见了吗”，该字符串为16大粗黑体，颜色为白色，位置为（2，4）；最后，我们实现渐变效果。    
以上举例很简单，但是如果和数据库结合，我们可以实现很多使用ASP可能不敢想的效果。    
 
二、读取和改变图象文件大小    
读取图片？直接使用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)