Generate picture C#

[John.Arthur]

Hello,

I need to create picture containing number that I will write in the
picture. I need it to show it to the users of my application and they
will write the number in a textBox, so this is to prevent automatic
activities with my application and to keep bots away.
But I have no idea how can I create a picture containing number or
text.

Can someone help please?
Thanks

[Tim Wilson]

The following article was written for a Web Form but the code to create the
image should work in a Win Forms app too.
http://www.codeproject.com/aspnet/CaptchaImage.asp

--
Tim Wilson
..Net Compact Framework MVP

<Jo*********@gm ail.com> wrote in message
news:11******** **************@ z14g2000cwz.goo glegroups.com.. .

Hello,

I need to create picture containing number that I will write in the
picture. I need it to show it to the users of my application and they
will write the number in a textBox, so this is to prevent automatic
activities with my application and to keep bots away.
But I have no idea how can I create a picture containing number or
text.

Can someone help please?
Thanks

[Salvador]

Hi,

Ok, I will explain the hard way, maybe there is an easy way that I don't know.

Create a bitmap image using the System.Drawing like this:
Bitmap NewBitmap = new Bitmap(widht, height, pixelformat)

Have a function to translate numbers to pixels like:
private static Bitmap NumbersToPixel (byte number, Bitmap currentBitmap)
{
switch (number)
{
case 1:
currentBitmap.S etPixel(x,y,col or);
}

I recommend you to use lines like the digital clocks, so you have 7 lines to
combine.

Then you can use your bitmap in your image control.

Hope this helps
Salva

"Jo*********@gm ail.com" wrote:

Hello,

I need to create picture containing number that I will write in the
picture. I need it to show it to the users of my application and they
will write the number in a textBox, so this is to prevent automatic
activities with my application and to keep bots away.
But I have no idea how can I create a picture containing number or
text.

Can someone help please?
Thanks

[Mythran]

"Salvador" <Sa******@discu ssions.microsof t.com> wrote in message
news:4C******** *************** ***********@mic rosoft.com...

Hi,

Ok, I will explain the hard way, maybe there is an easy way that I don't
know.

Create a bitmap image using the System.Drawing like this:
Bitmap NewBitmap = new Bitmap(widht, height, pixelformat)

Have a function to translate numbers to pixels like:
private static Bitmap NumbersToPixel (byte number, Bitmap currentBitmap)
{
switch (number)
{
case 1:
currentBitmap.S etPixel(x,y,col or);
}

Ok, that's the hard way? Then what about this (which will create the image
and allow for the image to be auto-generated/shown to the user w/o saving
the image to the hard disk.
Create class that Implements IHttpModule.

The class will render the image to a memory stream then WriteTo the
Response.Output Stream.
Add an event handler for OnBeginRequest using AddHandler inside of the
Init() method of this class.
In OnBeginRequest handler, check the sender.Request. Path to see if it's the
same path you set in the ImageUrl of the asp.net image below.

Add an asp.net image to the web form and set the ImageUrl to be that of some
name that you will check inside your OnBeginRequest event handler.

In Web.Config, you'll need to add an <httpModules> section.

There are some tweaks you will need to do, but that is an advanced way to do
this. If you have trouble, let me know. I have an example of it, but can't
send it, don' t have the time to package it all up to post it.

If I remember, I will tonight :)

Mythran

[Mythran]

Oh well, was able to do it after all :)

Create ImageHttpModule class file and insert the following class
declaration:

Public Class ImageHttpModule
Implements IHttpModule
Public Sub Dispose() Implements System.Web.IHtt pModule.Dispose
' MustOverride Method.
End Sub

Public Sub Init(ByVal context As System.Web.Http Application) Implements
System.Web.IHtt pModule.Init
AddHandler context.BeginRe quest, AddressOf Me.OnBeginReque st
End Sub

Public Sub OnBeginRequest( ByVal sender As Object, ByVal e As EventArgs)
Dim context As HttpApplication = DirectCast(send er, HttpApplication )

If context.Request .Path.ToLower() .IndexOf("image _number.aspx") < 0
Return
End If

' Should really generate the random number and store in a database,
' then do the fetch on that number in the Try...Catch below,
' if the number is not in the database, then generate one and
' store in the database.
Dim num As Integer = New Random().Next(1 0000, 99999)

' Build the image.
Dim memStream As IO.MemoryStream
Try
memStream = RenderImage(num )
memStream.Write To(context.Cont ext.Response.Ou tputStream)
memStream.Close ()
memStream = Nothing ' Prevents the Close() call in Finally.

context.Context .ClearError()
context.Respons e.ContentType = "image/gif"
context.Respons e.StatusCode = 200
context.Respons e.End()
Catch
context.Respons e.StatusCode = 500
context.Respons e.End()
Finally
If Not memStream Is Nothing
memStream.Close ()
End If
End Try
End Sub

Private Function RenderImage(ByV al Number As Integer) As IO.MemoryStream
Dim canvas As Graphics = Graphics.FromIm age(New Bitmap(1, 1))
Dim size As SizeF
Dim numberFont As Font = New Font(New FontFamily("Ver dana"), 12)

size = canvas.MeasureS tring( _
CStr(Number), _
numberFont _
)

size.Width += 10
size.Height += 10

Dim image As New Bitmap(size.Wid th, size.Height,
Imaging.PixelFo rmat.Format24bp pRgb)

canvas = Graphics.FromIm age(image)

Try
canvas.Smoothin gMode = Drawing2D.Smoot hingMode.HighQu ality
canvas.TextRend eringHint =
Drawing.Text.Te xtRenderingHint .SingleBitPerPi xel

' Draw background.
Dim backRect As Rectangle = _
New Rectangle(0, 0, image.Width, image.Height)
canvas.Clear(Co lor.Black)

Dim brush As Brush = New SolidBrush(Colo r.White)

canvas.DrawStri ng(CStr(Number) , numberFont, brush, 5, 5)

Dim memStream As IO.MemoryStream = New IO.MemoryStream ()
image.Save(memS tream, Imaging.ImageFo rmat.Gif)
Return memStream
Finally
image.Dispose()
canvas.Dispose( )
End Try
End Function

End Class
In the web form code-behind:

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load
If Not Me.IsPostBack
imgNumber.Image Url = "image_number.a spx"
End If
End Sub

In web.config before </system.web>:

<httpModules>
<add name="PictureIm age" type="PictureSa mple.ImageHttpM odule,
PictureSample" />
</httpModules>

Think that's it, hope it works for you :)

Mythran