GUI maximiert und vollständig sichtbar auf allen Bildschirmgrößen anzeigen lassen

bazii

Hallo,

ich bekomme es nicht hin, auf Note, Netbooks verschiedener Monitorgrößen meine GUI vollständig angezeigt zu bekommen.
Mit Koda habe ich die verschiedensten Kombinationen getestet, jedoch nur mit teilerfolgen.

Meine derzeitige Test Gui hat folgenden Code:

C

;coded by UEZ build 2014-02-08, idea taken from http://codepen.io/Fahrenheit/pen/Kbyxu
;AutoIt v3.3.9.21 or higher needed!


#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Constants.au3>
#include <GDIPlus.au3>


 ;== == == == == == == == == == == == == == == == == == == == == == == == == == == == == == == == == =
;AutoItSetOption("TrayMenuMode", 11)
;===================================================================
Opt("GUIResizeMode", $GUI_DOCKAUTO)
;===================================================================




#Region ### START Koda GUI section ### Form=h:\meine software\toolstarter\toolstarter.kxf
Opt("GUIResizeMode", $GUI_DOCKAUTO)


_GDIPlus_Startup()


Global Const $STM_SETIMAGE = 0x0172; $IMAGE_BITMAP = 0
Global $hHBmp_BG, $hB, $iPerc = 0, $iSleep = 30, $s = 0, $aText[2] = ["Lese Verzeichnisse ein", "Bitte warten!"], $t, $m = 0
Global $iW_Splash = 500, $iH_Splash = 250, $iPic_Splash
Show_Splash()


$Form1_1 = GUICreate("LS", 906, 762, 0, 0, BitOR($GUI_SS_DEFAULT_GUI,$WS_SIZEBOX,$WS_MAXIMIZEBOX,$WS_THICKFRAME,$WS_TABSTOP))
GUISetBkColor(0xD7E4F2)


$netzwerk = GUICtrlCreateButton("IP-Config /all", 13, 354, 129, 49)
GUICtrlSetTip(-1, "ipconfig /all")
GUICtrlSetCursor(-1, 0)
$mac = GUICtrlCreateButton("MAC-Adresse ermitteln", 156, 354, 129, 49)
GUICtrlSetTip(-1, "Zeigt die MAC-Adressen Ihrer Netzadapter an")
GUICtrlSetCursor(-1, 0)
GUISetState(@SW_SHOW)


;==============================================================================


If @OSArch = "X64" And Not @AutoItX64 Then
	DllCall("kernel32.dll", "int", "Wow64DisableWow64FsRedirection", "int", 1)
EndIf
;==============================================================================
;If @OSArch = "X64" and not @Autoitx64 Then
;	Msgbox(64, "Falsche Architektur !", "Unter einem 64bit Betriebssystem, muss auch eine 64bit-Variante" & @CRLF & "des Programms gestartet werden !")
;	Exit
;EndIf
;==============================================================================




Global $iW = 600, $iH = 150
Global Const $hGUI = GUICreate("Top-PE.DE", $iW, $iH, (890 - $iW) / 2, 100, $WS_POPUP, $WS_EX_MDICHILD, $Form1_1)
Global Const $iPic = GUICtrlCreatePic("", 0, 0, $iW, $iH)
GUICtrlSetState(-1, $GUI_DISABLE)
GUISetState(@SW_HIDE, $hGUI)


Do
	Switch GUIGetMsg()
		Case $netzwerk
			StartAnim()
			_netzwerk()
			Sleep(5000)
			StopAnim()
			Run(@ComSpec & " /c start ipconfig.txt", @WorkingDir, @SW_HIDE)
		Case $mac
			StartAnim()
			_mac()
			Sleep(5000)
			StopAnim()
			Run(@ComSpec & " /c start getmac.txt", @WorkingDir, @SW_HIDE)
		Case $GUI_EVENT_CLOSE
			GUIRegisterMsg($WM_TIMER, "")
			_WinAPI_DeleteObject($hHBmp_BG)
			_GDIPlus_Shutdown()
			GUIDelete()
			Exit
	EndSwitch
Until False
;==============================================================================


Func StartAnim()
	GUISetState(@SW_SHOW, $hGUI)
	GUIRegisterMsg($WM_TIMER, "PlayAnim")
	DllCall("user32.dll", "int", "SetTimer", "hwnd", $hGUI, "int", 0, "int", $iSleep, "int", 0)
EndFunc   ;==>StartAnim


Func StopAnim()
	GUISetState(@SW_HIDE, $hGUI)
	GUIRegisterMsg($WM_TIMER, "")
EndFunc   ;==>StopAnim


Func _netzwerk()
	RunWait(@ComSpec & ' /c ' & 'ipconfig /all > ipconfig.txt' & '"', "", @WorkingDir, @SW_HIDE)
	;Exit
EndFunc   ;==>_netzwerk


Func _mac()
	RunWait(@ComSpec & ' /c ' & 'getmac /V > getmac_.txt' & '"', "", @WorkingDir, @SW_HIDE)
	Sleep(200)
	RunWait(@ComSpec & ' /c ' & 'cmd /U /C TYPE getmac_.txt > getmac.txt' & '"', "", @WorkingDir, @SW_HIDE)
	Sleep(200)
	RunWait(@ComSpec & ' /c ' & 'del getmac_.txt' & '"', "", @WorkingDir, @SW_HIDE)
	Sleep(200)
	Run(@ComSpec & " /c start getmac.txt", @WorkingDir, @SW_HIDE)
	;Exit
EndFunc   ;==>_mac


;===================================================================




Func PlayAnim()
	$hHBmp_BG = _GDIPlus_LineProgressbar($iW, $iH, $aText[$m])
	$hB = GUICtrlSendMsg($iPic, $STM_SETIMAGE, $IMAGE_BITMAP, $hHBmp_BG)
	If $hB Then _WinAPI_DeleteObject($hB)
	_WinAPI_DeleteObject($hHBmp_BG)
	$t += 1
	If Not $t = Mod($t, 250) Then $m = Mod($m + 1, 2)
EndFunc   ;==>PlayAnim




Func _GDIPlus_LineProgressbar($iW, $iH, $sText = "Loading", $sFont = "Arial Black", $iFontSize = 16, $bHBitmap = True)
	Local Const $hFormat = _GDIPlus_StringFormatCreate()
	Local Const $hFamily = _GDIPlus_FontFamilyCreate($sFont)
	Local Const $hFont = _GDIPlus_FontCreate($hFamily, $iFontSize)
	_GDIPlus_StringFormatSetAlign($hFormat, 1)
	_GDIPlus_StringFormatSetLineAlign($hFormat, 1)
	Local $tLayout = _GDIPlus_RectFCreate()
	Local Const $hBitmap = _GDIPlus_BitmapCreateFromScan0($iW, $iH)
	Local Const $hGfx = _GDIPlus_ImageGetGraphicsContext($hBitmap)
	_GDIPlus_GraphicsSetSmoothingMode($hGfx, 4 + (@OSBuild > 5999))
	_GDIPlus_GraphicsSetTextRenderingHint($hGfx, 4)
	_GDIPlus_GraphicsSetPixelOffsetMode($hGfx, $GDIP_PIXELOFFSETMODE_HIGHQUALITY)


	Local $hBitmap_Bg = _GDIPlus_BitmapCreateFromMemory(_Background_Image())
	_GDIPlus_GraphicsDrawImageRect($hGfx, $hBitmap_Bg, 0, 0, $iW, $iH)
	Local $aInfo = _GDIPlus_GraphicsMeasureString($hGfx, $sText, $hFont, $tLayout, $hFormat)
	Local Const $hBrush_Text = _GDIPlus_BrushCreateSolid(0xFFFFFFFF), $hBrush_BgRect = _GDIPlus_BrushCreateSolid(0xA061BDB6), $hBrush_Rect = _GDIPlus_BrushCreateSolid(0x80FF3600)
	Local Static $z
	_GDIPlus_GraphicsFillRect($hGfx, Cos($z) * $aInfo[0].Width / 5 + ($iW - $aInfo[0].Width) / 2 - $aInfo[0].Width / 4, ($iH - $aInfo[0].Height) / 2 - $aInfo[0].Height / 4, $aInfo[0].Width + $aInfo[0].Width / 2, $aInfo[0].Height + $aInfo[0].Height / 2, $hBrush_BgRect)
	_GDIPlus_GraphicsFillRect($hGfx, Cos($z) * $aInfo[0].Width / 1.5 + ($iW - $aInfo[0].Width / 8) / 2, ($iH - $aInfo[0].Height) / 2 - $aInfo[0].Height / 2, $aInfo[0].Width / 8, 2 * $aInfo[0].Height, $hBrush_Rect)


	$tLayout.Width = $iW
	$tLayout.Height = $iH
	_GDIPlus_GraphicsDrawStringEx($hGfx, $sText, $hFont, $tLayout, $hFormat, $hBrush_Text)
	Local Const $hPen_Rect = _GDIPlus_PenCreate(0xF0E0E0E0)
	_GDIPlus_GraphicsDrawRect($hGfx, 0, 0, $iW - 1, $iH - 1, $hPen_Rect)
	_GDIPlus_PenDispose($hPen_Rect)
	$z += 0.09
	_GDIPlus_FontDispose($hFont)
	_GDIPlus_FontFamilyDispose($hFamily)
	_GDIPlus_StringFormatDispose($hFormat)
	_GDIPlus_BrushDispose($hBrush_Text)
	_GDIPlus_BrushDispose($hBrush_BgRect)
	_GDIPlus_BrushDispose($hBrush_Rect)
	_GDIPlus_GraphicsDispose($hGfx)
	_GDIPlus_BitmapDispose($hBitmap_Bg)


	If $bHBitmap Then
		Local $hHBITMAP = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBitmap)
		_GDIPlus_BitmapDispose($hBitmap)
		Return $hHBITMAP
	EndIf
	Return $hBitmap
EndFunc   ;==>_GDIPlus_LineProgressbar




Func Show_Splash()
	Local Const $hGUI_Splash = GUICreate("Steam Punk Loading", $iW_Splash, $iH_Splash, -1, -1, $WS_POPUPWINDOW, $WS_EX_TOPMOST)
	GUISetBkColor(0xD2CEC6)
	$iPic_Splash = GUICtrlCreatePic("", 0, 0, $iW_Splash, $iH_Splash)
	GUICtrlSetState(-1, $GUI_DISABLE)
	GUISetState(@SW_SHOW, $hGUI_Splash)
	GUIRegisterMsg($WM_TIMER, "PlayAnim_Splash")
	DllCall("user32.dll", "int", "SetTimer", "hwnd", $hGUI_Splash, "int", 0, "int", 50, "int", 0)
	Sleep(3000)
	GUIRegisterMsg($WM_TIMER, "")
	_WinAPI_DeleteObject($hHBmp_BG)
	GUIDelete($hGUI_Splash)
EndFunc   ;==>Show_Splash


Func PlayAnim_Splash()
	$hHBmp_BG = _GDIPlus_SteamPunkLoading($iW_Splash, $iH_Splash, "Initialisierung...")
	$hB = GUICtrlSendMsg($iPic_Splash, $STM_SETIMAGE, $IMAGE_BITMAP, $hHBmp_BG)
	If $hB Then _WinAPI_DeleteObject($hB)
	_WinAPI_DeleteObject($hHBmp_BG)
EndFunc   ;==>PlayAnim_Splash


