GetFormImage supplies black Bitmap
Original Reporter info from Mantis: Michl @michl1
-
Reporter name: Michl
Original Reporter info from Mantis: Michl @michl1
- Reporter name: Michl
Description:
To make a Picture of a Form you can use GetFormImage. It returns a black Bitmap.
Steps to reproduce:
A empty Form with 1 Button:
procedure TForm1.Button1Click(Sender: TObject);
var
Bitmap:TBitmap;
begin
Bitmap:=GetFormImage;
Bitmap.SaveToFile('FormImage.bmp');
Bitmap.Free;
end;
Additional information:
Workaround: before saving use Canvas.Changed:
procedure TForm1.Button1Click(Sender: TObject);
var
Bitmap:TBitmap;
begin
Bitmap:=GetFormImage;
Bitmap.Canvas.Changed;
Bitmap.SaveToFile('FormImage.bmp');
Bitmap.Free;
end;
Mantis conversion info:
- Mantis ID: 25448
- OS: Windows
- OS Build: 7
- Build: r43538 FPC 2.7.1
- Platform: x64
- Version: 1.3 (SVN)
- Fixed in version: 1.7 (SVN)
- Fixed in revision: 53790 (#b77917bb), 54033 (#7cc77497), 54077 (#94630704)
- Monitored by: » BigChimp (Reinier Olislagers), » papelhigienico (Fabio Luis Girardi)
- Target version: 1.6.3 (SVN)