Static and dynamic TBGRABitmap objects.

[Khelle]

Hi everyone,
so Im still creating a game, and I have encountered next problem I cannot solve.
Im creating game field with something like that:

Code: [Select]

bimg := TBGRABitmap.Create(clientWidth, clientHeight, BGRAPixelTransparent);

{here Im creating game elements using another TBGRA variable - img and function bimg.PutImage();}

bimg.Draw(Canvas,0,0,True);
bimg.Free;

Game is refreshed every 40 ms, so I have to use True in the Draw mode, simply to clear the field and redraw it properly - each object with new coords etc.
But I would like to add graphical wallpaper beneath it, that doesnt need to be refreshed - I mean, a static wallpaper in .jpg format, res, maybe 1280x800px and there is my problem.

If I replace:

Code: [Select]

bimg := TBGRABitmap.Create(clientWidth, clientHeight, BGRAPixelTransparent);

with

Code: [Select]

bimg := TBGRABitmap.Create('./graphics/wallpaper.jpg');

Game starts to lag awfully - Im not surprised, if such a big file is loaded so many times.
I think it should work properly if I do not draw bimg on form Canvas but on wallpaper Canvas. I mean, to put bimg beyond wallpaper and refresh only bimg, without rest.
It should be fine, but... how to do it?
I tried something like

Code: [Select]

bimg.Draw(wallpaper.Canvas,0,0,True);

But It doesnt work.
Can someone help me with this? How should I code it?

[lainz]

Hi everyone,
so Im still creating a game, and I have encountered next problem I cannot solve.
Im creating game field with something like that:

Code: [Select]

bimg := TBGRABitmap.Create(clientWidth, clientHeight, BGRAPixelTransparent);

{here Im creating game elements using another TBGRA variable - img and function bimg.PutImage();}

bimg.Draw(Canvas,0,0,True);
bimg.Free;

Game is refreshed every 40 ms, so I have to use True in the Draw mode, simply to clear the field and redraw it properly - each object with new coords etc.
But I would like to add graphical wallpaper beneath it, that doesnt need to be refreshed - I mean, a static wallpaper in .jpg format, res, maybe 1280x800px and there is my problem.

If I replace:

Code: [Select]

bimg := TBGRABitmap.Create(clientWidth, clientHeight, BGRAPixelTransparent);

with

Code: [Select]

bimg := TBGRABitmap.Create('./graphics/wallpaper.jpg');

Game starts to lag awfully - Im not surprised, if such a big file is loaded so many times.
I think it should work properly if I do not draw bimg on form Canvas but on wallpaper Canvas. I mean, to put bimg beyond wallpaper and refresh only bimg, without rest.
It should be fine, but... how to do it?
I tried something like

Code: [Select]

bimg.Draw(wallpaper.Canvas,0,0,True);

But It doesnt work.
Can someone help me with this? How should I code it?

You need to create the image only one time, for example 'OnCreate' event.

OnDestroy free the image.

[Khelle]

I know that. It is just as I wrote before.
However, I dont know how to handle drawing o wallpaper instead of pure canvas.

[circular]

You must defined a form variable (in the class definition of your form). Add there something like "wallpaper: TBGRABitmap".

Then in OnCreate, assign wallpaper with Create(filename)

Then when drawing :

Code: [Select]

bimg := TBGRABitmap.Create(clientWidth, clientHeight, BGRABlack); //avoid transparency as you draw in opaque mode
bimg.Fill(wallpaper); //add this line

{here Im creating game elements using another TBGRA variable - img and function bimg.PutImage();}

bimg.Draw(Canvas,0,0,True);
bimg.Free;