Holà a todos,
ich habe zumindest beim BMP-Speichern, das Problem ein wenig umgangen.
Delphi-Quellcode:
procedure TFrm.ExportToBMP();
var
Bmp : TBitmap;
BmpSize : TRect;
begin
Bmp := TBitmap.Create();
Bmp.height := 600;
Bmp.width := 800;
BmpSize := Rect(0,0,800,600);
bmp.PixelFormat := pf8bit;
TCGraph.Draw(Bmp.Canvas,BmpSize);
try
bmp.SaveToFile('aFileName.bmp');
finally
bmp.FreeImage();
end;
end;
Grüße
Wolf
Ein Schiff im Hafen ist sicher. Aber dafür werden Schiffe nicht gebaut. (engl. Sprichwort)