GDI+ Help!! im new to vb .net

passcodeserv

I got VB.NET for x-mas and im trying to create a quick game.. controls and position arent the problem. I can handle that. but GDI+ is hard for me. Heres what i have: [code] Public Class Form1 Inherits System.Windows.Forms.Form Private Sub form1_Paint(ByVal sender As Object, ByVal e As PaintEventArgs) Dim g As Graphics = Me.CreateGraphics() g.Clear(Me.BackColor) ' Draw an image Dim curImage As Image = Image.FromFile("b.bmp") g.DrawImage(curImage, 0, 0, curImage.Width, curImage.Height) ' End Sub #Region " Windows Form Designer generated code " Public Sub New() MyBase.New() 'This call is required by the Windows Form Designer. InitializeComponent() 'Add any initialization after the InitializeComponent() call End Sub 'Form overrides dispose to clean up the component list. Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean) If disposing Then If Not (components Is Nothing) Then components.Dispose() End If End If MyBase.Dispose(disposing) End Sub 'Required by the Windows Form Designer Private components As System.ComponentModel.IContainer 'NOTE: The following procedure is required by the Windows Form Designer 'It can be modified using the Windows Form Designer. 'Do not modify it using the code editor. Private Sub InitializeComponent() components = New System.ComponentModel.Container Me.Text = "Form1" End Sub #End Region End Class [/code] b.bmp is in the folder, and yet it dosent draw it. THX IN ADVANCE!

4 Replies

Know the answer? Post it — somebody with the same question will find it here.

henryrick23y ago
because you have to latch the graphics onto a form or object's paint event. The sub is declaring pe as a paintevent. thus every time the event is fired, then it willd draw the surface for you.
+1
passcodeserv23y ago
it works. i changed the sub. Protected Overrides Sub OnPaint(ByVal pe As PaintEventArgs) Dim g As Graphics = pe.Graphics works now. would u care to explain why one works and the other dosent?
+1
passcodeserv23y ago
but it dosent seem to be working. i have: Imports System.Drawing.Drawing2D Public Class FrmMain Inherits System.Windows.Forms.Form #Region " Windows Form Designer generated code " Public Sub New() MyBase.New() 'This call is required by the Windows Form Designer. InitializeComponent() 'Add any initialization after the InitializeComponent() call End Sub 'Form overrides dispose to clean up the component list. Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean) If disposing Then If Not (components Is Nothing) Then components.Dispose() End If End If MyBase.Dispose(disposing) End Sub 'Required by the Windows Form Designer Private components As System.ComponentModel.IContainer 'NOTE: The following procedure is required by the Windows Form Designer 'It can be modified using the Windows Form Designer. 'Do not modify it using the code editor. Private Sub InitializeComponent() ' 'FrmMain ' Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13) Me.ClientSize = New System.Drawing.Size(292, 266) Me.Name = "FrmMain" Me.Text = "Platform Game Engine" End Sub #End Region Private Sub FrmMain_Paint(ByVal sender As Object, ByVal e As PaintEventArgs) Dim g As Graphics = e.Graphics g.Clear(Me.BackColor) ' Draw an image Dim curImage As Image = Image.FromFile("character.bmp") g.DrawImage(curImage, 0, 0, curImage.Width, curImage.Height) End Sub End Class and it dosent work. its in the folder and all. If you know whats wrong can u plz explain so i can learn more from my mistakes.
+1
kovan23y ago
u need to use e change Dim g As Graphics = Me.CreateGraphics() -> Dim g As Graphics = e.Graphics the eventargument of the paint contains a dc that you can draw on.
+1