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.