Hallo Mario,
heute ist wohl nicht mein Tag. Ich erkenne einfach nicht, was deine TImage-Komponente mit dem gezeigten Code zu tun haben soll. Eine funktionierende Funktion (GrabImage) um den Bildschirminhalt in ein Bitmap zu speichern habe ich dir in einem anderen thread schon angeboten. Die Zuweisung per Assign an ein JPegImage dürfte kein Problem darstellen.
Delphi-Quellcode:
var
jpg: TJpegImage;
bm: TBitmap;
begin
bm := GrabImage(GetDesktopWindow);
with TJpegImage.Create do
begin
// ...
Assign(bm);
if SaveDialog.Execute then
SaveToFile(SaveDialog.FileName);
Free;
end;
bm.Free;
end;
Deprimierte Grüße
marabu