kleine Frage zum screenshot machen

**cRayZo**

hi ne kleine Frage^^

wieso geht

MakeScreenShot(Image1.Picture.Bitmap); aber das hier nicht?

Delphi-Quellcode:

			Var

Varscreen:TBitmap;

begin

MakeScreenShot(Varscreen);

Image1.Picture.Bitmap:=Varscreen;

(mit dem procedure)

zusammenfalten · markieren

Delphi-Quellcode:

			procedure MakeScreenShot(const ATarget: TBitmap);

var

  DesktopDC: HDC;

begin

  DesktopDC := CreateDC('DISPLAY', nil, nil, nil);

  try

    ATarget.PixelFormat := pfDevice;

    ATarget.Width := Screen.Width;

    ATarget.Height := Screen.Height;

    BitBlt(ATarget.Canvas.Handle, 0, 0, Screen.Width, Screen.Height, DesktopDC, 0, 0, SRCCOPY);

  finally

    DeleteDC(DesktopDC);

  end;

end;

das versteh ich nciht das ist doch das Gleiche??

ich möchte den screenshot in eine Variable speichern, wie soll das denn anders gehen, wenn nicht da wie oben?

kleine Frage zum screenshot machen

kleine Frage zum screenshot machen

Forumregeln