[Solved] Form Refreshing, flickering problem!

[loaded]

Hi everyone
Simultaneously according to the user's mouse position on the form.
When I want to draw lines with anti-aliased bgrabitmap, the form flickers.
Regarding the topic, if I move functions to the onpaint routine of the form. The problem is getting better a bit.
My goal is to flip a multi-point polygon. At the beginning of the road, are there any different solution methods regarding the issue? I would like to learn.

The initial work I did;

Code: Pascal  [Select][+][-]

1. procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
2. var
3.  bmp:TBGRABitmap;
4. begin
5.   Refresh;
6.   bmp := TBGRABitmap.Create(clientWidth,ClientHeight);
7.   bmp.CanvasBGRA.Pen.Width:=3;
8.   bmp.CanvasBGRA.Pen.Color:=clred;
9.   bmp.CanvasBGRA.Line(0,0,x,y);
10.   bmp.Draw(canvas,0,0);
11.   bmp.Free;
12. end;
13.  

[speter]

I would guess that the flickering is because (a) you call refresh (which redraws the form using the onpaint event handler); and/or (b) you are drawing a bitmap then freeing it.

Hope this helps a bit.

cheers
S.

[circular]

Hello @loaded

First good habit: always draw in OnPaint and call Invalidate (not Refresh) when you need to update.

That won't solve everything. One approach is to set the DoubleBuffer property to True.

Another one is to use TBGRAVirtualScreen form BGRAControls that will prevent flickering and store the bitmap for you. In this case, the function to call is DiscardBitmap and you draw in the OnRedraw event.

[loaded]

speter, thank you very much for your answer. I had previous experience with your suggestions. But that wasn't the answer I was looking for.

circular, thank you very much for your answer. I experimented with BGRAVirtualScreen on recommendation.
The result really surprised me that I had the speed and refresh experience I wanted.
Thank you this is awesome.
I want to ask here in order not to cause pollution, I would be very glad if you answer. Even if you don't, thanks.
-Can the BGRAVirtualScreen floor be made transparent? Can we see and touch the controls under it?
-Can keyboard features be added like onkeypress, onkeydown?

[circular]

If you need the background to be transparent, you can use TBGRAGraphicControl.

Yes you can add key handlers. If they are not published, visible in the object inspector, you still can defined handlers by assigning the OnKey* properties.

Some other remarks:
- TBGRAVirtualScreen is a container, you can put controls in it. TBGRAGraphicControl is not.
- On Retina display (MacOS) you can set the BitmapAutoscale property to False. In this case, the drawing surface will be twice as wide and high. So prefer to use BitmapWidth and BitmapHeight rather than the control's width and height to know the dimensions of the surface.

[loaded]

circular , Thank you very much for sparing your precious time and providing useful information. Respects.

[circular]

You're welcome