Чтобы нарисовать в рантайме картинку, и отправить ее браузеру, делаем следующее:
| Код |
' выставляем тип респонса, по которому браузер определит, что же ему шлют
Response.ContentType = "image/jpeg"
' загружаем картинку из файла
Dim bmp As System.Drawing.Image = System.Drawing.Image.FromFile(Request.PhysicalApplicationPath + "pic.jpg")
' теперь рисуем на ней, все что хочется средствами System.Drawing.Graphics
Dim gr As Graphics = Graphics.FromImage(bmp)
' ..................
' ..................
' сохраяняем изменения в картинку в памяти
gr.DrawImage(bmp, 0, 0)
' выводим картинку в Response
Dim memStream As New System.IO.MemoryStream
bmp.Save(memStream, System.Drawing.Imaging.ImageFormat.Jpeg)
memStream.WriteTo(Response.OutputStream)
Response.End()
|
|