Func _GDIPlus_SteamPunkLoading($iW, $iH, $sString = "Please wait...", $bHBitmap = True)
	Local Const $hPenArc = _GDIPlus_PenCreate(0xA08ABDC3, 25)
	_GDIPlus_PenSetLineJoin($hPenArc, 2)
	Local $hBitmap = _GDIPlus_BitmapCreateFromScan0($iW, $iH)
	Local Const $hCtxt = _GDIPlus_ImageGetGraphicsContext($hBitmap)
	_GDIPlus_GraphicsSetPixelOffsetMode($hCtxt, $GDIP_PIXELOFFSETMODE_HIGHQUALITY)
	_GDIPlus_GraphicsSetSmoothingMode($hCtxt, 2)
	Local Const $hBmp_BG = _GDIPlus_BitmapCreateFromMemory(_Background())
	Local $hBrushTexture = _GDIPlus_TextureCreate($hBmp_BG)
	_GDIPlus_BitmapDispose($hBmp_BG)
	_GDIPlus_GraphicsFillRect($hCtxt, 0, 0, $iW, $iH, $hBrushTexture)
	Local $fCosX, $fSinY, $i
	Local Const $fDeg = ACos(-1) / 180, $iW2 = $iW / 2, $iH2 = $iH / 2, $iDiameter = 200, $iRadius = $iDiameter / 2, $iSize = 25, $iSize2 = $iSize / 2, $fFontSize = 20
	Local Static $iAngle = 0, $iX = 0, $iDir = 1
	_GDIPlus_PenSetColor($hPenArc, 0x60F0F0F0)
	_GDIPlus_GraphicsDrawArc($hCtxt, $iW2 - $iRadius, $iH2 - $iRadius, $iDiameter, $iDiameter, 0, 360, $hPenArc)
	_GDIPlus_PenSetColor($hPenArc, 0xA08ABDC3)
	For $i = 0 To 7
		If Not Mod($i, 2) Then
			_GDIPlus_GraphicsDrawArc($hCtxt, $iW2 - ($iRadius - $iSize), $iH2 - ($iRadius - $iSize), $iDiameter - 2 * $iSize, $iDiameter - 2 * $iSize, $iAngle + $i * 45, 45, $hPenArc)
		EndIf
	Next
	_GDIPlus_PenSetColor($hPenArc, 0x20F0F0F0)
	_GDIPlus_GraphicsDrawArc($hCtxt, $iW2 - ($iRadius - $iSize), $iH2 - ($iRadius - $iSize), $iDiameter - 2 * $iSize, $iDiameter - 2 * $iSize, 0, 360, $hPenArc)


	_GDIPlus_PenSetColor($hPenArc, 0x508ABDC3)
	For $i = 0 To 5
		If Not Mod($i, 2) Then
			_GDIPlus_GraphicsDrawArc($hCtxt, $iW2 - ($iRadius - 2 * $iSize), $iH2 - ($iRadius - 2 * $iSize), $iDiameter - 4 * $iSize, $iDiameter - 4 * $iSize, $iAngle + $i * 60, 60, $hPenArc)
		EndIf
	Next
	_GDIPlus_PenSetColor($hPenArc, 0x30F0F0F0)
	_GDIPlus_GraphicsDrawArc($hCtxt, $iW2 - ($iRadius - 2 * $iSize), $iH2 - ($iRadius - 2 * $iSize), $iDiameter - 4 * $iSize, $iDiameter - 4 * $iSize, 0, 360, $hPenArc)


	_GDIPlus_PenSetColor($hPenArc, 0x808ABDC3)
	For $i = 0 To 3
		If Not Mod($i, 2) Then
			_GDIPlus_GraphicsDrawArc($hCtxt, $iW2 - ($iRadius - 3 * $iSize), $iH2 - ($iRadius - 3 * $iSize), $iDiameter - 6 * $iSize, $iDiameter - 6 * $iSize, $iAngle + $i * 90, 90, $hPenArc)
		EndIf
	Next
	_GDIPlus_PenSetColor($hPenArc, 0x20F0F0F0)
	_GDIPlus_GraphicsDrawArc($hCtxt, $iW2 - ($iRadius - 3 * $iSize), $iH2 - ($iRadius - 3 * $iSize), $iDiameter - 6 * $iSize, $iDiameter - 6 * $iSize, 0, 360, $hPenArc)


	Local $hBrushCircle = _GDIPlus_BrushCreateSolid(0x60F0F0F0)
	_GDIPlus_GraphicsFillEllipse($hCtxt, $iW2 - $iSize2, $iH2 - $iSize2, $iSize, $iSize, $hBrushCircle)


	$iAngle += 4
	Local Const $hFormat = _GDIPlus_StringFormatCreate()
	Local Const $hFamily = _GDIPlus_FontFamilyCreate("Impact")
	Local Const $hFont = _GDIPlus_FontCreate($hFamily, $fFontSize)
	Local Const $tLayout = _GDIPlus_RectFCreate(0, 0, 0, 0)
	Local Const $aInfo = _GDIPlus_GraphicsMeasureString($hCtxt, $sString, $hFont, $tLayout, $hFormat)
	Local Const $hBrushTxt = _GDIPlus_LineBrushCreate($iX, 0, DllStructGetData($aInfo[0], "Width"), 0, 0x90101010, 0xFFA0A0A0, 2)
	_GDIPlus_LineBrushSetLinearBlend($hBrushTxt, $iX, 1)
	DllStructSetData($tLayout, "X", ($iW - DllStructGetData($aInfo[0], "Width")) / 2)
	DllStructSetData($tLayout, "Y", ($iH - DllStructGetData($aInfo[0], "Height")) / 2)
	_GDIPlus_LineBrushSetGammaCorrection($hBrushTxt)
	_GDIPlus_GraphicsDrawStringEx($hCtxt, $sString, $hFont, $tLayout, $hFormat, $hBrushTxt)
	$iX += 0.02 * $iDir
	If $iX > 0.98 Or $iX < 0.02 Then $iDir *= -1


	_GDIPlus_FontDispose($hFont)
	_GDIPlus_FontFamilyDispose($hFamily)
	_GDIPlus_StringFormatDispose($hFormat)
	_GDIPlus_BrushDispose($hBrushTxt)
	_GDIPlus_BrushDispose($hBrushTexture)
	_GDIPlus_BrushDispose($hBrushCircle)
	_GDIPlus_GraphicsDispose($hCtxt)
	_GDIPlus_PenDispose($hPenArc)
	If $bHBitmap Then
		Local $hHBITMAP = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBitmap)
		_GDIPlus_BitmapDispose($hBitmap)
		Return $hHBITMAP
	EndIf
	Return $hBitmap
EndFunc   ;==>_GDIPlus_SteamPunkLoading


;Code below was generated by: 'File to Base64 String' Code Generator v1.12 Build 2013-03-27


Func _Background($bSaveBinary = False, $sSavePath = @ScriptDir)
	Local $Background
	$Background &= 'iVBORw0KGgoAAAANSUhEUgAAAEAAAABACAMAAACdt4HsAAAAnFBMVEXX08vd2dHZ1c3b18/a1s7c2NDY1MzW0sre2tLTz8fg3NTU0Mjf29PV0cnRzcXh3dXPy8Pi3tbSzsbLx7/MyMDNycHOysLJxb3Kxr7QzMTIxLzHw7vj39fGwrrFwbnEwLjCvrbDv7fBvbXAvLS9ubG+urK7t6/k4Ni/u7O0sKi1sam3s6u8uLDl4dm4tKygnJSwrKTm4tqfm5OLh3+vBRlAAAAJ5ElEQVR4Xg3ORbIsyZIAUWMzZw+OyMz7qOBj8/731jVSkTNSyPRvstiR0BJpCcklS25k2FRHqyr20c/pShMF6cMxK/Nli99Q1BjqH/zSTXkUKuXlJ/FI+mvAQosvLb7BYyQN0thsp9RWvfRYiq9EcNCUBI8wr6PyPkZ+iPDCJX6DHN8F6QGCqe6TQErOoyhbx0ocBj95xJPFIR6b3ILLVIo0XFadSWWjpybZ7ClfctOqpzp8c6UuDjebbE/PEE9dQft7DEo5caHyaWT6c+XaLQOjsSvRNwGlMayrtHUZ7kuWUtWmZl0J0EbhXofd9aVTTz78guReD0xk+pVf9JscvPIqj79sx0ZJ++hy1I79c4GgpIaU3rnQrjx+htr3teSfqlDyghMtH3nYoZgLFwaL/F95sVVRj8oCVXmO7/LwTAXvPvVO5yi45tV2TYutBTsWJPz+7MtxQ+0iXvIGX/kJxRM4cSxxVuL2IexBNIVrY9bDApul+OGRyRCcshKIvmumI4RPq/4gyKMA+nnqzg8/vvlKlzpTPCZopJEUW1oAL3nCedrUnUltYSQ4lhWmjTiJ2D9Eu6qVarJTBFO21ao+LvEI57d+UAekHQPaUJ680IltATttgtFjTebSc6cr7wG0Dqlk5YOyxxUPTrjJ9aZXW/mhfywFnS46WwKDmc37YNP6sRePSiPiEeKDAqcnMh11p6DdMHfOIy2GalyNJR4E3W02WlL9HR/cx0/iOOujP2qxLjs+0viIua50YtMdMHsGv5WksORmBJzROjJ/U+CCEY80Wiv5rkqzLmLgtQXEZKLGRV6AWQJpYuRGGQGS77m4ZI4XG6959UJv8PzmlTCSrtXEp/APbdLSLkmmuXoEPPnhB8AAhV+Y2plEn2bca7ULLNZBuFZZPGt7RKBX5nZYEECV/OHfiRtV0DlWcJ321se7vwrKxjwaPaEmulJwkpW/WKXXp77ERoozY7zrqUkchJ2xXoi0GeOJCC9BTDToTizGKmf28qokZ13iKFIFs/L4ZKmNSoZI9dHdGhyfXVb1eqnH4095ng3fOVXymxNz6VzGVnc/8tQLPZ+U+IAMhEIRyP92XX5jLUQfLiycIujUJO7Ge/HYNGUmo3tEPl3VcYh8RMAa/vmp8hqGvRqvuIfpxSes5JFyknc59LZUWvpZn+OmrXokSLguu2DukCDxQBPFUxAuTuiDSCqFyUcMdUxU25cF3eb6MgsB4acGHpDrbiAkvNxLanMc+tgJRxjeflHTzi4iIG+ZzMil08wF21jjpdNL/uEvegFWskRDMlOsNbAsC2NFehQiiTIPtJN4rER6M/VHl3gN4v8Wxbu2FXKjA7weOKmXFZshvburROMjp96HG+TJb6PFUAPE2PEgi7MVu/gGqbtke8SqA4V/BnjwODWlnR3XHEIUJVmWVSvvjHISiZMEE9JeQKYmJJw2Y9ckb/uWZj7c9BDmriU3vfMfeC5/2qqvmmgrW3qx5xgHXLaBGsoLlVPJILU4EEBxq8DolqttLPymXPcC0Jnz3jo0y59TRwV1hPwMrWtLdIFblycm3OWgXXZd8xwrrHCME2Zc5wsSdCx0wF5Xttprgx0i72MpSaT0Irlg5I7MfanjsNDCVMGz7NDS7yV0GkYShheSfoXJ4TDOfusXn/aiyTeTvarXhTr16IMq07saOLpse1pglCVF4Se6b5nqASt0o+Q1iyD7+mnpZJRnfASGp99R'
	$Background &= 'LOFCvoQczPJitnNhK6LyTXI9KjVA1dtXWqnrFOSdR05mZE3yI2Ukuuj9N/2PwA0mbXTJCbJMAW64+752oCjN8S38V6F+KX0KB2/UvGerk6TC+J86gww9lqeynRnz76ZymsQWkPdR+B0F/8xeLjgh6ayUf9JpbxbfqDDUwpZ/1OT26fRIyi0f8H3Q4LzBFGX6BDoxVM78d+cAxHYzi2B2qMhJgo+q0llrIvmU/BlJiNwrAyX0IH6Wm00eKfWpjaa8TbIGyAa3gBRO0CN9XtQBMhnnhIlX6jlgGQ9XLlw5RdOeMZ+QJVnO5xL8BCAvlXa2cOVwUHaO9DDrDYHdgFZe+Vvj/BVX23yt2759JLfouOXvscO5npH0qRCp3tKaySMj/ynGv+FBJzwVq0j9OPhonMSowPcAWtlwZx6TQw+sUkhQYsGe2XxktUVkVDKobOZU9zH1BAjDf2SrBx9YxNtUr1+oUWLv/wqBL9s/CWf9p0FKcEiPG0RXYbgLipCqkhCrykEjA2L/InZQipV73xP+7RFHH2EHQqdRZAPgrbTodI+sLgQbY77HESDf7S4Xsv6Ag9/c+Du/nGKVTs7TVjl90tkazPB2w8xXtiDK8aDJxmy4chwo+BCaL5/wWPJOK3RCnEuTb2q2syrwD9X+x/PkL77C4T+5ZI+XHX5hV+Mzei1xfP6G72H1OH7Ibg8W2nKjtbdoQPTGdnUXeCGOtVb9Vsz2lUsx0s6IZ2YljZ2D8po570z1B5HeagoBOWp/JS2QhlWvpxzQ6ZFX/SLXKRufdqvHjW9q8jOqnDB5rx4bXXBbgY6efisZvvNgz4yPfJaGWR+guIWsCeWVpWpSeNBArcSsCxWhwWAGwPVOZyvYsfKELV9c68nFX8Phj/rkPZJ6vvXiA77oQAOFv4wA13bwBAlHGuxSjir1TDiASHdF2MjscLNHgh6wsgLRNHHfyVPHFlq8rZClpLLxg2ckd9390RIuJImnJujuBiz/KtZLiO2N6Q7zM5hLVdoBOoe02TiBsZlSSrglkFInnmjRbUPgb/DFW3M6y+WAhVJ0O+X+yxNQ61Dp2R6SqGWvbK/R+46ZD/wsZNZoBKcJJWXks9O6Etc1V+ZscgHwCQUOe83XYrX3L4ZQcz7rlgtPefNeIV79bjvl5YBOv6fVvsYZLXe5+YSJne4wevdHHSA2l2VVRxOUeyh8g9bclLo2aZhx6wWBHNwFIKOAQt2VNaHyZqtxKG2NcB9ql/RK6fHDSr5IxyMPd775wmK/oOE5rvUFKd/YhEP4f8fMHdf+y87obHLHS9dxi6Sf5HHVBxJNd+tadQ5iiJBbgboRyYL8f97GxFpfoTQpxKvgRtlOQ/yFlruI7sQi3Ok15tI52ZMnrPV7Zr7Vc/IEXyX1h0D3zBXyBVsc9k9Mbad1aQLk+sKinZvbyP4bBgBnZpLVnGnFKL8WjO5BdZDOkbFUlBcGlSGawo8rtXyHx+kpT5xWYIrTvTp9T9+0jd3ekOhbTpbUcV8a/ajXeLSPQitOv9pVDvSxS7OVeS0Cn42WuHJ4t+wThE6rOIOXrUv91QjnoNgtD1sQU2a/V1sou75sUtEHJI76RZv+/dPtxe+61iITplxwRS+Nf1j3LYe/3MCXTc9y0p4Ptrq3DSv/P++8o9FNjW8tAAAAAElFTkSuQmCC'
	Local $bString = Binary(_WinAPI_Base64Decode($Background))
	If $bSaveBinary Then
		Local $hFile = FileOpen($sSavePath & "\hexabump.png", 18)
		FileWrite($hFile, $bString)
		FileClose($hFile)
	EndIf
	Return $bString
EndFunc   ;==>_Background


;Code below was generated by: 'File to Base64 String' Code Generator v1.12 Build 2014-01-04


