Desktop Screenshot

[Nogge]

Moin Knotti2015,
Du musst auch erst dein JPEGImage erstellen, wie du es auch oben in deinem Code mit der Bitmap gemacht hast:

Delphi-Quellcode:

  {Create a bitmap}
  bmp := TBitmap.Create;

Das heißt, du musst jetzt noch über deinem try

Delphi-Quellcode:

  {Create a JpegImage}
  Jpg := TJpegImage.Create;

hinzufügen.