Click here to Skip to main content
Licence 
First Posted 27 Jul 2004
Views 59,059
Bookmarked 22 times

GraphicsDoubleBuffer

By | 27 Jul 2004 | Article
This is a simple class designed to remove flickering from painting controls with gdi+

Introduction

This is a simple class i designed to remove flickering from painting controls with gdi+. The class removes flickering by double buffering the drawing. It draws on a separate bitmap canvas file. Once all drawing is complete, you can then push the drawing to the main drawing canvas all at once. This will kill most if not all flickering the drawing produces.

Code

Below is the simple class:

Public Class GraphicsDoubleBuffer

        Private P_Canvas As Bitmap

        Public Property [Canvas]() As Bitmap
            Get
                Return P_Canvas
            End Get
            Set(ByVal Value As Bitmap)
                P_Canvas = Value
            End Set
        End Property

        Public Sub New(ByVal CanvasWidth As Integer, 
                   ByVal CanvasHeight As Integer)
            P_Canvas = New Bitmap(CanvasWidth, CanvasHeight)
        End Sub

        Public Function Store() As Graphics

            Dim g As Graphics = Graphics.FromImage(P_Canvas)
            Return g

        End Function

        Public Sub Paint(ByVal Where As Object)

            Dim g As Graphics = Where.CreateGraphics()
            g.SmoothingMode = SmoothingMode.None
            Dim g2 As Graphics = Graphics.FromImage(P_Canvas)
            g2.SmoothingMode = SmoothingMode.None
            g.DrawImage(P_Canvas, 0, 0)
            g.Dispose()
            g2.Dispose()

        End Sub

        Public Sub [Dispose]()

            P_Canvas.Dispose()

        End Sub

    End Class
To use this class in your custom control add the following code to your project.
Dim g As New GraphicsDoubleBuffer(ClientRectangle.Width, 
    ClientRectangle.Height)
g.Store()
g.Paint(Me)
g.Dispose()

Start by declaring a constructor to the GraphicsDoubleBuffer() Class. Pass the the constructor the drawing dimensions of your canvas or form. Next use store() as your new gdi+ graphics object. You can do this several ways.

Example 1:
Dim g2 as graphics = g.store() 
g2.FillRectangle(New SolidBrush(Color.black), New Rectangle(20, 20, 20, 20))
Example 2:
g.store.FillRectangle(New SolidBrush(Color.black), 
    New Rectangle(20, 20, 20, 20))
After you have drawn to the store() graphics object, you then must push it to your main drawing canvas like so:
g.paint(Me)

"Me" must be the user control or form. After that we dispose() of the drawing object to clear it from memory.

g.dispose()

Resources

Conclusion

Well this concludes my simple double buffering class. If you use this class properly, it can be a vital resource to you. Latez, VectorX

License

This article has no explicit license attached to it but may contain usage terms in the article text or the download files themselves. If in doubt please contact the author via the discussion board below.

A list of licenses authors might use can be found here

About the Author

VectorX

Software Developer (Senior)
Codevendor
United States United States

Member

Please visit my personal website http://www.codevendor.com for my latest codes and updates.

Sign Up to vote   Poor Excellent
Add a reason or comment to your vote: x
Votes of 3 or less require a comment

Comments and Discussions

 
You must Sign In to use this message board. (secure sign-in)
 
Search this forum  
 FAQ
    Noise  Layout  Per page   
  Refresh
GeneralMy vote of 5 Pinmembermanoj kumar choubey3:28 18 Feb '12  
GeneralVery nice PinmemberVaclavAntosik11:49 27 Nov '07  
GeneralAre there a faster vb .net grapihcs Pinmembermasterdima10:33 21 Jun '07  
GeneralRe: Are there a faster vb .net grapihcs [modified] PinmemberVectorX15:03 21 Jun '07  
GeneralIt's a bit slow, is there a faster way Pinmembermasterdima12:54 17 Jun '07  
GeneralRe: It's a bit slow, is there a faster way PinmemberVectorX15:00 17 Jun '07  
GeneralRe: It's a bit slow, is there a faster way Pinmembermasterdima17:18 17 Jun '07  
Generalthanks Pinmembersuchinoko18:14 23 May '07  
GeneralThanks Pinmembernetislander9:37 19 Mar '07  
Questionwhat about the SetStyles method ? Pinmemberalpha_centurian17:45 4 Sep '06  
as far as i know , the way to implement double buffering in VB.NET is :
 
Public Sub New()
MyBase.New()
 
'This call is required by the Windows Form Designer.
InitializeComponent()
 
'Add any initialization after the InitializeComponent() call
Me.SetStyle(ControlStyles.DoubleBuffer Or ControlStyles.UserPaint Or ControlStyles.AllPaintingInWmPaint, True)
Me.UpdateStyles()
End Sub
 
but this is not working ... any help ?
GeneralThe really old days PinmemberGiles20:44 28 Jul '04  
Generalvoid xbios(26) ? PinmemberKochise21:13 28 Jul '04  
GeneralRe: void xbios(26) ? PinmemberGiles11:25 29 Jul '04  
Generalor you could just PinmemberAllen Anderson14:30 28 Jul '04  
GeneralRe: or you could just PinmemberVectorX16:36 28 Jul '04  
GeneralRe: or you could just PinmemberMatthew Adams8:09 30 Jul '04  
GeneralRe: or you could just PinmemberVectorX10:16 30 Jul '04  
GeneralRe: or you could just PinmemberRhy Mednick6:12 3 Aug '04  

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.

Permalink | Advertise | Privacy | Mobile
Web02 | 2.5.120529.1 | Last Updated 28 Jul 2004
Article Copyright 2004 by VectorX
Everything else Copyright © CodeProject, 1999-2012
Terms of Use
Layout: fixed | fluid