Func _Background_Image($bSaveBinary = False, $sSavePath = @ScriptDir)
	Local $Background_Image
	$Background_Image &= '/9j/4AAQSkZJRgABAQEASABIAAD/2wBDAAMCAgMCAgMDAwMEAwMEBQgFBQQEBQoHBwYIDAoMDAsKCwsNDhIQDQ4RDgsLEBYQERMUFRUVDA8XGBYUGBIUFRT/2wBDAQMEBAUEBQkFBQkUDQsNFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBT/wgARCACWAZADASIAAhEBAxEB/8QAGQAAAwEBAQAAAAAAAAAAAAAAAQIDAAQI/8QAFAEBAAAAAAAAAAAAAAAAAAAAAP/aAAwDAQACEAMQAAAB9OZHEY4QHDJYkqKg4ZCuCCjIOQDKWBHqmc5dhakApOoSQSV0CUITiJfnsOiMIlOQ7diBVYYo5lzArBihBOZzjPJgq4AyEadFNCoFdXOQsSmJMJ2MlJC1QlymDMgR4XMWmMFBbIQYWIrVAMUKhMGiOZChWvPcjLqkTpNwOJhqGE08VWSHSJOGFgDHE6rYRWUaNEGrydYoDEq0AikjbnoFSA0XFZLU06AFEA5DECQLUAowxAOg66RcxuRXpkIrg1Oe40qSHpz0HdCKEYoAhqFhA7kwJFHVibLhUlc6EshydQQoY0GLYaToDNhHDi7EjnQOpAq08PMgCmhzWKiBybPMoUA8rRMwxc4BdHOdayK6FBkpEk61KqjE3VSivMtfi6R4upDom4zRqMcSAtIHL0EbbDaVTCkBpOA4MaNVOTrnYpMqLlsK8bCsihzzC6MOM5z5mIDoAozgShJUClAyjNkC06mR0GK1IyvjNJzBgMlZkgzEqHCK2E2JQrMfRqR6VcZcgUpIcTsMwiUBQd41MYgdVJEOo942Cl5mpGowbEnBDN0AKoFipilDnZ5mpzXMAQKSLqAhSijbIGbOTUglRWHVyMcgYVItZKO8rEtRBKDFpWgUyko0mMmIdiPGijDYDohZRgEOSzoOEQ6GLCSqgJuoweZJksTCIWUzOmiqVVcRYgLaY07MTyMdE9hm2H2wJ7GOwV2LjYmNhabCnYG2NLY6zsRGw0th4bEevYWGx0z2Kw2KtsTtscd9hxsRpsf/xAAiEAACAgIDAQADAQEAAAAAAAAAAQIRECESMUEgAyIyQjD/2gAIAQEAAQUCsfUe33tCleP6Oixiw8VvjvDi2do9ogeiKGNEVmsULDOzd5vCRsaysWKiihi7RW11Y8WcuRdZcTZRRWFhixR1hjFmXSk+Uej283hUisPricRMsezjRVZckdjPelNtShLdlvCLLsvC+H83eG6E+QoU9xLsVvLFEoSIv45aT1nkWdjiiuI947UvxMjGisby9HHCZeZTojvD7EXhayjwTGLLFieh/sJYZeuNnlnIQzpEi3aY2crPPMSsjLFjEuR0+Vid/FlO4SsYsr4bGxZ4nq6eI4mWXZu+Qh40TVkY0JIktLFEtM99+P2tEuo/sdlUKV5r4TKx6Vt/D008NG0dl7+exi2N5ZxsrVC7lKi/jocrX42rPyEU1L4jGsS0MmhUcqa/YkiqEqxtke8SW+iXUcdKQr/4LLiOKF2UeylRW+IupvMnpSyieaKIk2SP6HGjoWOhs7J9LWHjv6TPceyEf6LGUxu2tClpxLLsqjkREMd3ZVntiKJwIMY5bbZ3h/jONOj1nmJF2ovZ6Lu8LDHE9SsZe32uqpXpRHYnaWny2csex2OOKw8XqpXhHK8MrHeKPyEHuMcSTscc2WSVtt/KioElZbFdqVuhjo47xZ2Ik2d5ZJaHo7GN0JYbouz0WaIbPZWIXV20xraTsbsjZYitVR0cSSEuLorFll4rDynY3h9RI4raw1YhLHtjPI9IYhkUJFbY+qojosRdDKI91izmcrTbL3FizYsPQuiiuJyL+GPWKKKwlmQnWIxOsctsm6I7Et0PDtkYUWS09lViseQ6ZtHeayiWziLv1lnj3jkeZlESKJLUeujsbo/p+OPJRuJydf5rNkv2jG8XeKYlSRLoeyIvliQ9'
	$Background_Image &= 'HoxDKGqJIX8rDEPQtpxIoaER2UaGex02is0VpMcyHQxnR2eXixP6ZYhs6xY2dqisMXVFYqsJftVFaaKsQ5HLd/smVhkntwsSpcqG+RxZ5GV4qmPFl/FjIjGWJ3lZZF7yyisNidSb/VjRFVH/AEixSL5KKHYuorcY0MvfLEsLePF3e/fRoS0PCWKx6OOowoWHLd3IkfzH8li6j/P5dKJpnHHvnURok9x0sRW6P//EABQRAQAAAAAAAAAAAAAAAAAAAHD/2gAIAQMBAT8Bev/EABQRAQAAAAAAAAAAAAAAAAAAAHD/2gAIAQIBAT8Bev/EACAQAAAFBAMBAAAAAAAAAAAAAAERITBAABAgUDFRYUH/2gAIAQEABj8CwN/mkgH8mDpFd5yWKU0tR7Rue7EJ6N9UYUEcSr25QRnHBCUvNHiRUeSA+i11c2yZK4pgtkpYIvAVkxPLm62F5ISX9yXRdziYXTFcnRkKwuK1ycRIBUWRUWl8ulGymCWHvS9g0OBaQbGGIMf/xAAlEAADAQACAgMBAQEBAAMAAAAAAREhMUFRYRBxgZGhwbHR4fD/2gAIAQEAAT8hVr/BCyx2xnk5E0Y3gXkXliKeaE2nKidEU0fhn8THoakdnEBvBtI2/DG7M/RuleYM8qMfw4HIQ0wSrmjlRG2YfbHvKKTf8DKw5OA1w4MeSLVwcl0tMxsYxxwUWi5GIl1+jcdMZwmRfkgiCX8GS9hu+S++ePg22h1ehZ38MPAwW+mJcnYjE/4W/o4e0YVFyaEjaEwvP8OMG22C04FtRYhIKpc6KzTtWsYRHD6M/St+A/P4TY4XJfiIfBwImFGP8JTNqPofgTrkXR2cjcWiD1CJTTa4IIDEkM/6Dd8Cy7GnHMMxN0YhDLnYmNghtQa8DTIKQipS9sXQyDAhoE0yjdIvwcM5FpTj4ZJ86U50Wr8M84Rf34an0NUmlBy78cjROCgnFjXVYoYL2J2iYDDtw5LjyJEsNmDbOyQXQ0mjiSQqd7H1/wC/Amg02/Rw4WcCw6QfgPVBnOJ9/B14bFb9DfKIbGuFFl7GHOpX0NOcE2T8F8DpYdDzVyLHBD4Z3DNz6FMuHlDQcLTW8M1yImoJeCCavI3dFyOEJaoxb0cNCob6C3TghwxD+xPocMw0xL2Q8Xws5GIfA2as5Fo4SXLOzyf5FvKwnQ14E0w7EJT9mqQ+iY4xvfRa0GGkVpeTKrMo3ga/o2hCbvOEW8EzRJ8RniIvQT8R/wDQPAV0beBmnOWKG0v4XicKQb3RynAujV7GX74P7N4TnB3DOyaKHQ2+R0TLYJdMhoJE37HENtJ/QmzCjCzJBRsvkhMpTBm6FSsNATJDEtE8G8G9VEJof4ISl+DNOVi+MfYTLyFH38CWjEjG03DoTJGnbDQtrG6EkmJiKhwcIYhnk0UKSlLRrmwaP/kazmPsZMyig/6lLbHEKkKzgrD5OBeRbRyiGmK5f8EvA2gavBUHiwt5OivxpGKwb0W/E/SAw2+yMp7RLv4NT0GRmCatxiVvo/RIU4jnex1T7+FkvJIcmaLx5I2SuNkpeRnPBTP/AASVePI0wocKhLvBdg3RT8Kh1IVb6LOx3O/wTdsw3gK5/wBExOkHvfByZqEp9hLBcEFSitLE5EXJ+DeCiD5rGDfACJYba8C3xNqN17MoebUcAZzSGj6nk1eDnF/p3N6PPQeBk/QodfYh8OEuaccQlSxRVQqlaoWnYmJPOHDr4G10otJAlF5nXxSfhC0eBLgSxnSH9m7MH4MhnBDKPrfZbaJtFZ6NuTDSOCGaR0WQP6BNJo2Q5UFpdB3SY6gYVUsh9z7Jzb+qN2HNppkVNIaz2M6hLXcHJ5l7FmCeUYFTglZpx6QR3yhYOW4KPslp+SDW74EN1WiaRVMoctUZNCUbVKOU0xI0oyCnR4AlWJNdEGkxjNXoeya47OD/APUpg6Oh0hw2v9MbyMzS5I4bOzcuMhyaJwEi3kSiTFxFnY2Iuz7g6SZK'
	$Background_Image &= 'Jkj/AKJGdU7vh7CB/wDgTnowcW8+hpCTl/4NyQ1ypp4Qpv7RfLH4I7YLVPgobN4G8sw6GDhyglo012bbrO3spvqCE6XffZwFEUJHo4wcdjiCX6z+BCvoTR/rLrSh1Rw+u1+mMniOBuvQwhL8JmmQnEMTzn2NOJdmVYTOT34WKO6XGjD8r/R5ILpV8k0boTlITHPwJ5cjDTBMmmVUyuRuJwES8Q01+BOzkYe5htG4VdPjse8D1krFTnggbjiFnEP9wuDWDh7ZjgVFZNPAvgSvYuDlmG7UNFwsHZ4QmIkYn70h6Onv2V9aTdpw5p3KNPsM80q5PfjHVuEDNuCv2LReRz1uswtY2hP0Klf4NTjkbNcVGJ4+LRLgm5UJVbYq3oSGUzgSmnJmsECL7C8kNEchvTE3ROIVUTbssWcj/pNXRTR32P8Ak6vI0RcssFoq4pjOhTDcE17GrGCdSgm22iht62JnG9jP1tMPAqSVGlM5SG6dHlnsqzDxBJfg56FFT4eiwfv48BCYzCSpiNIXThBY+Az8dD+J7FQ3o2dCKBnjgkSumaxoEiH+kdUsZOZ4xOBnQwXa/gtXsTbW8jp5PdM4EPZE/ohquzkYbyKcTWzCheIhw/gYzbzhyJxiUbL2aGTSBajAinFDJ2eiepCrwThCGFYW4PkTfJaqxnh6D3zRNVHqPa7dE69Uh1FcOq1+TQfQazsSOzkmkJ6xssKq8kFePAr7pStQk1eDVBB3MaI5BuK3BKWLBskaOUZF8KCKK0hOU+zgcafeGleBjZGPDneymuRiyJVEHmCRodChkq5OhiHe+UfiJr2EHuCEIvI6/LshqmW5yWXshj8HC2dP9M+yOybRz+TRPaChpOx8Ff6WGCEsGhphhKHkCdKRElQ0LsGv8NMcOeTDL4EJC0mzaOSX4HE7+Hg3AXo4QvdrkW6ESFNGVR6uBuinQkXR6FtNQlgT2hNbolwM18DHhka7EPQ0XR//2gAMAwEAAgADAAAAEDCHKBMLKCINALCIILCBPLBEMPDOLLPLPODGPGEFFJNKGKCEOEENLEGCDNPCLOPCNKOOFJBKHJJGMHEEBBOCOEAAHHMEEDKLEIJFINCIMAAFFPHEPEPNLFFJEGNIMFBHMAIGCNAAFPEGMLJHIJPNCEBLLHMLAHIFNGKFFGFBEFJLHCHKBAGDFANMBIJPFFAHGOILILLDPFLKGMAFLIFFLKJDHJJBGOECHCAAPAPAPAPPIAHIIHIHPHIIAHAP/8QAFBEBAAAAAAAAAAAAAAAAAAAAcP/aAAgBAwEBPxB6/8QAFBEBAAAAAAAAAAAAAAAAAAAAcP/aAAgBAgEBPxB6/8QAIxABAAMBAQEBAQADAQEBAQAAAQARITFBUWFxgZGhscHw8f/aAAgBAQABPxDvj/UsUqP8D5EXZ/IIov8APJnUDvZi1TcarTp/mNAG7lyiFI/kVQ7+wAON/wBy0Vdb0ji+HCO7+XsRQot8nANLyUum/wAWA2R2vYENYdyNqgb8hzVNq+bGouusVGIFRSqM4zg/cqP+b/J/S/2BVb82V0+XwjWpkQH+T7OxsLMwGuylpZxVlQFlygNAV8fYg0Gx6/PCO1RFPpnfZ1D5VKgNvwggUGzlsUP2/I1QKX84RUHbIRVox2BuirYhoFOkdP8Af2MrSyf0Eegf2CQkAow0xEYl8lhQ1+QQWVlVBBldXAAwDh+Ita6i/i5YalMUovSr9iybRDV0j5Oh19lHodcrYlE49GNZvpkDq1r+SpFb9EiBn1ukEUvFHkpQeHkqlgIm10o8JgN1UR24V619lT677KrQRW1diBi8+wgWAD/MRZunmsAB5B/dH/2U/aTsay+mllNnb+EG3oOzNrlPkIsaumvsAOVi6lkt0+FSxoZ8IHmGcgrFo7LU6v2Dqk2GlVldYAFXDqy/yUOquGLGhRPyAacrY6g+0JKT1+rsIAv+rhqNvrCS4NFSzl3kS50X2UgDfFplciWbnJUBwnDsENK/'
	$Background_Image &= 'jO77FMC8PYfI/wDDNoj9jqcvfIoFdMXxhTYA7y4h/XLl2FfMjZbdMzsqDhXZQTqWMtWv+CXB/wBqCo3/AFlv2TdgSapbhyufK7FXbYeXMFh3f2Kxwrkq/LP/AGEq8+EoKBVtkCIXHJYaC7B7N+x1UoF78WNOhblUHBlKdGrhC1XtrE00DSArr+25Lb/Akq6EJZbf8geqG7GigpewSeWWVXIAQKz2NBVkS1FxV1UZKXVfJyTn+pb2V7cuAofrDPhHJsAvOsUlqQypfQf1GII0tt7KkiVRaq++wqkP1jBYrt9lBvYmlv8AyGCGkpfuuxSvFuICN/cl0T+r/wDZZZL3Cc+zdDcTSFL2VW7rzvY+VD+srcsfsvG5r/1B2JaUXELatiKePf7Mq6PyUWajekPBV++RslbWyw1iIVsT/sXVs0jz9iUpw4f5lRH/AH+QOBqogKhLgoTJrQ5cT0D7yUSC/YIQs/Pk8Mz7BqlVzeyyC1DTFJFP8J4cTz7GFRdR6sDP2IFuxirKewUGn4iglD/2WlFbyHwr6e/yBtC8IUDjrfsKzcTw52aCr2+xywGv8ShFrXHyHD/2K1D+OZBE/wAitlB+o1CWczpCAKK1sXp0ewG400H+IEXo/GMBR/fSc7S3clEVWeQBDf18h6lP2rlqqsWAnYBz9JU348lZPwRpdNqPnRt5yXq6IaPYlQf6koA2PI4Ad7KBlso7hC1OvybNp8ESBLXaght5y4ADjXY75UenYG1EeR0p/wAxMdV59hgW/wABCLy1/wBSywNVUFxxiz9JacpcGocgHujy4AYfoyiX/Bly91VpReRCt4+RlgWP1RClp5AwN/j5HVdK5KEV0Yy7tn4sq0wejYWFFPbiGIfwj2oUnIiHQ5G7F48oh0QDTFygQOr2ZZdApKyixn2EBcCqHsqaDNENovm3H/apSob4MQKNPSCTZY9mwAn4zDmko+n9iOFPj9jsXgx3Ai9Pn2YysdGAsOQCx55+x1aFt1KunKqoWQ45EVonbxgpBx2Nw5+xli2tyXTH4fkL6E7AY1xX+QQZRqMFdA16QlNLnkA+poPn7MonOnyDXQ1tkbX60gCM/GKkFgf7hZ1tYQWygrsZgH9iz4NE8gkX+o1Bb+oHrnqwcwYVBwsX2yId6fOSqFf8jXRX/wBhcbK/IPwSL9mJcVOfI4eqTD/e/wDkQpR8+y6K38lBxpgTi/zyBUR/JTD0vZY0OxroYOHWUaDacr/sBR/rnUKDtuwRf5d0yim/bg3WnxlwA39SrlC98jHHrV/Jf6WV9m2wNXLcoqwBYb/GfiAtZclFX4eS+J57DcShKtoEoHe/IotX/wBlFYCqSPC2FVS2EtQa4v8AJapRUyD+hMJc+CpQfs9GgrPsYIJR5cRe3wlUbqvbmVjNgUpewRyyck/huUL3zXsp+L7Cx/NjA/5C8n+9aQDaT3/2Aw15erhpXXluS6+4lTG0tey9qgpCMDQ7LBTRoy4vj0IDS288gf0lxhL4+Q7yvY0ej2LBgvkZCqCARb/cpuj98S8CUA+qglHB5fSILuwDZr0lMen4bAItSefZabrENW3xXsMl39IxLIuZtwlsqyvkBRV/fsBZOr/Uo1RbdbFsuH2IFlr2AO/4g675nJum69Y7N0FrGV2s/wBx1vTiiN+f8QjVbhUtufGK0bnIDSTQSsMjVNOw1UZBYE/r8gDwFyvYoWxHLXsckFFuMRfVcGHXB1IWCo/XSXiJTwYC5h7AGwr4w4N5RU0238fI8GXBTRZgC8HRFXwfkWCA+ggpFr7YBe7PsN2/QeyzXPFTbVMJgLDxjQNgsEkpfD5P8KxayV35i5jTdBExoWY/ZVgqKd/YAgW+zAKV58gKq04kFSiryWD0NgAKMvaqIFtHKey35NERUd+5AsD8gPJV6q2JZfwr2VoEVO7/AKgQ8/kuu2r2KhpqVC7GWWBXIqbaI8V1brBtTHsAFijh5B2gHG44g5RRLOtX0+TgMi1CUDAoIDr9'
	$Background_Image &= '/YBgNuVUdIo8iECXxYNq4tJE9GjY2GtLgwsVStZNtYjcPmn5KiA9GJ2M8G7nyaHfsy3TTjEXU/iRWhY5UKi2/ssoBePtRdm/2fUC8IsZlci70ryL3SvJ+ARYW6qWXX4QYWX5CjYr1jUVHqJCqHEjAdRaepcqmGU7UZsHRNl0OvX5Kyy335LkSpTFFWP9hkKrkYMDsJji0hrDH57Ku8Wm5ilqlHrspBav5EOHhakSRKoiGKqDA/4lw0J0YyCHh7NWCp1lQVoCelso4p0/JXYKF2+xWLg55cKgdvtxLR0iABAMHpKm18XUUY7a1GlIISpLptEJQfYOkbEbIs+3EQbEu/sY4Luv5ACiUmfUWmkzYlEKrtEYvCP/ACUDVmxlRb9iDo/yGqFhrGUG1pukVkq1bhoaHPiarM/djkoU+IIFsGr+TJqLpUrtjSzpADVEb/8AIkQWl28guWFruJE2G/2BWjYezRgD3yvn9ggFE0k47umvjGGhTMml0fI9hqbMUXTyDJ/qqIIX/DyII4VR+ymP4kNBr1F1Do+/JRvKjsWgBo4EF+PMhpWh1PsKhe8gXYCGrEFWFPCVfdldR/GVBurexKBH0GPcCXERbnyaD1LrJnhEoYMLMKD/AFHCOv2fQVnHVD5LKax9gqL3pA7LyNGlGobZ9HmQYAH4ypcPyoqC+HpKMu/5BAx67cLCvKlYCCxgeM/ISlsU6RUez5Ni9iLDrGBALrZCxRf0h9ADOQeLdKw7o1WuSkjH8jCwH9qXTARQV6d9gtjocuIWO7dxCc2HKNdhOidVKzMaIbUuLEWp9ggAso9g3g6sYwtOx5+RDA0n5KWXY/I96w9PssoqF6EGzRx8jVBf4hFjV1EYFn7BfBTrKVBf3IODH9jVUFR/+xGkC/8AyWPWulTiYHqTpW/sEWQr9LlQkFy/yDX2d/YLb/pD0b+/Z0WA/ZW9NIw1TzGoyUbctssDCfLgp9P+TgJV1LBtXV1+Q7bfwxQk1lBL6qHYuBeAnZqgVyvJRp/uLDx+uxAS6fsoCqFH5Nkkq4kSgurZ1ChhRChDrlxrxW7vx+RAgTq+3BiGhbYhen4ZCx5Zb0yEmlgplrtQ3cOtilr5Kh54s7GGwv8AYLtCmqiCn/EBRlV2XtNfINGMBL/iKFrCypdl0e5LjErx8gAGe6RaQcI5wVBsS8E/7CvWg9uBQKg/7lrWMQwhTy8iKqrQBUEMXiuRhd/5EdpFtOhPxZCzRPn/AO+yt7/VlA5ToHYV9he/k2UUFZ2IDLMfs2BSVSk2ADc2VNS/YWIKUG7yWBgxIIBV3/uc2BHkrsSrLs8ibBSND7VFw104z2WC9X55HQNt8hbHMiwGlsulWWqHIr+hxACy7YTLfEEJ/jZTRfY9riw/2jpXYi5HMKiCvEON2vkEKLl8GuuzjOfsLZ4Ma4UX2NKukRqm9amoSxMjQVTpWX/I671X2NOEawmlhsesC/rKCnHj8iscGO16vHJUEHwPCIaSm/CL8EQhQz/cBrKXYtYn9goo2NV9ioUdK9CCTQPt9ZbYB0mx2Pmm9jiGjnXkVLR+oieDVHkdTRMRlWH2WW30IKbcHTpHcbs79jv8JpV18yHdcvyYXVa1OlU7/Y//AMpZYlR2btbrka4itXiy1KaR/aiVuQcnA9zIQCEo+VLy6V9InkOZcsHHlE9LvyHo2wor2dBZmVT9lhR/i/YA0tcF5W/9wwrFfwf+ykEBWIpA+hA6GPyCvqNZWoZodOfqW0K3txFin8hYCi0gmih17csXBTXkIF0N/wBoNFFwBNiqAt4N0fyVFv0wVIs7N2osfGLUKcIUVtbT/kRXTtS4gRZ6Zeg1dtfkoSFLYOl10YgFi03yYwBDyYUJb+QTUgdH2OHRuQQW/wCPsWYbV6MG2Wu8jvhfyIrwfkLbUm5BECrPs4qz1iarv8hm7f2X9B9RA0Qliho8m3/zHXdQU0O+EuQ2xNhoPKhVqXTH5EXg9mCDvX2NbXYXEHP5BYWD'
	$Background_Image &= 'BB232KqTG7m+iA5UVrbcqNbYP4QkHOj2UHA+I0RulqYfsK23YGrjCnFqf7lJiDSQC8+5FBetvyBcicLXYrQi6uVOt3nsSqiJqG/8RWK+gXNhSKV8bhuza/sJYGtvkUQtX2uwXYvr5A0p25Qg0qKZcJQph8n4jcJf3kybsAWqT5Gyc9hgeGwOjXSUeU3TMo0nstjWquCmqkqAqmpWUUGP8Suyesm1NM8HLjrwkAXVbOS1y7EnQdLZZWV5fkGucgEvGIUrmwAAbfXIUb9aiFTNrPZQnXuToMVpHYB7LQyBYnIDBb2oIR8ENOqBX7O1CvUuB4+RqFmfCWFPYC0Z8jZLqmiVFVLrE2ID4EyELRX+VKsLfDDSLq8d9j10v6T/2Q=='
	Local $bString = Binary(_WinAPI_Base64Decode($Background_Image))
	If $bSaveBinary Then
		Local $hFile = FileOpen($sSavePath & "\Fresh_Snow.jpg", 18)
		FileWrite($hFile, $bString)
		FileClose($hFile)
	EndIf
	Return $bString
