opengl+vb.net crosshair cursor...

  • Follow


hi,

i have the following code for drawing a crosshair cursor & it works:

        'Custom cursor
        'Declare bitmap
        Dim bm As New Bitmap(64, 64)
        'Declare graphics
        Dim g As Graphics = Graphics.FromImage(bm)
        'Clear the graphics
        g.Clear(Color.Transparent)
        'Declare cursor pen and set colr + width
        Dim myCursorPen As Pen = New Pen(Color.White, 2)
        'Draw cross hair
        g.DrawLine(myCursorPen, 32, 0, 32, 64)
        g.DrawLine(myCursorPen, 0, 32, 64, 32)
        'Dispose the graphics
        g.Dispose()
        'Declare a cursor object
        Dim cur As New Cursor(bm.GetHicon)
        'Set the cursor object
        Me.Cursor = cur

the problem is that its 64*64 and i cannot increase it.
any ideas?

thanks
pj
0
Reply prashjoshi 4/7/2005 10:11:48 AM


0 Replies
428 Views

(page loaded in 0.014 seconds)

Similiar Articles:













7/24/2012 11:43:06 AM


Reply: