Stopping flickering when RectangleShape resizes

Question

1.00/5 (1 vote)

See more:

Hello,

I'm making a custom progressbar where there is a gray background (2) and the progress rectangle (1) is blue. To show progress being made, the progress rectangle increases in width (see diagram).

VB

 _____________________
|            |        |
|     1      |--> 2   |
|____________|________|

The problem is that even with the following code, the progress rectangle flickers:

VB

Me.SetStyle(ControlStyles.UserPaint, True)
Me.SetStyle(ControlStyles.AllPaintingInWmPaint, True)
Me.SetStyle(ControlStyles.DoubleBuffer, True)

The progress rectangle's width is coded to increase by 1 up to 400 on a timer with the interval 100ms.

Please help. I can't find any other answers and I don't want to have to create a flash animation.

-Rixterz

Posted 10-Jun-14 9:58am

Rixterz123

Add a Solution

2 solutions

Add a Solution

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

phil.o · Answer 1 · 2014-06-10T10:06:00

Solution 1

That could be useful:
SO: Why do my WinForms controls flicker and resize slowly?[^]

Could you show us the method overriding OnPaint()?

Posted 10-Jun-14 10:06am

phil.o

Comments

[no name] 10-Jun-14 16:36pm

I don't have a method overriding OnPaint(). I'm just doing RectangleShape1.Width +=1.

Sergey Alexandrovich Kryukov 10-Jun-14 19:35pm

Then SuspendLayout/ResumeLayout can help. Actually, rendering in OnPaint or a handler of Paint could be a better alternative.
—SA

[no name] 11-Jun-14 4:43am

Is this what you meant:

Private Sub RectangleShapes_Paint(sender As Object, e As PaintEventArgs) Handles RectangleShape1.Paint, RectangleShape2.Paint
Me.SetStyle(ControlStyles.UserPaint, True)
Me.SetStyle(ControlStyles.AllPaintingInWmPaint, True)
Me.SetStyle(ControlStyles.DoubleBuffer, True)
End Sub

This still produces a flicker. My computer is 5 years old, but surely, even with the horrible graphics capability, you can still resize a rectangleshape without flicker!

phil.o 11-Jun-14 5:58am

No, the SetStyle method typically is used from the Program.Main() method.
What goes in the OnPaint() method is the code responsible for drawing the control. Please see the examples in the provided link.

[no name] 11-Jun-14 6:32am

I'm not making a custom control; i have 2 rectangleshapes. I said "custom" because i'm not using the usual progressbar control.

Sergey Alexandrovich Kryukov 11-Jun-14 11:14am

The idea was: maybe you should be making it...
But you could also render, say, on a panel or something like that. Then you don't override but handle Paint.
—SA

Sergey Alexandrovich Kryukov 11-Jun-14 11:12am

No, not even close. I could not even imagine why writing such thing as changing styles on each event. :-)
I mean doing what Paint and OnPaint is designed for: rendering graphics. Not using shapes at all. But I don't know your purpose; I just say it won't produce flicker.
—SA

phil.o 10-Jun-14 21:50pm

Sorry, I missed your reply.
Yes, indeed, as Sergey told you, overriding the OnPaint() method could be useful.
You can find many examples on CodeProject; here Progress Controls for example.
Good luck.

Rixterz123 · Answer 2 · 2014-06-11T01:01:00

Solution 2

Dim g as graphics= me.creategraphics --> e.graphics...

Posted 11-Jun-14 1:01am

Rixterz123

Stopping flickering when RectangleShape resizes

2 solutions

Solution 1

Solution 2

Add your solution here

Preview 0

Stopping flickering when RectangleShape resizes

2 solutions

Solution 1

Solution 2

Add your solution here

Preview 0

Existing Members

...or Join us