EndFunc   ;==>_Background_Image


Func _WinAPI_Base64Decode($sB64String)
	Local $aCrypt = DllCall("Crypt32.dll", "bool", "CryptStringToBinaryA", "str", $sB64String, "dword", 0, "dword", 1, "ptr", 0, "dword*", 0, "ptr", 0, "ptr", 0)
	If @error Or Not $aCrypt[0] Then Return SetError(1, 0, "")
	Local $bBuffer = DllStructCreate("byte[" & $aCrypt[5] & "]")
	$aCrypt = DllCall("Crypt32.dll", "bool", "CryptStringToBinaryA", "str", $sB64String, "dword", 0, "dword", 1, "struct*", $bBuffer, "dword*", $aCrypt[5], "ptr", 0, "ptr", 0)
	If @error Or Not $aCrypt[0] Then Return SetError(2, 0, "")
	Return DllStructGetData($bBuffer, 1)
EndFunc   ;==>_WinAPI_Base64Decode

Alles anzeigen

Wie kann ich es schaffen, dass die GUI bei allen mobilen Geräten oben bis zum Bildschirmrand und vor allem unten nur bis zur Taskleiste andockt und nicht darüber hinaus rutscht.

**bernd670**

Oh den Code kenn ich doch!!

Meinst du so in der Art?

AutoIt

#include <WindowsConstants.au3>
#include <ScreenCapture.au3>


Global $VirtualDskTop = _GetVirtualScreenSize()
ConsoleWrite("ScreenSize: " & $VirtualDskTop[0] & " x " & $VirtualDskTop[1] & @CRLF)
GUICreate("LS",$VirtualDskTop[0], $VirtualDskTop[1], 0, 0)
GUISetState()


Sleep(10000)




Func _GetVirtualScreenSize()
	Local $aVSS[2] = [0, 0]


	$aVSS[0] = _WinAPI_GetSystemMetrics($SM_CXVIRTUALSCREEN)
	$aVSS[1] = _WinAPI_GetSystemMetrics($SM_CYVIRTUALSCREEN)


	If ($aVSS[0] = 0) Or ($aVSS[1] = 0) Then
		$aVSS[0] = 0
		$aVSS[1] = 0
	EndIf


	Return SetError(($aVSS[0] Or $aVSS[1]),0, $aVSS)
EndFunc

Alles anzeigen

bazii

Super, ja genau so. Vielen Dank.

Ein kleines Problem habe ich, zumindest jetzt bei meinem Netbook auf dem ich momentan arbeite. Es werden beim Start der Exe keine Buttons angezeigt. Erst wenn ich auf minimieren klicke und dann wieder auf maximieren, sind die Buttons zu sehen.

**Kanashius**

Probier mal guisetstate(@SW_Maximize), oder sonst einfach @SW_Minimize und dann @SW_Maximize. Eventuell reicht auch ein einfaches _WinAPI_RedrawWindow

bazii

Hallo Kanashius,

vielen Dank für Deinen Vorschlag. Der Umweg über @SW_Minimize und dann @SW_Maximize ist gut. Somit wird die GUI nach dem Start vollständig angezeigt . Für PC und Notebooks ist dies absolut ausreichend. Bei meinem Netbook nicht ganz, aber so kann ich damit arbeiten.

_WinAPI_RedrawWindow habe ich in den Code von bernd670 eingebaut, brachte allerdings keine besseren Ergebnisse als _WinAPI_GetSystemMetrics.
Oder meinstest Du, dass_WinAPI_RedrawWindow wo anders eingebaut werden sollte?

