Bin ich auch gerade am ausprobieren:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
MyBitmap: TBitmap;
ScreenDC: HDC;
begin
MyBitmap := TBitmap.Create;
ScreenDC := GetDC(0);
MyBitmap.LoadFromDevice(ScreenDC);
ReleaseDC(0,ScreenDC);
end;
Ich kriege aber folgende Fehlermeldung:
Zitat:
Failed to get raw image from device