I have a program, which was working fine in Windows and Linux.
Shortly I recompiled the source in Linux with Lazarus Version #: 2.1.0, Date 2020-05-30, FPC-Version: 3.0.4, SVN-Revision 63251M, x86_64-linux-gtk2.
I draw an image in the background on
TempBild is created by
TempBild.Free;
TempBild:=TImage.Create(Form1);
TempBild.Left := 0;
TempBild.Top := 0;
TempBild.Width := Form1.ClientWidth;
TempBild.Height := Form1.ClientHeight;
With TempBild,Canvas do
begin
Brush.Color := clRed;{bz White;}
FillRect(Rect(0,0,ClientWidth,ClientHeight));
Font.Name := 'Arial';
Font.Size := 10;
end;
To check, if everything is well drawn I tested it by
TempBild.Picture.SaveToFile('TempBild.jpg');
and everything is fine
I transfer it to the Canvas of Form1 with the following statements:
with TempBild.Canvas do
src := Rect(0,0,ClientWidth,ClientHeight);
with Form1.Canvas do
dest := Rect(0,0,ClientWidth,ClientHeight);
Form1.Canvas.CopyRect(dest,TempBild.Canvas,src);
but nothing happens, in on my screen.
With older versions of Lazarus under Linux everything worked satisfactory.
Can anybody help me?