bernd670 :
Dein Code erzeugt ja eine zusätzliche, virtuelle GUI wenn ich mich nicht irre. Dadurch wurden mir beim Test mit der compilierten .exe auf meinen Testsystemen 2 gestartete Icons angezeigt. Kann man dies unterdrücken? Also so, dass nur ein Icon angezeigt wird.

**Kanashius**

Eigentlich, nachdem das Fenster erstellt wurde. Der Befehl sorgt normal dafür, dass das ganze Fenster neu gezeichnet wird. Somit werden alle Buttons,... neu gezeichnet.

bazii

Ah.. da war ich falsch gewickelt. Danke der Erklärung.

Ich habe in der Hilfe nachgeschaut und das gefunden:

Code

#include <WinAPI.au3>
_WinAPI_RedrawWindow ( $hWnd [, $tRect = 0 [, $hRegion = 0 [, $iFlags = 5]]] )

Ich kapiere nicht, wie ich das in meinem Fall anwenden kann.

**Kanashius**

einfach das bei $hwnd eintragen, was dir guicreate zurückgibt
Den rest lässt du leer.

**bernd670**

Zitat von bazii

bernd670 :
Dein Code erzeugt ja eine zusätzliche, virtuelle GUI wenn ich mich nicht irre. Dadurch wurden mir beim Test mit der compilierten .exe auf meinen Testsystemen 2 gestartete Icons angezeigt. Kann man dies unterdrücken? Also so, dass nur ein Icon angezeigt wird.

Hast du evtl. meinen Code 1:1 in deinen übernommen?

Das sollte nur ein Beispiel sein wie man die komplette Bildschirmgröße ermitteln kann, auch wenn man z.B. 2 Monitore angeschlossen hat.

Einbauen in den Code würde ich es so:

AutoIt

;coded by UEZ build 2014-02-08, idea taken from http://codepen.io/Fahrenheit/pen/Kbyxu
;AutoIt v3.3.9.21 or higher needed!


#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Constants.au3>
#include <GDIPlus.au3>


 ;== == == == == == == == == == == == == == == == == == == == == == == == == == == == == == == == == =
;AutoItSetOption("TrayMenuMode", 11)
;===================================================================
Opt("GUIResizeMode", $GUI_DOCKAUTO)
;===================================================================




#Region ### START Koda GUI section ### Form=h:\meine software\toolstarter\toolstarter.kxf
Opt("GUIResizeMode", $GUI_DOCKAUTO)


_GDIPlus_Startup()


Global $VirtualDskTop = _GetVirtualScreenSize()
Global Const $STM_SETIMAGE = 0x0172; $IMAGE_BITMAP = 0
Global $hHBmp_BG, $hB, $iPerc = 0, $iSleep = 30, $s = 0, $aText[2] = ["Lese Verzeichnisse ein", "Bitte warten!"], $t, $m = 0
Global $iW_Splash = 500, $iH_Splash = 250, $iPic_Splash
Show_Splash()


$Form1_1 = GUICreate("LS", 906, 762, 0, 0, BitOR($GUI_SS_DEFAULT_GUI,$WS_SIZEBOX,$WS_MAXIMIZEBOX,$WS_THICKFRAME,$WS_TABSTOP))
GUISetBkColor(0xD7E4F2)


$netzwerk = GUICtrlCreateButton("IP-Config /all", 13, 354, 129, 49)
GUICtrlSetTip(-1, "ipconfig /all")
GUICtrlSetCursor(-1, 0)
$mac = GUICtrlCreateButton("MAC-Adresse ermitteln", 156, 354, 129, 49)
GUICtrlSetTip(-1, "Zeigt die MAC-Adressen Ihrer Netzadapter an")
GUICtrlSetCursor(-1, 0)
GUISetState(@SW_SHOW)
WinMove($Form1_1, "", 0, 0, $VirtualDskTop[0], $VirtualDskTop[1])


;==============================================================================


If @OSArch = "X64" And Not @AutoItX64 Then
	DllCall("kernel32.dll", "int", "Wow64DisableWow64FsRedirection", "int", 1)
EndIf
;==============================================================================
;If @OSArch = "X64" and not @Autoitx64 Then
;	Msgbox(64, "Falsche Architektur !", "Unter einem 64bit Betriebssystem, muss auch eine 64bit-Variante" & @CRLF & "des Programms gestartet werden !")
;	Exit
;EndIf
;==============================================================================




Global $iW = 600, $iH = 150
Global Const $hGUI = GUICreate("Top-PE.DE", $iW, $iH, (890 - $iW) / 2, 100, $WS_POPUP, $WS_EX_MDICHILD, $Form1_1)
Global Const $iPic = GUICtrlCreatePic("", 0, 0, $iW, $iH)
GUICtrlSetState(-1, $GUI_DISABLE)
GUISetState(@SW_HIDE, $hGUI)


Do
	Switch GUIGetMsg()
		Case $netzwerk
			StartAnim()
			_netzwerk()
			Sleep(5000)
			StopAnim()
			Run(@ComSpec & " /c start ipconfig.txt", @WorkingDir, @SW_HIDE)
		Case $mac
			StartAnim()
			_mac()
			Sleep(5000)
			StopAnim()
			Run(@ComSpec & " /c start getmac.txt", @WorkingDir, @SW_HIDE)
		Case $GUI_EVENT_CLOSE
			GUIRegisterMsg($WM_TIMER, "")
			_WinAPI_DeleteObject($hHBmp_BG)
			_GDIPlus_Shutdown()
			GUIDelete()
			Exit
	EndSwitch
Until False
;==============================================================================


Func StartAnim()
	GUISetState(@SW_SHOW, $hGUI)
	GUIRegisterMsg($WM_TIMER, "PlayAnim")
	DllCall("user32.dll", "int", "SetTimer", "hwnd", $hGUI, "int", 0, "int", $iSleep, "int", 0)
EndFunc   ;==>StartAnim


Func StopAnim()
	GUISetState(@SW_HIDE, $hGUI)
	GUIRegisterMsg($WM_TIMER, "")
EndFunc   ;==>StopAnim


Func _netzwerk()
	RunWait(@ComSpec & ' /c ' & 'ipconfig /all > ipconfig.txt' & '"', "", @WorkingDir, @SW_HIDE)
	;Exit
EndFunc   ;==>_netzwerk


Func _mac()
	RunWait(@ComSpec & ' /c ' & 'getmac /V > getmac_.txt' & '"', "", @WorkingDir, @SW_HIDE)
	Sleep(200)
	RunWait(@ComSpec & ' /c ' & 'cmd /U /C TYPE getmac_.txt > getmac.txt' & '"', "", @WorkingDir, @SW_HIDE)
	Sleep(200)
	RunWait(@ComSpec & ' /c ' & 'del getmac_.txt' & '"', "", @WorkingDir, @SW_HIDE)
	Sleep(200)
	Run(@ComSpec & " /c start getmac.txt", @WorkingDir, @SW_HIDE)
	;Exit
EndFunc   ;==>_mac


;===================================================================




Func PlayAnim()
	$hHBmp_BG = _GDIPlus_LineProgressbar($iW, $iH, $aText[$m])
	$hB = GUICtrlSendMsg($iPic, $STM_SETIMAGE, $IMAGE_BITMAP, $hHBmp_BG)
	If $hB Then _WinAPI_DeleteObject($hB)
	_WinAPI_DeleteObject($hHBmp_BG)
	$t += 1
	If Not $t = Mod($t, 250) Then $m = Mod($m + 1, 2)
EndFunc   ;==>PlayAnim




Func _GDIPlus_LineProgressbar($iW, $iH, $sText = "Loading", $sFont = "Arial Black", $iFontSize = 16, $bHBitmap = True)
	Local Const $hFormat = _GDIPlus_StringFormatCreate()
	Local Const $hFamily = _GDIPlus_FontFamilyCreate($sFont)
	Local Const $hFont = _GDIPlus_FontCreate($hFamily, $iFontSize)
	_GDIPlus_StringFormatSetAlign($hFormat, 1)
	_GDIPlus_StringFormatSetLineAlign($hFormat, 1)
	Local $tLayout = _GDIPlus_RectFCreate()
	Local Const $hBitmap = _GDIPlus_BitmapCreateFromScan0($iW, $iH)
	Local Const $hGfx = _GDIPlus_ImageGetGraphicsContext($hBitmap)
	_GDIPlus_GraphicsSetSmoothingMode($hGfx, 4 + (@OSBuild > 5999))
	_GDIPlus_GraphicsSetTextRenderingHint($hGfx, 4)
	_GDIPlus_GraphicsSetPixelOffsetMode($hGfx, $GDIP_PIXELOFFSETMODE_HIGHQUALITY)


	Local $hBitmap_Bg = _GDIPlus_BitmapCreateFromMemory(_Background_Image())
	_GDIPlus_GraphicsDrawImageRect($hGfx, $hBitmap_Bg, 0, 0, $iW, $iH)
	Local $aInfo = _GDIPlus_GraphicsMeasureString($hGfx, $sText, $hFont, $tLayout, $hFormat)
	Local Const $hBrush_Text = _GDIPlus_BrushCreateSolid(0xFFFFFFFF), $hBrush_BgRect = _GDIPlus_BrushCreateSolid(0xA061BDB6), $hBrush_Rect = _GDIPlus_BrushCreateSolid(0x80FF3600)
	Local Static $z
	_GDIPlus_GraphicsFillRect($hGfx, Cos($z) * $aInfo[0].Width / 5 + ($iW - $aInfo[0].Width) / 2 - $aInfo[0].Width / 4, ($iH - $aInfo[0].Height) / 2 - $aInfo[0].Height / 4, $aInfo[0].Width + $aInfo[0].Width / 2, $aInfo[0].Height + $aInfo[0].Height / 2, $hBrush_BgRect)
	_GDIPlus_GraphicsFillRect($hGfx, Cos($z) * $aInfo[0].Width / 1.5 + ($iW - $aInfo[0].Width / 8) / 2, ($iH - $aInfo[0].Height) / 2 - $aInfo[0].Height / 2, $aInfo[0].Width / 8, 2 * $aInfo[0].Height, $hBrush_Rect)


	$tLayout.Width = $iW
	$tLayout.Height = $iH
	_GDIPlus_GraphicsDrawStringEx($hGfx, $sText, $hFont, $tLayout, $hFormat, $hBrush_Text)
	Local Const $hPen_Rect = _GDIPlus_PenCreate(0xF0E0E0E0)
	_GDIPlus_GraphicsDrawRect($hGfx, 0, 0, $iW - 1, $iH - 1, $hPen_Rect)
	_GDIPlus_PenDispose($hPen_Rect)
	$z += 0.09
	_GDIPlus_FontDispose($hFont)
	_GDIPlus_FontFamilyDispose($hFamily)
	_GDIPlus_StringFormatDispose($hFormat)
	_GDIPlus_BrushDispose($hBrush_Text)
	_GDIPlus_BrushDispose($hBrush_BgRect)
	_GDIPlus_BrushDispose($hBrush_Rect)
	_GDIPlus_GraphicsDispose($hGfx)
	_GDIPlus_BitmapDispose($hBitmap_Bg)


	If $bHBitmap Then
		Local $hHBITMAP = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBitmap)
		_GDIPlus_BitmapDispose($hBitmap)
		Return $hHBITMAP
	EndIf
	Return $hBitmap
EndFunc   ;==>_GDIPlus_LineProgressbar




Func Show_Splash()
	Local Const $hGUI_Splash = GUICreate("Steam Punk Loading", $iW_Splash, $iH_Splash, -1, -1, $WS_POPUPWINDOW, $WS_EX_TOPMOST)
	GUISetBkColor(0xD2CEC6)
	$iPic_Splash = GUICtrlCreatePic("", 0, 0, $iW_Splash, $iH_Splash)
	GUICtrlSetState(-1, $GUI_DISABLE)
	GUISetState(@SW_SHOW, $hGUI_Splash)
	GUIRegisterMsg($WM_TIMER, "PlayAnim_Splash")
	DllCall("user32.dll", "int", "SetTimer", "hwnd", $hGUI_Splash, "int", 0, "int", 50, "int", 0)
	Sleep(3000)
	GUIRegisterMsg($WM_TIMER, "")
	_WinAPI_DeleteObject($hHBmp_BG)
	GUIDelete($hGUI_Splash)
EndFunc   ;==>Show_Splash


Func PlayAnim_Splash()
	$hHBmp_BG = _GDIPlus_SteamPunkLoading($iW_Splash, $iH_Splash, "Initialisierung...")
	$hB = GUICtrlSendMsg($iPic_Splash, $STM_SETIMAGE, $IMAGE_BITMAP, $hHBmp_BG)
	If $hB Then _WinAPI_DeleteObject($hB)
	_WinAPI_DeleteObject($hHBmp_BG)
EndFunc   ;==>PlayAnim_Splash


