Zeichenet eine Bitmap in den angegebenen Gerätekontext
#include <WinAPIGdi.au3>
_WinAPI_DrawBitmap ( $hDC, $iX, $iY, $hBitmap [, $iRop = $SRCCOPY] )
| $hDC | Das Handle zum Gerätekontext in welcher die Bitmap gezeichnet werden soll. |
| $iX | Gibt die logische X-Koordinate der oberen linken Ecke der Bitmap an. |
| $iY | Gibt die logische Y-Koordinate der oberen linken Ecke der Bitmap an. |
| $hBitmap | Das Handle zur Bitmap welche gezeichnet werden soll. |
| $iRop | [optional] Der Raster-Operationscode (der selbe wie für _WinAPI_BitBlt()). Standard ist $SRCCOPY. |
| Erfolg: | 1. |
| Fehler: | 0 und setzt das @error Flag auf ungleich 0. |
Diese Funktion unterstützt keine Bitmaps mit einem Alphakanal. Man sollte _WinAPI_AlphaBlend() verwenden um mit solchen Bitmaps zu arbeiten.
_WinAPI_AlphaBlend, _WinAPI_BitBlt
#include "Extras\HelpFileInternals.au3"
#include <GUIConstantsEx.au3>
#include <SendMessage.au3>
#include <StaticConstants.au3>
#include <WinAPIGdi.au3>
#include <WinAPIGdiDC.au3>
#include <WinAPIHObj.au3>
#include <WinAPIRes.au3>
#include <WindowsStylesConstants.au3>
; Load image
Local $sBmp = _Extras_PathFull('Hatch.bmp')
Local $hSource = _WinAPI_LoadImage(0, $sBmp, $IMAGE_BITMAP, 0, 0, $LR_LOADFROMFILE)
Local $tSIZE = _WinAPI_GetBitmapDimension($hSource)
Local $W = DllStructGetData($tSIZE, 'X')
Local $H = DllStructGetData($tSIZE, 'Y')
; Create GUI
Local $hForm = GUICreate('Test ' & StringReplace(@ScriptName, '.au3', '()'), @DesktopWidth, @DesktopHeight, 0, 0, $WS_POPUP, $WS_EX_TOPMOST)
Local $idPic = GUICtrlCreatePic('', 0, 0, @DesktopWidth, @DesktopHeight)
Local $hPic = GUICtrlGetHandle($idPic)
; Create bitmap
Local $hDC = _WinAPI_GetDC($hPic)
Local $hDestDC = _WinAPI_CreateCompatibleDC($hDC)
Local $hBitmap = _WinAPI_CreateCompatibleBitmap($hDC, @DesktopWidth, @DesktopHeight)
Local $hDestSv = _WinAPI_SelectObject($hDestDC, $hBitmap)
For $i = 0 To Ceiling(@DesktopWidth / $W) - 1
For $j = 0 To Ceiling(@DesktopHeight / $W) - 1
_WinAPI_DrawBitmap($hDestDC, $i * $W, $j * $H, $hSource)
Next
Next
_WinAPI_ReleaseDC($hPic, $hDC)
_WinAPI_SelectObject($hDestDC, $hDestSv)
_WinAPI_DeleteObject($hSource)
_WinAPI_DeleteDC($hDestDC)
; Set bitmap to control
_SendMessage($hPic, $STM_SETIMAGE, 0, $hBitmap)
Local $hObj = _SendMessage($hPic, $STM_GETIMAGE)
If $hObj <> $hBitmap Then
_WinAPI_DeleteObject($hBitmap)
EndIf
GUISetState(@SW_SHOW)
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE