• Registered: 2017-05-15
  • Posts: 722

Topic: MAP Print or Save

Hello MVD

How to print the map or save to jpeg file? pls help

Thanks!

  • Registered: 2014-02-14
  • Posts: 10,294

Re: MAP Print or Save

Hello.


Sorry for delay, I was on vacation.


Example, how to save to bmp, jpg, png file:

procedure Form1_Button1_OnClick (Sender: TObject; var Cancel: boolean);
var
   bmp: TBitmap;
   jpg: TJpegImage;
   png: TPngImage;
begin
   bmp := TBitmap(Form1.Map1.ScreenShot(itBitmap));
   bmp.SaveToFile('d:\1.bmp');

   jpg := TJpegImage(Form1.Map1.ScreenShot(itJPeg));
   jpg.SaveToFile('d:\1.jpg');

   png := TPngImage(Form1.Map1.ScreenShot(itPng));
   png.SaveToFile('d:\1.png');
end;
Dmitry.
  • Registered: 2017-05-15
  • Posts: 722

Re: MAP Print or Save

BRAVO!