Func _GDIPlus_SteamPunkLoading($iW, $iH, $sString = "Please wait...", $bHBitmap = True)
	Local Const $hPenArc = _GDIPlus_PenCreate(0xA08ABDC3, 25)
	_GDIPlus_PenSetLineJoin($hPenArc, 2)
	Local $hBitmap = _GDIPlus_BitmapCreateFromScan0($iW, $iH)
	Local Const $hCtxt = _GDIPlus_ImageGetGraphicsContext($hBitmap)
	_GDIPlus_GraphicsSetPixelOffsetMode($hCtxt, $GDIP_PIXELOFFSETMODE_HIGHQUALITY)
	_GDIPlus_GraphicsSetSmoothingMode($hCtxt, 2)
	Local Const $hBmp_BG = _GDIPlus_BitmapCreateFromMemory(_Background())
	Local $hBrushTexture = _GDIPlus_TextureCreate($hBmp_BG)
	_GDIPlus_BitmapDispose($hBmp_BG)
	_GDIPlus_GraphicsFillRect($hCtxt, 0, 0, $iW, $iH, $hBrushTexture)
	Local $fCosX, $fSinY, $i
	Local Const $fDeg = ACos(-1) / 180, $iW2 = $iW / 2, $iH2 = $iH / 2, $iDiameter = 200, $iRadius = $iDiameter / 2, $iSize = 25, $iSize2 = $iSize / 2, $fFontSize = 20
	Local Static $iAngle = 0, $iX = 0, $iDir = 1
	_GDIPlus_PenSetColor($hPenArc, 0x60F0F0F0)
	_GDIPlus_GraphicsDrawArc($hCtxt, $iW2 - $iRadius, $iH2 - $iRadius, $iDiameter, $iDiameter, 0, 360, $hPenArc)
	_GDIPlus_PenSetColor($hPenArc, 0xA08ABDC3)
	For $i = 0 To 7
		If Not Mod($i, 2) Then
			_GDIPlus_GraphicsDrawArc($hCtxt, $iW2 - ($iRadius - $iSize), $iH2 - ($iRadius - $iSize), $iDiameter - 2 * $iSize, $iDiameter - 2 * $iSize, $iAngle + $i * 45, 45, $hPenArc)
		EndIf
	Next
	_GDIPlus_PenSetColor($hPenArc, 0x20F0F0F0)
	_GDIPlus_GraphicsDrawArc($hCtxt, $iW2 - ($iRadius - $iSize), $iH2 - ($iRadius - $iSize), $iDiameter - 2 * $iSize, $iDiameter - 2 * $iSize, 0, 360, $hPenArc)


	_GDIPlus_PenSetColor($hPenArc, 0x508ABDC3)
	For $i = 0 To 5
		If Not Mod($i, 2) Then
			_GDIPlus_GraphicsDrawArc($hCtxt, $iW2 - ($iRadius - 2 * $iSize), $iH2 - ($iRadius - 2 * $iSize), $iDiameter - 4 * $iSize, $iDiameter - 4 * $iSize, $iAngle + $i * 60, 60, $hPenArc)
		EndIf
	Next
	_GDIPlus_PenSetColor($hPenArc, 0x30F0F0F0)
	_GDIPlus_GraphicsDrawArc($hCtxt, $iW2 - ($iRadius - 2 * $iSize), $iH2 - ($iRadius - 2 * $iSize), $iDiameter - 4 * $iSize, $iDiameter - 4 * $iSize, 0, 360, $hPenArc)


	_GDIPlus_PenSetColor($hPenArc, 0x808ABDC3)
	For $i = 0 To 3
		If Not Mod($i, 2) Then
			_GDIPlus_GraphicsDrawArc($hCtxt, $iW2 - ($iRadius - 3 * $iSize), $iH2 - ($iRadius - 3 * $iSize), $iDiameter - 6 * $iSize, $iDiameter - 6 * $iSize, $iAngle + $i * 90, 90, $hPenArc)
		EndIf
	Next
	_GDIPlus_PenSetColor($hPenArc, 0x20F0F0F0)
	_GDIPlus_GraphicsDrawArc($hCtxt, $iW2 - ($iRadius - 3 * $iSize), $iH2 - ($iRadius - 3 * $iSize), $iDiameter - 6 * $iSize, $iDiameter - 6 * $iSize, 0, 360, $hPenArc)


	Local $hBrushCircle = _GDIPlus_BrushCreateSolid(0x60F0F0F0)
	_GDIPlus_GraphicsFillEllipse($hCtxt, $iW2 - $iSize2, $iH2 - $iSize2, $iSize, $iSize, $hBrushCircle)


	$iAngle += 4
	Local Const $hFormat = _GDIPlus_StringFormatCreate()
	Local Const $hFamily = _GDIPlus_FontFamilyCreate("Impact")
	Local Const $hFont = _GDIPlus_FontCreate($hFamily, $fFontSize)
	Local Const $tLayout = _GDIPlus_RectFCreate(0, 0, 0, 0)
	Local Const $aInfo = _GDIPlus_GraphicsMeasureString($hCtxt, $sString, $hFont, $tLayout, $hFormat)
	Local Const $hBrushTxt = _GDIPlus_LineBrushCreate($iX, 0, DllStructGetData($aInfo[0], "Width"), 0, 0x90101010, 0xFFA0A0A0, 2)
	_GDIPlus_LineBrushSetLinearBlend($hBrushTxt, $iX, 1)
	DllStructSetData($tLayout, "X", ($iW - DllStructGetData($aInfo[0], "Width")) / 2)
	DllStructSetData($tLayout, "Y", ($iH - DllStructGetData($aInfo[0], "Height")) / 2)
	_GDIPlus_LineBrushSetGammaCorrection($hBrushTxt)
	_GDIPlus_GraphicsDrawStringEx($hCtxt, $sString, $hFont, $tLayout, $hFormat, $hBrushTxt)
	$iX += 0.02 * $iDir
	If $iX > 0.98 Or $iX < 0.02 Then $iDir *= -1


	_GDIPlus_FontDispose($hFont)
	_GDIPlus_FontFamilyDispose($hFamily)
	_GDIPlus_StringFormatDispose($hFormat)
	_GDIPlus_BrushDispose($hBrushTxt)
	_GDIPlus_BrushDispose($hBrushTexture)
	_GDIPlus_BrushDispose($hBrushCircle)
	_GDIPlus_GraphicsDispose($hCtxt)
	_GDIPlus_PenDispose($hPenArc)
	If $bHBitmap Then
		Local $hHBITMAP = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBitmap)
		_GDIPlus_BitmapDispose($hBitmap)
		Return $hHBITMAP
	EndIf
	Return $hBitmap
EndFunc   ;==>_GDIPlus_SteamPunkLoading


;Code below was generated by: 'File to Base64 String' Code Generator v1.12 Build 2013-03-27


Func _Background($bSaveBinary = False, $sSavePath = @ScriptDir)
	Local $Background
	$Background &= 'iVBORw0KGgoAAAANSUhEUgAAAEAAAABACAMAAACdt4HsAAAAnFBMVEXX08vd2dHZ1c3b18/a1s7c2NDY1MzW0sre2tLTz8fg3NTU0Mjf29PV0cnRzcXh3dXPy8Pi3tbSzsbLx7/MyMDNycHOysLJxb3Kxr7QzMTIxLzHw7vj39fGwrrFwbnEwLjCvrbDv7fBvbXAvLS9ubG+urK7t6/k4Ni/u7O0sKi1sam3s6u8uLDl4dm4tKygnJSwrKTm4tqfm5OLh3+vBRlAAAAJ5ElEQVR4Xg3ORbIsyZIAUWMzZw+OyMz7qOBj8/731jVSkTNSyPRvstiR0BJpCcklS25k2FRHqyr20c/pShMF6cMxK/Nli99Q1BjqH/zSTXkUKuXlJ/FI+mvAQosvLb7BYyQN0thsp9RWvfRYiq9EcNCUBI8wr6PyPkZ+iPDCJX6DHN8F6QGCqe6TQErOoyhbx0ocBj95xJPFIR6b3ILLVIo0XFadSWWjpybZ7ClfctOqpzp8c6UuDjebbE/PEE9dQft7DEo5caHyaWT6c+XaLQOjsSvRNwGlMayrtHUZ7kuWUtWmZl0J0EbhXofd9aVTTz78guReD0xk+pVf9JscvPIqj79sx0ZJ++hy1I79c4GgpIaU3rnQrjx+htr3teSfqlDyghMtH3nYoZgLFwaL/F95sVVRj8oCVXmO7/LwTAXvPvVO5yi45tV2TYutBTsWJPz+7MtxQ+0iXvIGX/kJxRM4cSxxVuL2IexBNIVrY9bDApul+OGRyRCcshKIvmumI4RPq/4gyKMA+nnqzg8/vvlKlzpTPCZopJEUW1oAL3nCedrUnUltYSQ4lhWmjTiJ2D9Eu6qVarJTBFO21ao+LvEI57d+UAekHQPaUJ680IltATttgtFjTebSc6cr7wG0Dqlk5YOyxxUPTrjJ9aZXW/mhfywFnS46WwKDmc37YNP6sRePSiPiEeKDAqcnMh11p6DdMHfOIy2GalyNJR4E3W02WlL9HR/cx0/iOOujP2qxLjs+0viIua50YtMdMHsGv5WksORmBJzROjJ/U+CCEY80Wiv5rkqzLmLgtQXEZKLGRV6AWQJpYuRGGQGS77m4ZI4XG6959UJv8PzmlTCSrtXEp/APbdLSLkmmuXoEPPnhB8AAhV+Y2plEn2bca7ULLNZBuFZZPGt7RKBX5nZYEECV/OHfiRtV0DlWcJ321se7vwrKxjwaPaEmulJwkpW/WKXXp77ERoozY7zrqUkchJ2xXoi0GeOJCC9BTDToTizGKmf28qokZ13iKFIFs/L4ZKmNSoZI9dHdGhyfXVb1eqnH4095ng3fOVXymxNz6VzGVnc/8tQLPZ+U+IAMhEIRyP92XX5jLUQfLiycIujUJO7Ge/HYNGUmo3tEPl3VcYh8RMAa/vmp8hqGvRqvuIfpxSes5JFyknc59LZUWvpZn+OmrXokSLguu2DukCDxQBPFUxAuTuiDSCqFyUcMdUxU25cF3eb6MgsB4acGHpDrbiAkvNxLanMc+tgJRxjeflHTzi4iIG+ZzMil08wF21jjpdNL/uEvegFWskRDMlOsNbAsC2NFehQiiTIPtJN4rER6M/VHl3gN4v8Wxbu2FXKjA7weOKmXFZshvburROMjp96HG+TJb6PFUAPE2PEgi7MVu/gGqbtke8SqA4V/BnjwODWlnR3XHEIUJVmWVSvvjHISiZMEE9JeQKYmJJw2Y9ckb/uWZj7c9BDmriU3vfMfeC5/2qqvmmgrW3qx5xgHXLaBGsoLlVPJILU4EEBxq8DolqttLPymXPcC0Jnz3jo0y59TRwV1hPwMrWtLdIFblycm3OWgXXZd8xwrrHCME2Zc5wsSdCx0wF5Xttprgx0i72MpSaT0Irlg5I7MfanjsNDCVMGz7NDS7yV0GkYShheSfoXJ4TDOfusXn/aiyTeTvarXhTr16IMq07saOLpse1pglCVF4Se6b5nqASt0o+Q1iyD7+mnpZJRnfASGp99R'
	$Background &= 'LOFCvoQczPJitnNhK6LyTXI9KjVA1dtXWqnrFOSdR05mZE3yI2Ukuuj9N/2PwA0mbXTJCbJMAW64+752oCjN8S38V6F+KX0KB2/UvGerk6TC+J86gww9lqeynRnz76ZymsQWkPdR+B0F/8xeLjgh6ayUf9JpbxbfqDDUwpZ/1OT26fRIyi0f8H3Q4LzBFGX6BDoxVM78d+cAxHYzi2B2qMhJgo+q0llrIvmU/BlJiNwrAyX0IH6Wm00eKfWpjaa8TbIGyAa3gBRO0CN9XtQBMhnnhIlX6jlgGQ9XLlw5RdOeMZ+QJVnO5xL8BCAvlXa2cOVwUHaO9DDrDYHdgFZe+Vvj/BVX23yt2759JLfouOXvscO5npH0qRCp3tKaySMj/ynGv+FBJzwVq0j9OPhonMSowPcAWtlwZx6TQw+sUkhQYsGe2XxktUVkVDKobOZU9zH1BAjDf2SrBx9YxNtUr1+oUWLv/wqBL9s/CWf9p0FKcEiPG0RXYbgLipCqkhCrykEjA2L/InZQipV73xP+7RFHH2EHQqdRZAPgrbTodI+sLgQbY77HESDf7S4Xsv6Ag9/c+Du/nGKVTs7TVjl90tkazPB2w8xXtiDK8aDJxmy4chwo+BCaL5/wWPJOK3RCnEuTb2q2syrwD9X+x/PkL77C4T+5ZI+XHX5hV+Mzei1xfP6G72H1OH7Ibg8W2nKjtbdoQPTGdnUXeCGOtVb9Vsz2lUsx0s6IZ2YljZ2D8po570z1B5HeagoBOWp/JS2QhlWvpxzQ6ZFX/SLXKRufdqvHjW9q8jOqnDB5rx4bXXBbgY6efisZvvNgz4yPfJaGWR+guIWsCeWVpWpSeNBArcSsCxWhwWAGwPVOZyvYsfKELV9c68nFX8Phj/rkPZJ6vvXiA77oQAOFv4wA13bwBAlHGuxSjir1TDiASHdF2MjscLNHgh6wsgLRNHHfyVPHFlq8rZClpLLxg2ckd9390RIuJImnJujuBiz/KtZLiO2N6Q7zM5hLVdoBOoe02TiBsZlSSrglkFInnmjRbUPgb/DFW3M6y+WAhVJ0O+X+yxNQ61Dp2R6SqGWvbK/R+46ZD/wsZNZoBKcJJWXks9O6Etc1V+ZscgHwCQUOe83XYrX3L4ZQcz7rlgtPefNeIV79bjvl5YBOv6fVvsYZLXe5+YSJne4wevdHHSA2l2VVRxOUeyh8g9bclLo2aZhx6wWBHNwFIKOAQt2VNaHyZqtxKG2NcB9ql/RK6fHDSr5IxyMPd775wmK/oOE5rvUFKd/YhEP4f8fMHdf+y87obHLHS9dxi6Sf5HHVBxJNd+tadQ5iiJBbgboRyYL8f97GxFpfoTQpxKvgRtlOQ/yFlruI7sQi3Ok15tI52ZMnrPV7Zr7Vc/IEXyX1h0D3zBXyBVsc9k9Mbad1aQLk+sKinZvbyP4bBgBnZpLVnGnFKL8WjO5BdZDOkbFUlBcGlSGawo8rtXyHx+kpT5xWYIrTvTp9T9+0jd3ekOhbTpbUcV8a/ajXeLSPQitOv9pVDvSxS7OVeS0Cn42WuHJ4t+wThE6rOIOXrUv91QjnoNgtD1sQU2a/V1sou75sUtEHJI76RZv+/dPtxe+61iITplxwRS+Nf1j3LYe/3MCXTc9y0p4Ptrq3DSv/P++8o9FNjW8tAAAAAElFTkSuQmCC'
	Local $bString = Binary(_WinAPI_Base64Decode($Background))
	If $bSaveBinary Then
		Local $hFile = FileOpen($sSavePath & "\hexabump.png", 18)
		FileWrite($hFile, $bString)
		FileClose($hFile)
	EndIf
	Return $bString
