Hey@all
Hoffe ihr könnt meinen Skript korrigieren:
Ich erhalte ein Schwarzes Bild.
Meine Absicht ist, dass ich ein kleines Bild 100x100 auf @desktopheight und width abänder
( also ich will das bild vergrößern )
#include <ScreenCapture.au3>
#include <GDIPlus.au3>
_GDIPlus_Startup()
$hBmp=@ScriptDir&"\test.jpg"
Global $Form1 = GUICreate("Test", 285, 228, -1, -1)
$hGraphic = _GDIPlus_GraphicsCreateFromHWND($Form1)
$hBitmap = _GDIPlus_BitmapCreateFromGraphics(@DesktopWidth, @DesktopHeight, $hGraphic)
$hBuffer = _GDIPlus_ImageGetGraphicsContext($hBitmap)
$HBITMAP_Screenshot1 = _ScreenCapture_Capture($hBmp,10,10,1000,100)
$hBitmap1 = _GDIPlus_BitmapCreateFromHBITMAP($HBITMAP_Screenshot1)
_WinAPI_DeleteObject($HBITMAP_Screenshot1)
_GDIPlus_GraphicsDrawImageRect($hBuffer, $hBitmap1, 0, 0,@DesktopWidth,@DesktopHeight)
_GDIPlus_ImageSaveToFile($hBitmap,$hBmp)
_GDIPlus_BitmapDispose($hBitmap)
_GDIPlus_BitmapDispose($hBitmap1)
_GDIPlus_GraphicsDispose($hGraphic)
_GDIPlus_GraphicsDispose($hBuffer)
_WinAPI_DeleteObject($hBmp)
_GDIPlus_Shutdown()
thx4help