Kalenderübersicht als jpg

[MEissing]

In Delphi würd ich das so machen:

Code:

var
  Bmp: TBitmap;
  Png: TPngImage;
begin
  Bmp := TBitmap.Create;
  try
    Bmp.SetSize(CalendarView1.Width, CalendarView1.Height);
    BitBlt(Bmp.Canvas.Handle, 0, 0, CalendarView1.Width, CalendarView1.Height,
      self.Canvas.Handle, CalendarView1.left, CalendarView1.Top, SRCCOPY);
    Png := TPngImage.Create;
    try
      Png.Assign(Bmp);
      Png.SaveToFile('C:\Users\Matthias\Desktop\Test.png');
    finally
      Png.Free;
    end;
  finally
    Bmp.Free;
  end;
end;