EndFunc   ;==>_Background


;Code below was generated by: 'File to Base64 String' Code Generator v1.12 Build 2014-01-04


Func _Background_Image($bSaveBinary = False, $sSavePath = @ScriptDir)
	Local $Background_Image
	$Background_Image &= '/9j/4AAQSkZJRgABAQEASABIAAD/2wBDAAMCAgMCAgMDAwMEAwMEBQgFBQQEBQoHBwYIDAoMDAsKCwsNDhIQDQ4RDgsLEBYQERMUFRUVDA8XGBYUGBIUFRT/2wBDAQMEBAUEBQkFBQkUDQsNFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBT/wgARCACWAZADASIAAhEBAxEB/8QAGQAAAwEBAQAAAAAAAAAAAAAAAQIDAAQI/8QAFAEBAAAAAAAAAAAAAAAAAAAAAP/aAAwDAQACEAMQAAAB9OZHEY4QHDJYkqKg4ZCuCCjIOQDKWBHqmc5dhakApOoSQSV0CUITiJfnsOiMIlOQ7diBVYYo5lzArBihBOZzjPJgq4AyEadFNCoFdXOQsSmJMJ2MlJC1QlymDMgR4XMWmMFBbIQYWIrVAMUKhMGiOZChWvPcjLqkTpNwOJhqGE08VWSHSJOGFgDHE6rYRWUaNEGrydYoDEq0AikjbnoFSA0XFZLU06AFEA5DECQLUAowxAOg66RcxuRXpkIrg1Oe40qSHpz0HdCKEYoAhqFhA7kwJFHVibLhUlc6EshydQQoY0GLYaToDNhHDi7EjnQOpAq08PMgCmhzWKiBybPMoUA8rRMwxc4BdHOdayK6FBkpEk61KqjE3VSivMtfi6R4upDom4zRqMcSAtIHL0EbbDaVTCkBpOA4MaNVOTrnYpMqLlsK8bCsihzzC6MOM5z5mIDoAozgShJUClAyjNkC06mR0GK1IyvjNJzBgMlZkgzEqHCK2E2JQrMfRqR6VcZcgUpIcTsMwiUBQd41MYgdVJEOo942Cl5mpGowbEnBDN0AKoFipilDnZ5mpzXMAQKSLqAhSijbIGbOTUglRWHVyMcgYVItZKO8rEtRBKDFpWgUyko0mMmIdiPGijDYDohZRgEOSzoOEQ6GLCSqgJuoweZJksTCIWUzOmiqVVcRYgLaY07MTyMdE9hm2H2wJ7GOwV2LjYmNhabCnYG2NLY6zsRGw0th4bEevYWGx0z2Kw2KtsTtscd9hxsRpsf/xAAiEAACAgIDAQADAQEAAAAAAAAAAQIRECESMUEgAyIyQjD/2gAIAQEAAQUCsfUe33tCleP6Oixiw8VvjvDi2do9ogeiKGNEVmsULDOzd5vCRsaysWKiihi7RW11Y8WcuRdZcTZRRWFhixR1hjFmXSk+Uej283hUisPricRMsezjRVZckdjPelNtShLdlvCLLsvC+H83eG6E+QoU9xLsVvLFEoSIv45aT1nkWdjiiuI947UvxMjGisby9HHCZeZTojvD7EXhayjwTGLLFieh/sJYZeuNnlnIQzpEi3aY2crPPMSsjLFjEuR0+Vid/FlO4SsYsr4bGxZ4nq6eI4mWXZu+Qh40TVkY0JIktLFEtM99+P2tEuo/sdlUKV5r4TKx6Vt/D008NG0dl7+exi2N5ZxsrVC7lKi/jocrX42rPyEU1L4jGsS0MmhUcqa/YkiqEqxtke8SW+iXUcdKQr/4LLiOKF2UeylRW+IupvMnpSyieaKIk2SP6HGjoWOhs7J9LWHjv6TPceyEf6LGUxu2tClpxLLsqjkREMd3ZVntiKJwIMY5bbZ3h/jONOj1nmJF2ovZ6Lu8LDHE9SsZe32uqpXpRHYnaWny2csex2OOKw8XqpXhHK8MrHeKPyEHuMcSTscc2WSVtt/KioElZbFdqVuhjo47xZ2Ik2d5ZJaHo7GN0JYbouz0WaIbPZWIXV20xraTsbsjZYitVR0cSSEuLorFll4rDynY3h9RI4raw1YhLHtjPI9IYhkUJFbY+qojosRdDKI91izmcrTbL3FizYsPQuiiuJyL+GPWKKKwlmQnWIxOsctsm6I7Et0PDtkYUWS09lViseQ6ZtHeayiWziLv1lnj3jkeZlESKJLUeujsbo/p+OPJRuJydf5rNkv2jG8XeKYlSRLoeyIvliQ9'
	$Background_Image &= 'HoxDKGqJIX8rDEPQtpxIoaER2UaGex02is0VpMcyHQxnR2eXixP6ZYhs6xY2dqisMXVFYqsJftVFaaKsQ5HLd/smVhkntwsSpcqG+RxZ5GV4qmPFl/FjIjGWJ3lZZF7yyisNidSb/VjRFVH/AEixSL5KKHYuorcY0MvfLEsLePF3e/fRoS0PCWKx6OOowoWHLd3IkfzH8li6j/P5dKJpnHHvnURok9x0sRW6P//EABQRAQAAAAAAAAAAAAAAAAAAAHD/2gAIAQMBAT8Bev/EABQRAQAAAAAAAAAAAAAAAAAAAHD/2gAIAQIBAT8Bev/EACAQAAAFBAMBAAAAAAAAAAAAAAERITBAABAgUDFRYUH/2gAIAQEABj8CwN/mkgH8mDpFd5yWKU0tR7Rue7EJ6N9UYUEcSr25QRnHBCUvNHiRUeSA+i11c2yZK4pgtkpYIvAVkxPLm62F5ISX9yXRdziYXTFcnRkKwuK1ycRIBUWRUWl8ulGymCWHvS9g0OBaQbGGIMf/xAAlEAADAQACAgMBAQEBAAMAAAAAAREhMUFRYRBxgZGhwbHR4fD/2gAIAQEAAT8hVr/BCyx2xnk5E0Y3gXkXliKeaE2nKidEU0fhn8THoakdnEBvBtI2/DG7M/RuleYM8qMfw4HIQ0wSrmjlRG2YfbHvKKTf8DKw5OA1w4MeSLVwcl0tMxsYxxwUWi5GIl1+jcdMZwmRfkgiCX8GS9hu+S++ePg22h1ehZ38MPAwW+mJcnYjE/4W/o4e0YVFyaEjaEwvP8OMG22C04FtRYhIKpc6KzTtWsYRHD6M/St+A/P4TY4XJfiIfBwImFGP8JTNqPofgTrkXR2cjcWiD1CJTTa4IIDEkM/6Dd8Cy7GnHMMxN0YhDLnYmNghtQa8DTIKQipS9sXQyDAhoE0yjdIvwcM5FpTj4ZJ86U50Wr8M84Rf34an0NUmlBy78cjROCgnFjXVYoYL2J2iYDDtw5LjyJEsNmDbOyQXQ0mjiSQqd7H1/wC/Amg02/Rw4WcCw6QfgPVBnOJ9/B14bFb9DfKIbGuFFl7GHOpX0NOcE2T8F8DpYdDzVyLHBD4Z3DNz6FMuHlDQcLTW8M1yImoJeCCavI3dFyOEJaoxb0cNCob6C3TghwxD+xPocMw0xL2Q8Xws5GIfA2as5Fo4SXLOzyf5FvKwnQ14E0w7EJT9mqQ+iY4xvfRa0GGkVpeTKrMo3ga/o2hCbvOEW8EzRJ8RniIvQT8R/wDQPAV0beBmnOWKG0v4XicKQb3RynAujV7GX74P7N4TnB3DOyaKHQ2+R0TLYJdMhoJE37HENtJ/QmzCjCzJBRsvkhMpTBm6FSsNATJDEtE8G8G9VEJof4ISl+DNOVi+MfYTLyFH38CWjEjG03DoTJGnbDQtrG6EkmJiKhwcIYhnk0UKSlLRrmwaP/kazmPsZMyig/6lLbHEKkKzgrD5OBeRbRyiGmK5f8EvA2gavBUHiwt5OivxpGKwb0W/E/SAw2+yMp7RLv4NT0GRmCatxiVvo/RIU4jnex1T7+FkvJIcmaLx5I2SuNkpeRnPBTP/AASVePI0wocKhLvBdg3RT8Kh1IVb6LOx3O/wTdsw3gK5/wBExOkHvfByZqEp9hLBcEFSitLE5EXJ+DeCiD5rGDfACJYba8C3xNqN17MoebUcAZzSGj6nk1eDnF/p3N6PPQeBk/QodfYh8OEuaccQlSxRVQqlaoWnYmJPOHDr4G10otJAlF5nXxSfhC0eBLgSxnSH9m7MH4MhnBDKPrfZbaJtFZ6NuTDSOCGaR0WQP6BNJo2Q5UFpdB3SY6gYVUsh9z7Jzb+qN2HNppkVNIaz2M6hLXcHJ5l7FmCeUYFTglZpx6QR3yhYOW4KPslp+SDW74EN1WiaRVMoctUZNCUbVKOU0xI0oyCnR4AlWJNdEGkxjNXoeya47OD/APUpg6Oh0hw2v9MbyMzS5I4bOzcuMhyaJwEi3kSiTFxFnY2Iuz7g6SZK'
	$Background_Image &= 'Jkj/AKJGdU7vh7CB/wDgTnowcW8+hpCTl/4NyQ1ypp4Qpv7RfLH4I7YLVPgobN4G8sw6GDhyglo012bbrO3spvqCE6XffZwFEUJHo4wcdjiCX6z+BCvoTR/rLrSh1Rw+u1+mMniOBuvQwhL8JmmQnEMTzn2NOJdmVYTOT34WKO6XGjD8r/R5ILpV8k0boTlITHPwJ5cjDTBMmmVUyuRuJwES8Q01+BOzkYe5htG4VdPjse8D1krFTnggbjiFnEP9wuDWDh7ZjgVFZNPAvgSvYuDlmG7UNFwsHZ4QmIkYn70h6Onv2V9aTdpw5p3KNPsM80q5PfjHVuEDNuCv2LReRz1uswtY2hP0Klf4NTjkbNcVGJ4+LRLgm5UJVbYq3oSGUzgSmnJmsECL7C8kNEchvTE3ROIVUTbssWcj/pNXRTR32P8Ak6vI0RcssFoq4pjOhTDcE17GrGCdSgm22iht62JnG9jP1tMPAqSVGlM5SG6dHlnsqzDxBJfg56FFT4eiwfv48BCYzCSpiNIXThBY+Az8dD+J7FQ3o2dCKBnjgkSumaxoEiH+kdUsZOZ4xOBnQwXa/gtXsTbW8jp5PdM4EPZE/ohquzkYbyKcTWzCheIhw/gYzbzhyJxiUbL2aGTSBajAinFDJ2eiepCrwThCGFYW4PkTfJaqxnh6D3zRNVHqPa7dE69Uh1FcOq1+TQfQazsSOzkmkJ6xssKq8kFePAr7pStQk1eDVBB3MaI5BuK3BKWLBskaOUZF8KCKK0hOU+zgcafeGleBjZGPDneymuRiyJVEHmCRodChkq5OhiHe+UfiJr2EHuCEIvI6/LshqmW5yWXshj8HC2dP9M+yOybRz+TRPaChpOx8Ff6WGCEsGhphhKHkCdKRElQ0LsGv8NMcOeTDL4EJC0mzaOSX4HE7+Hg3AXo4QvdrkW6ESFNGVR6uBuinQkXR6FtNQlgT2hNbolwM18DHhka7EPQ0XR//2gAMAwEAAgADAAAAEDCHKBMLKCINALCIILCBPLBEMPDOLLPLPODGPGEFFJNKGKCEOEENLEGCDNPCLOPCNKOOFJBKHJJGMHEEBBOCOEAAHHMEEDKLEIJFINCIMAAFFPHEPEPNLFFJEGNIMFBHMAIGCNAAFPEGMLJHIJPNCEBLLHMLAHIFNGKFFGFBEFJLHCHKBAGDFANMBIJPFFAHGOILILLDPFLKGMAFLIFFLKJDHJJBGOECHCAAPAPAPAPPIAHIIHIHPHIIAHAP/8QAFBEBAAAAAAAAAAAAAAAAAAAAcP/aAAgBAwEBPxB6/8QAFBEBAAAAAAAAAAAAAAAAAAAAcP/aAAgBAgEBPxB6/8QAIxABAAMBAQEBAQADAQEBAQAAAQARITFBUWFxgZGhscHw8f/aAAgBAQABPxDvj/UsUqP8D5EXZ/IIov8APJnUDvZi1TcarTp/mNAG7lyiFI/kVQ7+wAON/wBy0Vdb0ji+HCO7+XsRQot8nANLyUum/wAWA2R2vYENYdyNqgb8hzVNq+bGouusVGIFRSqM4zg/cqP+b/J/S/2BVb82V0+XwjWpkQH+T7OxsLMwGuylpZxVlQFlygNAV8fYg0Gx6/PCO1RFPpnfZ1D5VKgNvwggUGzlsUP2/I1QKX84RUHbIRVox2BuirYhoFOkdP8Af2MrSyf0Eegf2CQkAow0xEYl8lhQ1+QQWVlVBBldXAAwDh+Ita6i/i5YalMUovSr9iybRDV0j5Oh19lHodcrYlE49GNZvpkDq1r+SpFb9EiBn1ukEUvFHkpQeHkqlgIm10o8JgN1UR24V619lT677KrQRW1diBi8+wgWAD/MRZunmsAB5B/dH/2U/aTsay+mllNnb+EG3oOzNrlPkIsaumvsAOVi6lkt0+FSxoZ8IHmGcgrFo7LU6v2Dqk2GlVldYAFXDqy/yUOquGLGhRPyAacrY6g+0JKT1+rsIAv+rhqNvrCS4NFSzl3kS50X2UgDfFplciWbnJUBwnDsENK/'
	$Background_Image &= 'jO77FMC8PYfI/wDDNoj9jqcvfIoFdMXxhTYA7y4h/XLl2FfMjZbdMzsqDhXZQTqWMtWv+CXB/wBqCo3/AFlv2TdgSapbhyufK7FXbYeXMFh3f2Kxwrkq/LP/AGEq8+EoKBVtkCIXHJYaC7B7N+x1UoF78WNOhblUHBlKdGrhC1XtrE00DSArr+25Lb/Akq6EJZbf8geqG7GigpewSeWWVXIAQKz2NBVkS1FxV1UZKXVfJyTn+pb2V7cuAofrDPhHJsAvOsUlqQypfQf1GII0tt7KkiVRaq++wqkP1jBYrt9lBvYmlv8AyGCGkpfuuxSvFuICN/cl0T+r/wDZZZL3Cc+zdDcTSFL2VW7rzvY+VD+srcsfsvG5r/1B2JaUXELatiKePf7Mq6PyUWajekPBV++RslbWyw1iIVsT/sXVs0jz9iUpw4f5lRH/AH+QOBqogKhLgoTJrQ5cT0D7yUSC/YIQs/Pk8Mz7BqlVzeyyC1DTFJFP8J4cTz7GFRdR6sDP2IFuxirKewUGn4iglD/2WlFbyHwr6e/yBtC8IUDjrfsKzcTw52aCr2+xywGv8ShFrXHyHD/2K1D+OZBE/wAitlB+o1CWczpCAKK1sXp0ewG400H+IEXo/GMBR/fSc7S3clEVWeQBDf18h6lP2rlqqsWAnYBz9JU348lZPwRpdNqPnRt5yXq6IaPYlQf6koA2PI4Ad7KBlso7hC1OvybNp8ESBLXaght5y4ADjXY75UenYG1EeR0p/wAxMdV59hgW/wABCLy1/wBSywNVUFxxiz9JacpcGocgHujy4AYfoyiX/Bly91VpReRCt4+RlgWP1RClp5AwN/j5HVdK5KEV0Yy7tn4sq0wejYWFFPbiGIfwj2oUnIiHQ5G7F48oh0QDTFygQOr2ZZdApKyixn2EBcCqHsqaDNENovm3H/apSob4MQKNPSCTZY9mwAn4zDmko+n9iOFPj9jsXgx3Ai9Pn2YysdGAsOQCx55+x1aFt1KunKqoWQ45EVonbxgpBx2Nw5+xli2tyXTH4fkL6E7AY1xX+QQZRqMFdA16QlNLnkA+poPn7MonOnyDXQ1tkbX60gCM/GKkFgf7hZ1tYQWygrsZgH9iz4NE8gkX+o1Bb+oHrnqwcwYVBwsX2yId6fOSqFf8jXRX/wBhcbK/IPwSL9mJcVOfI4eqTD/e/wDkQpR8+y6K38lBxpgTi/zyBUR/JTD0vZY0OxroYOHWUaDacr/sBR/rnUKDtuwRf5d0yim/bg3WnxlwA39SrlC98jHHrV/Jf6WV9m2wNXLcoqwBYb/GfiAtZclFX4eS+J57DcShKtoEoHe/IotX/wBlFYCqSPC2FVS2EtQa4v8AJapRUyD+hMJc+CpQfs9GgrPsYIJR5cRe3wlUbqvbmVjNgUpewRyyck/huUL3zXsp+L7Cx/NjA/5C8n+9aQDaT3/2Aw15erhpXXluS6+4lTG0tey9qgpCMDQ7LBTRoy4vj0IDS288gf0lxhL4+Q7yvY0ej2LBgvkZCqCARb/cpuj98S8CUA+qglHB5fSILuwDZr0lMen4bAItSefZabrENW3xXsMl39IxLIuZtwlsqyvkBRV/fsBZOr/Uo1RbdbFsuH2IFlr2AO/4g675nJum69Y7N0FrGV2s/wBx1vTiiN+f8QjVbhUtufGK0bnIDSTQSsMjVNOw1UZBYE/r8gDwFyvYoWxHLXsckFFuMRfVcGHXB1IWCo/XSXiJTwYC5h7AGwr4w4N5RU0238fI8GXBTRZgC8HRFXwfkWCA+ggpFr7YBe7PsN2/QeyzXPFTbVMJgLDxjQNgsEkpfD5P8KxayV35i5jTdBExoWY/ZVgqKd/YAgW+zAKV58gKq04kFSiryWD0NgAKMvaqIFtHKey35NERUd+5AsD8gPJV6q2JZfwr2VoEVO7/AKgQ8/kuu2r2KhpqVC7GWWBXIqbaI8V1brBtTHsAFijh5B2gHG44g5RRLOtX0+TgMi1CUDAoIDr9'
	$Background_Image &= '/YBgNuVUdIo8iECXxYNq4tJE9GjY2GtLgwsVStZNtYjcPmn5KiA9GJ2M8G7nyaHfsy3TTjEXU/iRWhY5UKi2/ssoBePtRdm/2fUC8IsZlci70ryL3SvJ+ARYW6qWXX4QYWX5CjYr1jUVHqJCqHEjAdRaepcqmGU7UZsHRNl0OvX5Kyy335LkSpTFFWP9hkKrkYMDsJji0hrDH57Ku8Wm5ilqlHrspBav5EOHhakSRKoiGKqDA/4lw0J0YyCHh7NWCp1lQVoCelso4p0/JXYKF2+xWLg55cKgdvtxLR0iABAMHpKm18XUUY7a1GlIISpLptEJQfYOkbEbIs+3EQbEu/sY4Luv5ACiUmfUWmkzYlEKrtEYvCP/ACUDVmxlRb9iDo/yGqFhrGUG1pukVkq1bhoaHPiarM/djkoU+IIFsGr+TJqLpUrtjSzpADVEb/8AIkQWl28guWFruJE2G/2BWjYezRgD3yvn9ggFE0k47umvjGGhTMml0fI9hqbMUXTyDJ/qqIIX/DyII4VR+ymP4kNBr1F1Do+/JRvKjsWgBo4EF+PMhpWh1PsKhe8gXYCGrEFWFPCVfdldR/GVBurexKBH0GPcCXERbnyaD1LrJnhEoYMLMKD/AFHCOv2fQVnHVD5LKax9gqL3pA7LyNGlGobZ9HmQYAH4ypcPyoqC+HpKMu/5BAx67cLCvKlYCCxgeM/ISlsU6RUez5Ni9iLDrGBALrZCxRf0h9ADOQeLdKw7o1WuSkjH8jCwH9qXTARQV6d9gtjocuIWO7dxCc2HKNdhOidVKzMaIbUuLEWp9ggAso9g3g6sYwtOx5+RDA0n5KWXY/I96w9PssoqF6EGzRx8jVBf4hFjV1EYFn7BfBTrKVBf3IODH9jVUFR/+xGkC/8AyWPWulTiYHqTpW/sEWQr9LlQkFy/yDX2d/YLb/pD0b+/Z0WA/ZW9NIw1TzGoyUbctssDCfLgp9P+TgJV1LBtXV1+Q7bfwxQk1lBL6qHYuBeAnZqgVyvJRp/uLDx+uxAS6fsoCqFH5Nkkq4kSgurZ1ChhRChDrlxrxW7vx+RAgTq+3BiGhbYhen4ZCx5Zb0yEmlgplrtQ3cOtilr5Kh54s7GGwv8AYLtCmqiCn/EBRlV2XtNfINGMBL/iKFrCypdl0e5LjErx8gAGe6RaQcI5wVBsS8E/7CvWg9uBQKg/7lrWMQwhTy8iKqrQBUEMXiuRhd/5EdpFtOhPxZCzRPn/AO+yt7/VlA5ToHYV9he/k2UUFZ2IDLMfs2BSVSk2ADc2VNS/YWIKUG7yWBgxIIBV3/uc2BHkrsSrLs8ibBSND7VFw104z2WC9X55HQNt8hbHMiwGlsulWWqHIr+hxACy7YTLfEEJ/jZTRfY9riw/2jpXYi5HMKiCvEON2vkEKLl8GuuzjOfsLZ4Ma4UX2NKukRqm9amoSxMjQVTpWX/I671X2NOEawmlhsesC/rKCnHj8iscGO16vHJUEHwPCIaSm/CL8EQhQz/cBrKXYtYn9goo2NV9ioUdK9CCTQPt9ZbYB0mx2Pmm9jiGjnXkVLR+oieDVHkdTRMRlWH2WW30IKbcHTpHcbs79jv8JpV18yHdcvyYXVa1OlU7/Y//AMpZYlR2btbrka4itXiy1KaR/aiVuQcnA9zIQCEo+VLy6V9InkOZcsHHlE9LvyHo2wor2dBZmVT9lhR/i/YA0tcF5W/9wwrFfwf+ykEBWIpA+hA6GPyCvqNZWoZodOfqW0K3txFin8hYCi0gmih17csXBTXkIF0N/wBoNFFwBNiqAt4N0fyVFv0wVIs7N2osfGLUKcIUVtbT/kRXTtS4gRZ6Zeg1dtfkoSFLYOl10YgFi03yYwBDyYUJb+QTUgdH2OHRuQQW/wCPsWYbV6MG2Wu8jvhfyIrwfkLbUm5BECrPs4qz1iarv8hm7f2X9B9RA0Qliho8m3/zHXdQU0O+EuQ2xNhoPKhVqXTH5EXg9mCDvX2NbXYXEHP5BYWD'
	$Background_Image &= 'BB232KqTG7m+iA5UVrbcqNbYP4QkHOj2UHA+I0RulqYfsK23YGrjCnFqf7lJiDSQC8+5FBetvyBcicLXYrQi6uVOt3nsSqiJqG/8RWK+gXNhSKV8bhuza/sJYGtvkUQtX2uwXYvr5A0p25Qg0qKZcJQph8n4jcJf3kybsAWqT5Gyc9hgeGwOjXSUeU3TMo0nstjWquCmqkqAqmpWUUGP8Suyesm1NM8HLjrwkAXVbOS1y7EnQdLZZWV5fkGucgEvGIUrmwAAbfXIUb9aiFTNrPZQnXuToMVpHYB7LQyBYnIDBb2oIR8ENOqBX7O1CvUuB4+RqFmfCWFPYC0Z8jZLqmiVFVLrE2ID4EyELRX+VKsLfDDSLq8d9j10v6T/2Q=='
	Local $bString = Binary(_WinAPI_Base64Decode($Background_Image))
	If $bSaveBinary Then
		Local $hFile = FileOpen($sSavePath & "\Fresh_Snow.jpg", 18)
		FileWrite($hFile, $bString)
		FileClose($hFile)
	EndIf
	Return $bString
EndFunc   ;==>_Background_Image


Func _WinAPI_Base64Decode($sB64String)
	Local $aCrypt = DllCall("Crypt32.dll", "bool", "CryptStringToBinaryA", "str", $sB64String, "dword", 0, "dword", 1, "ptr", 0, "dword*", 0, "ptr", 0, "ptr", 0)
	If @error Or Not $aCrypt[0] Then Return SetError(1, 0, "")
	Local $bBuffer = DllStructCreate("byte[" & $aCrypt[5] & "]")
	$aCrypt = DllCall("Crypt32.dll", "bool", "CryptStringToBinaryA", "str", $sB64String, "dword", 0, "dword", 1, "struct*", $bBuffer, "dword*", $aCrypt[5], "ptr", 0, "ptr", 0)
	If @error Or Not $aCrypt[0] Then Return SetError(2, 0, "")
	Return DllStructGetData($bBuffer, 1)
EndFunc   ;==>_WinAPI_Base64Decode


Func _GetVirtualScreenSize()
	Local $aVSS[2] = [0, 0]


	$aVSS[0] = _WinAPI_GetSystemMetrics($SM_CXVIRTUALSCREEN)
	$aVSS[1] = _WinAPI_GetSystemMetrics($SM_CYVIRTUALSCREEN)


	If ($aVSS[0] = 0) Or ($aVSS[1] = 0) Then
		$aVSS[0] = 0
		$aVSS[1] = 0
	EndIf


	Return SetError(($aVSS[0] Or $aVSS[1]),0, $aVSS)
EndFunc

Alles anzeigen

WinMove hat in diesem Fall den gleichen effekt wie @SW_Maximize, allerdings auch über mehrere Monitore hinweg.

bazii

Hallo bernd670 und Kanashius:

Habt vielen Dank für Eure Hilfe und entschuldigt meine naive Arbeitsweise. Ich bin so verwöhnt von der tollen Hilfe hier, dass ich gleich den Code von Bernd670 1:1 eingebaut habe . Ich habe es jetzt nach Deinem Beispiel nachvollzogen und es funkt bestens, auch der Tip von Kanashius funktioniert prima.

Jetzt rennt mir nur noch die GUI beim zurückverkleinern (nicht minimieren) der untere Rand, hinter und vor allem unter die Taskleiste.