File to Base64 String Code Generator v1.20 Build 2020-06-05

BLinz

Ich bräuchte mal ein Beispiel für Icons (.ICO) die ich massenhaft verwende.
Ich nutze bisher nicht GDI+ sondern erstelle die Buttons ganz normal mit GUICtrlCreateButton und setze das Icon mit GUICtrlSetImage.

Ich habe mir zwar einiges hier im Forum schon angesehen ... und früher (>4 Jahre) mal eine "resources.au3" dafür genutzt die nicht mehr läuft.

Für ein kurzes Code-Beispiel wäre ich sehr dankbar.

Danke
BLinz

**UEZ** · Erstes Beispiel: File to Base64 String Code Generator v1.20 Build 2015-01-20

Erstes Beispiel: File to Base64 String Code Generator v1.20 Build 2015-01-20

BLinz

Zitat von UEZ

Erstes Beispiel: File to Base64 String Code Generator v1.20 Build 2015-01-20

Ich bin mal so dreist und behaupte das dieses Beispiel nicht mehr funktioniert (das hatte ich nämlich schon getestet)
Er meckert Global Const $IMAGE_BITMAP = 0 an ... und die unbekannte Variable $ghGDIPDll (undeclared global variable)

Ok, also mal suchen, müsste ich doch selbst hinbekommen ...

Hier die korrigierte Variante des ersten Beispiels die nun funktioniert (also mit aktuellen AutoIt 3.3.14.2):

AutoIt: Example_Icons.au3

#include <buttonconstants.au3>
#include <guiconstantsex.au3>
#include <gdiplus.au3>
#include <memory.au3>
;coded by UEZ 2011 / changed for AutoIt 3.3.14.4 BLinz 2017


_GDIPlus_Startup()
;~ Global Const $IMAGE_BITMAP = 0
Global Const $STM_SETIMAGE = 0x0172
Global $msg
Global Const $hGUI = GUICreate("Example", 600, 250)
Global Const $idLogo = GUICtrlCreatePic("", 215, 20, 169, 68)
Global Const $idButton = GUICtrlCreateButton("", 266, 150, 78 , 81, $BS_FLAT + $BS_BITMAP)


Global Const $hButton = GUICtrlGetHandle($idButton)


Global Const $Bmp_Logo = Load_BMP_From_Mem(AutoIt_Logo(), True)
_WinAPI_DeleteObject(GUICtrlSendMsg($idLogo, $STM_SETIMAGE, $IMAGE_BITMAP, $Bmp_Logo))
Global Const $Bmp_Button = Load_BMP_From_Mem(Merlin(), True)
_WinAPI_DeleteObject(_SendMessage($hButton, $BM_SETIMAGE, $IMAGE_BITMAP, $Bmp_Button))
_WinAPI_UpdateWindow($hButton)
GUISetState()


While True
    $msg = GUIGetMsg()
    Switch $msg
        Case $idLogo
            MsgBox(0, "Information", "The picture has been clicked!")
        Case $idButton
            MsgBox(0, "Information", "the button has been clicked!")
        Case $GUI_EVENT_CLOSE
            _WinAPI_DeleteObject($Bmp_Logo)
            _WinAPI_DeleteObject($Bmp_Button)
            _GDIPlus_Shutdown()
            GUIDelete($hGUI)
            Exit
    EndSwitch
WEnd


;======================================================================================
; Function Name:        Load_BMP_From_Mem
; Description:          Loads an image which is saved as a binary string and converts it to a bitmap or hbitmap
;
; Parameters:           $bImage:    the binary string which contains any valid image which is supported by GDI+
; Optional:             $hHBITMAP:  if false a bitmap will be created, if true a hbitmap will be created
;
; Remark:               hbitmap format is used generally for GUI internal images, $bitmap is more a GDI+ image format
;                       Don't forget _GDIPlus_Startup() and _GDIPlus_Shutdown()
;
; Requirement(s):       GDIPlus.au3, Memory.au3 and _GDIPlus_BitmapCreateDIBFromBitmap() from WinAPIEx.au3
; Return Value(s):      Success: handle to bitmap (GDI+ bitmap format) or hbitmap (WinAPI bitmap format),
;                       Error: 0
; Error codes:          1: $bImage is not a binary string
;                       2: unable to create stream on HGlobal
;                       3: unable to create bitmap from stream
;
; Author(s):            UEZ
; Additional Code:      thanks to progandy for the MemGlobalAlloc and tVARIANT lines and
;                       Yashied for _GDIPlus_BitmapCreateDIBFromBitmap() from WinAPIEx.au3
; Version:              v0.97 Build 2012-01-04 Beta
;=======================================================================================
Func Load_BMP_From_Mem($bImage, $hHBITMAP = False)
    If Not IsBinary($bImage) Then Return SetError(1, 0, 0)
    Local $aResult
    Local Const $memBitmap = Binary($bImage) ;load image  saved in variable (memory) and convert it to binary
    Local Const $len = BinaryLen($memBitmap) ;get length of image
    Local Const $hData = _MemGlobalAlloc($len, $GMEM_MOVEABLE) ;allocates movable memory  ($GMEM_MOVEABLE = 0x0002)
    Local Const $pData = _MemGlobalLock($hData) ;translate the handle into a pointer
    Local $tMem = DllStructCreate("byte[" & $len & "]", $pData) ;create struct
    DllStructSetData($tMem, 1, $memBitmap) ;fill struct with image data
    _MemGlobalUnlock($hData) ;decrements the lock count  associated with a memory object that was allocated with GMEM_MOVEABLE
    $aResult = DllCall("ole32.dll", "int", "CreateStreamOnHGlobal", "handle", $pData, "int", True, "ptr*", 0) ;Creates a stream object that uses an HGLOBAL memory handle to store the stream contents
    If @error Then SetError(2, 0, 0)
    Local Const $hStream = $aResult[3]
    $aResult = DllCall($__g_hGDIPDll, "uint", "GdipCreateBitmapFromStream", "ptr", $hStream, "int*", 0) ;Creates a Bitmap object based on an IStream COM interface
    If @error Then SetError(3, 0, 0)
    Local Const $hBitmap = $aResult[2]
    Local $tVARIANT = DllStructCreate("word vt;word r1;word r2;word r3;ptr data; ptr")
    DllCall("oleaut32.dll", "long", "DispCallFunc", "ptr", $hStream, "dword", 8 + 8 * @AutoItX64, _
                                           "dword", 4, "dword", 23, "dword", 0, "ptr", 0, "ptr", 0, "ptr", DllStructGetPtr($tVARIANT)) ;release memory from $hStream to avoid memory leak
    $tMem = 0
    $tVARIANT = 0
    If $hHBITMAP Then
        Local Const $hHBmp = _GDIPlus_BitmapCreateDIBFromBitmap($hBitmap)
        _GDIPlus_BitmapDispose($hBitmap)
        Return $hHBmp
    EndIf
    Return $hBitmap
EndFunc   ;==>Load_BMP_From_Mem


;~ Func _GDIPlus_BitmapCreateDIBFromBitmap($hBitmap)
;~     Local $tBIHDR, $Ret, $tData, $pBits, $hResult = 0
;~     $Ret = DllCall($__g_hGDIPDll, 'uint', 'GdipGetImageDimension', 'ptr', $hBitmap, 'float*', 0, 'float*', 0)
;~     If (@error) Or ($Ret[0]) Then Return 0
;~     $tData = _GDIPlus_BitmapLockBits($hBitmap, 0, 0, $Ret[2], $Ret[3], $GDIP_ILMREAD, $GDIP_PXF32ARGB)
;~     $pBits = DllStructGetData($tData, 'Scan0')
;~     If Not $pBits Then Return 0
;~     $tBIHDR = DllStructCreate('dword;long;long;ushort;ushort;dword;dword;long;long;dword;dword')
;~     DllStructSetData($tBIHDR, 1, DllStructGetSize($tBIHDR))
;~     DllStructSetData($tBIHDR, 2, $Ret[2])
;~     DllStructSetData($tBIHDR, 3, $Ret[3])
;~     DllStructSetData($tBIHDR, 4, 1)
;~     DllStructSetData($tBIHDR, 5, 32)
;~     DllStructSetData($tBIHDR, 6, 0)
;~     $hResult = DllCall('gdi32.dll', 'ptr', 'CreateDIBSection', 'hwnd', 0, 'ptr', DllStructGetPtr($tBIHDR), 'uint', 0, 'ptr*', 0, 'ptr', 0, 'dword', 0)
;~     If (Not @error) And ($hResult[0]) Then
;~         DllCall('gdi32.dll', 'dword', 'SetBitmapBits', 'ptr', $hResult[0], 'dword', $Ret[2] * $Ret[3] * 4, 'ptr', DllStructGetData($tData, 'Scan0'))
;~         $hResult = $hResult[0]
;~     Else
;~         $hResult = 0
;~     EndIf
;~     _GDIPlus_BitmapUnlockBits($hBitmap, $tData)
;~     Return $hResult
;~ EndFunc   ;==>_GDIPlus_BitmapCreateDIBFromBitmap


Func AutoIt_Logo()
    Local $AutoIt_Logo
    $AutoIt_Logo &= '/z9HSUY4OWGpAEQA9wAAkpKSQEBAampr4eHhzdjjVom2ZJnGw83Yv7+/7e3tOmSN2+Pspb7WmrHHWpTMMzM1eaPIxsbGmb3gqqqq0Nvl5uzxp8LdlJ2mf39/hISE8fHxsLCwuMDJ6Ojo/Pz8o8PiISEltLjHTFhj1dXV9PT0W2h0cXJyRnGaUVxoTEyNAABCNjZ8mJiYoKGhpKSknZ2dzs7Oi5mlW1tbZ5W5ubm5NkdXi7TdZ3aEyMjIAAB7kqzFYGBhpa21Q2WGjY2NmrvbUlJSV4Or2dnZe4iUwcHBKkdkVI7HV3mZeYGL5OTkmaKuAABqAAAkAQE00dHRkrLRcHuFra2tQWyWx9Lcg6zUqbC7tra2AABU5ubmIyN5lLnefKnTYGx4g4yUq8nm3NzcSUlKfazZAABz+vr6ZXF9TYO6m62+h5GbVmNuqMbjQ0lWJzhKiqzNOlJpdJq5cqTTiYmJKiou1N7nJ0FbS32s9vb2ytXg+Pj4AAASh4enS3miERERIzxU6/D0k6Kwu8XPmJi5GBsmUn2m6urqZp3QYYeow8TQmbXSk7bYNFNxGBh8NEthbaLUMzpDRFFdmqez39/fjqO4eXl5eIygncDiiJ60jrDSR2F6o7nOAABgnqm1OF6ENVl9s7OzdpGrW5G+nrrVhbHb1uDprrrEGyQ0q7bBZ2eJgaTCa5KwBwcHEBAxf4aNkJef0NLbQFx4PF5+cp7ERnmsPVp1HzRJbaDMHBxpsczoUHGRharNn7bLQ3SiM0BN4OfuWVmEc3V2lZmhZmdpobTGsLO1JCRWL1FzCwt9enqnJDA7MVR3DQ12k6e5u7u8cHmBSH2xp6engafJPVZursrnCQlkjqjBeabQDAxOFBRFT4Ov/v7+7vP28PT3sba6t7e3oL/dqanDxMTEEBkieqG/oaesYo+zTWyJQ0N0RUV/y8vLLk1roaWoq6urfHx9mpqbUInB4+nvOztf6Ojta2ufd3eQdafWeKnXh7DWaYObkLje6enp2eHp2dnhEBBrDg4oAAAA////AACAIfkEAAAAAAAsAAAAAKkARAAACP8A/wkcSLCgwYMIEypcyLChw4cQI0qcSLGixYsYM2rcyLGjx48gQ4ocSbKkyZMoU47MkiJPHlMr9uVQSbOmxxUh/On0oOELkV4ybQodKtGYTn/Y6pAgoQHfiBbDxMwkSpVksiwrVpgrtyKLomRTDebZqWGQ2bNYnkYNW7VtRkXm8hiCV6duHQ0JBg2I8KtXFrADU+isk7eFpHXr4JgdgCNDNTFuI1cstgJQgqP+PIypu1Qp3gEj1PWqlaMYPH8kBuEbFOABMCAB8MmGZEVNJraScy80Z+ioBxJ5OwgfPhxf3iRCiOQBlDmBbHxgBHR4IQOL8CTnJFlbort7wiw5dQL/x0dcOJbz6NN3sE6CMHEEETpkADI8yQgWpG573z8wHjadTWGRRBKQfMOCLyg4oqAIOyDhAgwDRpiEbAJKmIQAD1hx3oAjOPPAFZDx110y3oiHT4QGCiACCmhwccOLN5CBBgoi+OKCExbmmAQLDwAQ4QBCTNCICiGKKJkireiUQAcDLoOBCGjcMEQMfihjhhkNXPnIBZPcgMYOLECoIw00JOGDDAOkCVoLDxBp5JH6+HMHPmme4wMKXEzpB5bB5ILJn5jkEkyWj/gxRAk7vCCEmmoGAEYSGIChJiR2kuLmm20hiVoSaW4ADBp6NhAMJgyUaqqpgQZzpRJDoLFOBIwO/wAGEADIAAYkaQqBgACqXMEdplXlRAKBkLSAAhlnVGKGn6Va4KwFaTyLai6ExsAFMMtAoi0k6wggiQkZaPsFDC0E0MQVM4mhwrrstnupbuq6q8IVIRmDDQkDfPFFCyKQEUMkDeQCCgPdPJvGwQg72w0DoFBrhjJ+lFACDfpWbPEXTnQCTCAqZPKPGCBgIPLIJGMAwq+SgVyyyDuo8NEKGuCrr7El/NvAIQN388EHCHsRTTReHPyBBd10'
    $AutoIt_Logo &= 'A8ohDeigTAyXCLDMxfoKAUMnvsRxrlSZBIDZ1jqBoQJuEy2Rydhko0xR1lz7ow4e6ZLtNkXFGDIGFkIEiQI0kwCMc9Ef6P/8gRdeWDBqGtGksXPfPxzdwDSRTNKGCUTUXfcITnzjggBWq7DETCpgkPZRX8jQBNgRXfFAAKin/qFFaG89QAZ4iLEECKnX3sREvdQxiBAjIGDCIjdEosMhh/zQDSXI75yLEuoYgoA4ZliwMyXdSPADIk8oXQk5bcAxwvcjnLNBBmCA0ITmUzXhw+eo4QAME0VSxAQCXNPAdkWtH6XBrngs0TnXHugH6RRSjFZoABKUg0MbLuEJHTwBET+QgASRR4lIsKIVfcigO0Lgh0MgT4I/0MIhLME4e0ADDS4AHwLgQAp+zOs2U5nfUbBBw/9gQwPZid1FZIiZOrBAhwYRwxX/2OWrg+QvM/jghgBi97+tnaMfZmtICgZhnxF0AgVtOEIl2PBALWhBghKcxiry0YdsaEMbfcBCKWIARgl4ERGWYMMpPNGDNvgiAk5wwjIk4cJMSIUgeICBb+5wBw/8pw5OcAEUBSKGJvTjkZDsRxMaGUlITpKHOsHGANiBB3QR5ApMAAEQRraDB/TjXf84ogeSuET/eQ4zHcBBP0AEkSokQAhOgEEGFnGJQpyCDZa4hzCFqYV7DOEPFSjjGbNRATmcwRPFHKYNLIGLOZLDFSK4kROIAABS0LIg/ehhAjRwh//cYQQuSIXH/tHErZ3yle7cQwAEmcnf4AB1ewhREx5A/z+uJQADe3CZQFSZRBPggQkBaAFmeJIA1J3MIVnAVS6tgIJEkKMQEGBDPWzA0XvY4B72uMACKpDMDPahAgv4BhfcwNGW1gMXz5jBLXqwCGZEAAY4iAIQvjmQ2flGAx3YwBh0cocgxUGg7TwKDCQJT9D1Q2vsI0Ej6NWEHbBPJ5B4wO1SCdWdFBQP4WQfNkwwuob0AjkwgAELauCKExQAFlSoRyjmOldPkEEUvOCFO0hKUnfwggJK4AIV6BoKKmwBAuM4Qg9kgYINwOAcVjCBKqKYPw8kABJRuINOxjCATpiLc031xwhewNStjSAKT+UaNn4jhE4cVQVAWChokqDZo/8kYA8eIyg3DBpWzKwWX8sAwiQbooQBOOEc3/BFEXpwhAIYYAthiG50IYACDiyAFwtYQD7ykV3siuIAzDiCdMNAD2pAoACCkIIsFsGCc+AAAT7wJluuYNXNpgUOJNhJB4LLBNBihgQRAEBpj0ICHLAjtUixYR0gsQwA+AIEKsADJI5yB3IBoBMDGKqSMtBfgkYWrDv5T2Y6YCBfBAB+DEnGOb5wjnN0QgTo6AEdCvCJN8yDHjimxy1YIYfsimIKf+DAASiw3XxQoBQiOAI95sHkNxgAvSeQRREkQYRzEOEFU41fO+/AGAHQIJMJiIAkdJhUAAu4CU01cz9A0IkkjOH/P5YlwjocqoIHYCYBkU1FHAbhmyQQYQ9i6yoSlXjQDTiBBCJGJADAEADzxQ8hWXDCCHDwDXbUIBFSmPEnHMCIN3T6FlwggChEIYcDVOEMzFDCHwggB1JPgRWOMECnGUEIB0D5FUVAwwRwQARnAEFzBGHCBiisKxksg8DngB1kyhzgAYsnAj44JR76OeJOAAEPeDifCXwT1B2A2DcDsMJRdbtEFTAhzRFYRz+yrZ+FrCCXEVjGKuaQiBPM2AgOIAQhGCGIXfxh1D8uRat2IQIeHIAAFJADBf5QAlnou9ZGKAAdTrAJdDjCBxH4RhR2MNlgU7sOI7DCA449GCe0YJHM/z4zuqO9BEx6oAOd8HYmlqA+bndiib31xxggsQHhkrt/Zf5GBmYphkcjpBeP/YYVuDAHTmS6Hfh2gAMMsAglJJwCdhjFGdDQCGjUAAqjmALCsV6KXfRA6g4wQjsmXvEa2JQIUQCGKtr9DzxcRjwwmMAD4HlOZ+yBXil3NmqgDUWXd8AKwOjfPwz/4ZyP4QvqAAMTriDo'
    $AutoIt_Logo &= 'VRLalf/9BssfYgocRIAIG0BB008QizIYIerI4IIdFE4BDlhrFzWY+DFi8AexU4AAB4gBKeiQdrWzHR1z4AIREBAFXtE95xqIQAtSAc/HR+Go7ES3yv9L+JZT2/KtXPz1v+r4L0xA8pRfKP8rgb7yRTpEHpQmwoubLoXSn94BCtjFkClAgQM84gY1WMMJjGCAV9TA4ASAcATAAWhQBKdnBGUQC7pQcXyABkSwDOogWZ7EVTOUAAjAAv2wbZuVBFYgXDkQeGhGfSzncuPHHSS4W9+2WV/gDOBXeSXIbJt3ft+AAMuwfk5XelBXBqTwCGNnakggAscgC86Vb21ABn9gBwFIAFNQduhwemXQDFLAgGhAgxMgAIEwgZWFD1aAAQiGRAggA/ADguVnfb5RgtpXhijYfSw4eS54eTBofg1hCjRYg6J3g2UAdegABXZAf1l3BlzQCItwAoIQBIQoCGugCUiYhAdwAaQgBe3/kIBSwAnowAdcsAw04Axy903t5AFY0AkGJWhhNmbqIn2CB2AjuH2EBhknyFuY8XhrGH5o2EpvGEUKYQ7cQCadwAV8gAwKEAvN0A7I4AjzRwB/oARQoAY1QHAosIw0IgLMsIe3F4B/QAZ8UAaQyAlF4HY0wA0uwHETWHM7MQjQhgd2RmAw4APkR33TR2DVd4LZt4opqHMr2ILi54Zj+BDv0AnbaAWrwAfEoAC60AwKQAoc0IOaMHA18Ae3F41JSH/0F4B2UApqUATNoAsKgAxz4AhdQAOd8AJA0CsxRG33gg/qlnOIpEiYx47r+GynGIuKB49qSI8umZIsCYcMUQtR/0ADVmAFLzAH6LAJuhALsxAD0LiEZ0AGsKcJopBdTKldpOaQDnkAfkAKxGCRxMAHJdACVrABAGAu7RZIV0VhIzABIDBEpBiC7NiSXnV5Z7iWrHgUriiTaymL9+gQyaCVnWAFL1YETjcHKHBw9TcKrHADatAGSEABTFlkT0kAdjAFB+CYB3AAowAFpLAJkjgLq9AJnTABGaBV6/QPOXdVj7cBbSKGIlh4qLhEqoiKb6mCr9iGdHmatJgQOYAEG6CZnQAF/lgExxB2pbAlR6kgf1lqHFCcxTkKo1AKVcADmvAISvCcfnABQ7ALs4CRszABG7ABLWACHPMrILM1NJQ2Hv+QBDQABExgmmmJmjPZloPWmjonBC4gl4MWm+k5mwiRA+XgDNm5Ac6wBkUADiWABDLCIgnSCDXQBUpwAazwCxfQoAp6Bl2ABFBABlxQAjOyjAoSCHzAB47ADRsQBSwgA/zwTUeUFB3AO18wCHUAZ4NABO+Dls+2koOnlkhEA++4fTTgnufEDicGi3OZjgSGAzHoELXwAuqQndwgAnPAB6QADoFAClB6DGtwCbfAIlzADEiwCl3QBauABDdQAglSA41wDMcApYEADuBACnwwC13QCVHgDHBgLt9EXwvVAQjAC7cADgDgDDCQAB4AgBQagAPrkG0AaXYOJwejM6oAnjuRAERgUKoA/zhsYEYEGJAAgvdiJ1bzczQAiRowcGD2iRAAYoABzqAOUbAAAb8wC+jACQoAIAV6cA0FUAAA42AA1EAFwIQAMwxgAaVyNDoA8Ayw4AYz8AkABXANemCVRcAAB7vADVGgDi8AYALm025JNQYAI8CjDwAGLKAAAUdRBzBAWoYAegc+UYrtKJIAJCAE6Mgd7XQAL0LASb1lWTQAsA4Q5qPzCaQARMVgNskQOfAADuzgDBMwATQAoKS8SAftsGkA+zYPYfBREvAAN9FgC7ZQOB8AIAH3EAph8AYAhGAAtkYHUmAAnW2qDi7gA2AA4EJFImw9dI4AgXBQvoAZ5zQAAXtgqDyhAQEA0A/Udqhk+FMASQACkkSnCfYAGx4gT9M6rjsA/9APYwOb7JoAGXgBBP0weQ8AsQ8Z0AL0eqQA/rkJJ3AN7WAAALLmrzagBZQAILAEa7AIGwoAW8CwBvAJ12AAkcEqAsswAc4A8AJV'
    $AutoIt_Logo &= 'cy5hgUkAqHEOcABh1yoABOpwVLGVSVcAZYpQ1AQvsBMAfYoZ69AEe4AABTHzZgA0ABsA4AsP0D+WCrMAHmBImEED/eUAEPEKAC5Qr50AsAqkCpDX8AkABkALbxAGofAARVJrC0FzsPcAYFi0kLW+KgUAV7kGwvCmLQAABxcLbAPRD9IAig0JkADkmQEA4LAuGogXHQAAA85gLntAGOMAxBSD0AEJMAYAd4AXCTAANDAAdEtwBTKQBF8AAAlYME6EAQMAotMEAgADIzAAAAlQB/81lpIA/wAEqUAkrQMAHIMQGom3BCAA0wH6kgSD0L0A3QoHQNQQ0uAAC+zgAs7gDAgAgAb+iKqVe7kAW1APiCABUQsAOJ/bDVpgA2EAAAG0wKsQywkAczALZ9AJzuAAAiwgAObDU6AA6Q9CYAXqMAEALgAHwICzWYMADxoHtuyAAScA1gS+QIMIgAAAVtACPoABOzAAAVFQryEsAIsAdG4u8AL4W68AL6DCTNByJvAAuFaAADjQYggAMAE+IABgsAcATHAbWfOnGwAAtkF8bdzRBEAAELZEOwEUCwcAMqB4jDsMGXAAvy7gAssgAnwA4HR6EASWCwEAAQxBUXs4CIwACFTAwDNQAHoAIAW4hpk0cMYA7DBnLmQ2WUMAAzS8AzIgA0AA/+CzYvMAzuAAC4icyEAgeZkA0AQykAHfIgAAMhAAe9AIwIAAyIi8yIuUCQgABQSJfMpA8AAA8NNyrmECviAACZLgCwKwA2AA8ACpMHkzkQkAD6AOkhDJigwABoqXA00QB7MAcsq/LMYOIQYAauADL9ACLeAAAgiAAmuMqkEA0Kqw8Az18EAAP7DN1xNHEAAACzNQCOnVx6sAsAzOzA7zwQ8ATUB3AuFIlfQASEP8D+5cSXgAQCQttwdxkM8Ae3BQTPDOP+sAnRH2zpMHGcIAjAd7AAL5HAcAILAH69YxYTEAz5GUbSGSA1cAgG30PFwPkQMA0rADPsAOzgwAzfybCAqgB4IAMA4zAAungAsAXPQETxBHzxAADm4wDkGgBz0A/4CNa9AF5twAAi8Axhk8m7IAswRAHdSbw0gAQh3Uf5QDNMcABOc5c0VX1EAAHRY50NRF/UcAjDRESs0E58MA1Ljx01PNFlEA7dRUndHVIAAAHe3MLUAEZ1AAA+jwCuSgB4UAYNJuEA6nMNcA4QDTqCDOt/AACokwByKwAdwAcM4+sANxcJ4AQw0SUR3WG5EAA4pddIgtFGIAYA0CAAfs8AIAzayPJUBvPUAADkcQBIWACp4A7dmFUAhHMFMA61UDQxABE6AA0ywAB4K91AMABCyR8dg7kAEAAEDZPrwMUcAABYuQCK7QA7cAcATADdy3QA4ArwANiwANSFAAgzqNpxggA3EA0EevDduxXQ0AQCAJPsACto0AxstwATeARW0A/wANsiAL0PAA3WiABDzwDZ0A0AKTzQI+EL4AILDURifd3SEARA8gALTNAuwAkN8vMAEemg4Av9AFQ9AFZ/AACzywDVbQwy8AwA4sAAAZAAwAARAIWR3d8p0AMplgDWAALgAAwAL4PdnOIAwAy0AEII4ANMAAnwmu4AxuAkAA8NznU9gT/iYAslMNpAAEJoAAAT6Q4Rue3zgAnt8aDgAzLAAAKa7O89LYLS4AIlGdCdUQCAEAIAMmsA4Z4AMANQ4AUM7jPpAAAetgApv83C4AdAXsPOTAUuQAV6AKpPCsQLAAA8AgAGb+yZMA3GiBAORaLuQAXI4pi50JV/AA5aqgCk8KAqQAAAKBoArqfD4Ac66+Ev7mmNIA1HI+5+syRHMAIO4rgC7ojF4AEIp92IxddIoA3eiUXumWfukAmJ7pmr7pnB4AEAA7'
    $AutoIt_Logo  = _Base64Decode($AutoIt_Logo)
    Local $tSource = DllStructCreate('byte[' & BinaryLen($AutoIt_Logo) & ']')
    DllStructSetData($tSource, 1, $AutoIt_Logo)
    Local $tDecompress
    _WinAPI_LZNTDecompress($tSource, $tDecompress)
    $tSource = 0
    Return Binary(DllStructGetData($tDecompress, 1))
EndFunc   ;==>AutoIt_Logo


Func Merlin()
    Local $Merlin
    $Merlin &= 'R0lGODlhRABHAPcAAP///xgxcRw1fRgtbRw5ghgtaRw1eRw5hsrKyhgxdRw9lhQkYRgxbRQoaRQ1fRg1eRw5ihg1dSBBkhQtZcLCwr6SlhQkWSA9kq6qrsaamrKytrq2tsrKzr6qQRQtdSA5ijldlhg1hhQxfaKenhAodRw9igwkVXl5eaJ9eRgxaUFpns6ioj1JVRAcSVVZWWFlYQAEHIaCghQ1jhgoYbaiPevr676+vhQtceeysiBBnrKOjhAkbS05Wd+mqhAkXY6KjqKWQWlpacqyQSAtSQggZcbGygwcUWFlVWl5kn1hYWGGshgxeaqqqsbGwpaSltvb3yQ9cYpxcSAxWRw1gt+uro59hqKmpjFFeYZpaaqCghQoXSAxaRAkZZKSjhAxhgQQNT1dkvPz8yhJmhQ5mhQgPTU5SX11SYaGjgwgWaKCguPj4wgQJK6aPZZxcUVFRTVZkklNYa6KjnF1eX2GnteiomVVVU1NUbaSltvX1zlJaZKKTVVdZdemqop9ORQoVcqmqiA5guvKzl1laa6aNZ6ennFZWRgxYbbC31GGwi1BaZKKVUFJZbq6vmFZca6engwYOUVZdVl5quvj3zFJilF5oiQ5aUFZpjExKKaWTZ6qvt+6vjFJglFJJAgYSUlVZaaWOWlpYQwofUU1NSA1cZaChnFxVXFxaUVxpk1dhhw9ktK+QVFBQdvKyu+2ukk5PSRFmjFVhjlFYQgkcca2SWFNVbaqXRwtWb6Wmj1JcX15WWFJScqyrlFBOSRBhuPGyvPv63VpNXl5ZYZ9VVldRWF1ivu+wj1lmhw1cWFVHLqqSUE9RW15in2CgmF9ohQcNQAMKCAoPSRBinl1PePf2yQ5XZaSaV1phig5ZbKysjVZloqCefv774aSru/XTVFtlsa2VZqORTU1QaaeXYJhXZZ9eUVFMdK+TZKGRWGGnhQkTVVNRW1lVTk9VV1hYTFZprKGhnWSsp6KNRwxbff7+//GxmV1fRw5fVVdfc7Kyhw5eRgtcb7CzkU5IG1hHIZlYf///yH5BAEAAP8ALAAAAABEAEcAAAj/AP8JHEiwoMGDCBMqXMiwocOHECM+dGdMosWLCMXkuJAPFsaPFlFpfBUgEciTDpd906bxAMqXC8XJySFm2SQxMHMWVAFJwqsc3mTqHPov2odIOWjOAYeOaE4kan5ZGpNp275mTl9mklTjVyZL07rigZcVJDwKP6qQ2kXPUZUYViiU/aikUYUePajgwNujTT0lczFWoKMpkK/Cgf7QIRX4YjM6rOZZOiT1UBg+txpbrELHV5hDeFodelJDUwYkmh8SuxVnRStWgTThCGQYRwZHjFMzJIZFxwo+VFoVG96KD58MWcZF0r1wzjgdGSoAx0GdygroUaIAZp6QWxsdWaJk/9Fxp8KdOGmwVEiTZjv3g0rS6HinrhCW+1iS1NGF/Md7hVXo4Ig6rvCyyoGuiBLDH1nM8V9CVeATBgJBrOLKhW50UUMNu6D24EGM/FJDGDVw0AVcT5DYVSYfGsRNWGrg8cQ0aqjxxBN4yBijgy0OhA0eHBRBASFO/BBDDE5gwIgNCOBjRY8CKcEENtgwYUoht1BBBR9Z1HGGFUxgYIV7H85RpBNBnLDLHxVUcMsfjrRzwg8/ENJUj2eccEI7MeDDAQUbbMAIBRzYEESaMZwBpSntuMAMBwhEGiSkTTIShAtBMAMlLuGYskERkYYaqpBWtMMDJT2eMgQ0MTDBCKiiRv9KgQZWBPGFIS26E8sljwThBDY2wDoqI0z8oMwaX+Tz4D21mDNLH27EQAiwwlJgAwZOmDLEFASUEA0Y3PUiQy3ddFNNGaB0wcQGFBThrg3YjBCDGwVIYO8FB7yRmgrRyIDKN9WYcwUJZTAz7aDWEovmtlN8cIG9B0zSWDYClHCBNZN4IUg7Mtjygrob2EABI9gQEoMyS4iDyxQWS3ABBPacUpYKD1xgcyoQCOBBPgccUMYJB9uwAbYuTHCP'
    $Merlin &= 'OZ54QIDDNkMgcVa9lHDvBwQEII8AgJTwgB0gM0LrCTzIYIo5eqSwRAgQpPKKBFNk45QxU9grQSpePNBAAvYAckAJhgT/Me0G2DhhxwMQXDGLEEdssccm1dSjwAWAOJWP1GsHAUoKLOAiAAGAfAABDzFggI0VL8hTwgEh5KIKOCxgkkwwCqzd9lD1XKG2AvXU0kEf65RiD+d7LwHHCBj8wEPPPYsgzO6DYOLwvb3o1AwuqdwbDSCLALNFKJvrvXcKJzABxxQ9AwKIACLkMUwfHUACgU8SQBA9TJu8fy8BS3BRxg0JGJA38iFIhCAYcADzAYIA9hDAEgrghlgIIgQPs9cUQPASKDQAEK94xQU+IAB9+EEK+gjAA37nPa354AAESOEBE2iAFKTDBwnImk8uIAAtgOsk14DBGlpggFQcwAAzGEIB/xjAgAgIIAQh8N4Bp2APbqWQhQxoQToYIAAIlGACj1jDGm6IQxjokAcG8MCqBlCAASTgAYK4QhLNRwABuPF3bTTAAwbgh0dM4AFQgMYadMhFlCTiC87gRTh80AI/BKAABQiACEyRDDWu0I1uTKEADGCALWjhEUawBS9EsQYy9BEliDhFIVCAAmV8oQD6KEADFAkJVSgiBJKkJCTdKII9uIALjyDDKNsAh6y0hgp0gEMDBnCNRNwgFLmYxSweKUsB5AN9odCDC4iQDnLg4DiKIgoSspCBFWQgDvIgphkSUYoOzCIZv3OjLEUQDEWAAhQdWAcR4ODNFVSAHKgaChLekf+BDNThFqMYwASkwYYOdEAIwRCBOilJSXsoQhUdoAEQhtGINERhBbdAgVOQgALWkCEDUBhAA1hAAyEIQRiQZChDH2AARUSUBtJoRBTYsYI4oGA5Q7GGP7LzhSTgogAzWMAiPOEJA6T0AUhl6BKEIQSJSmEP7BhCGvxRCKdQog47hQY0GABULTTAAyJg6UojgNQHiOAFQtCDHtjAg058oQ7kSII3skKJRtAiCZxApBa0UIAEkHWsESArS9vxggSMQg9wSActCqGLuc7FDsDgxDV24AO+BuCvcoxAAjYb2Ah4wAMJ8EAlYjEEdXDiHogIzDDigYw+mIEFPkikX8u62QD/bPa2tdVHA4aADH54ZC6IYEE/+vAJcLghtgywLVKXkIAAONe5t3UuV4fAiXT8di6XQMYnzrEFNPA1uZu9Ai48EAB93OC5zyViAaSgjk5cNytg4IcdzDAIHlR2iLb1QB4wUQkSVGIR50UvA8iohXLkMjAqSAcXCmAGO6DBAmVMrn5pkIsjAMETAZYuVwtQYGc8IjDGMMEEGpACalgAwikYgD5G4QkgsIEGpbgBEZMbAPVy2AgWSAeIRVyACczAAnwtgDxKAYQOsOHIeZDxjGes13RYAFdzMYQFJkDlGfghyAyoxB7McGQagKMS+mBAmJkM1HQYQQsI3usMZqCFKyNyacCyWAQbznEEM7hAyWSeQJuvoALNwAIKUNBCC6b85hvAgQ2J2MEO5LFkG0/AAipILXNOAQYLxBaRN1hEOxqgygWseQYNaEBQfZCCFHxIBW8otTwYPYAUGGITIIi1rGP9BplB6da4TkhAAAA7'
    Return Binary(_Base64Decode($Merlin))
EndFunc   ;==>Merlin


Func _WinAPI_LZNTDecompress(ByRef $tInput, ByRef $tOutput, $iBufferSize = 0x800000)
    Local $tBuffer, $Ret
    $tOutput = 0
    $tBuffer = DllStructCreate('byte[' & $iBufferSize & ']')
    If @error Then Return SetError(1, 0, 0)
    $Ret = DllCall('ntdll.dll', 'uint', 'RtlDecompressBuffer', 'ushort', 0x0002, 'ptr', DllStructGetPtr($tBuffer), 'ulong', $iBufferSize, 'ptr', DllStructGetPtr($tInput), 'ulong', DllStructGetSize($tInput), 'ulong*', 0)
    If @error Then Return SetError(2, 0, 0)
    If $Ret[0] Then Return SetError(3, $Ret[0], 0)
    $tOutput = DllStructCreate('byte[' & $Ret[6] & ']')
    If Not _WinAPI_MoveMemory(DllStructGetPtr($tOutput), DllStructGetPtr($tBuffer), $Ret[6]) Then
        $tOutput = 0
        Return SetError(4, 0, 0)
    EndIf
    Return $Ret[6]
EndFunc   ;==>_WinAPI_LZNTDecompress


;~ Func _WinAPI_MoveMemory($pDestination, $pSource, $iLenght)
;~     DllCall('ntdll.dll', 'none', 'RtlMoveMemory', 'ptr', $pDestination, 'ptr', $pSource, 'ulong_ptr', $iLenght)
;~     If @error Then Return SetError(5, 0, 0)
;~     Return 1
;~ EndFunc   ;==>_WinAPI_MoveMemory


Func _Base64Decode($input_string)
    Local $struct = DllStructCreate("int")
    Local $a_Call = DllCall("Crypt32.dll", "int", "CryptStringToBinary", "str", $input_string, "int", 0, "int", 1, "ptr", 0, "ptr", DllStructGetPtr($struct, 1), "ptr", 0, "ptr", 0)
    If @error Or Not $a_Call[0] Then Return SetError(1, 0, "")
    Local $a = DllStructCreate("byte[" & DllStructGetData($struct, 1) & "]")
    $a_Call = DllCall("Crypt32.dll", "int", "CryptStringToBinary", "str", $input_string, "int", 0, "int", 1, "ptr", DllStructGetPtr($a), "ptr", DllStructGetPtr($struct, 1), "ptr", 0, "ptr", 0)
    If @error Or Not $a_Call[0] Then Return SetError(2, 0, "")
    Return DllStructGetData($a, 1)
EndFunc   ;==>_Base64Decode

Alles anzeigen

War nur das ersetzen von $ghGDIPDll durch $__g_hGDIPDll und das auskommentieren von Funktionen die zwischenzeitlich in der Standard GDIPlus.au3 vorhanden sind (Teile sind ja auch von dir).

Also ist Load_BMP_From_Mem das was ich brauche ... mit diesem _WinAPI_DeleteObject / _SendMessage Konstrukt.

Danke, ich teste mal ein wenig
BLinz

PS: Was mache ich denn beim SyntaxHighlight falsch? Alles grau ...

**UEZ**

Die Beispiele habe ich nicht aktualisiert.

Nicht nur, dass $ghGDIPDll nun $__g_hGDIPDll ist, Load_BMP_From_Mem ist auch integriert -> _GDIPlus_BitmapCreateFromMemory().

BLinz

Zitat von UEZ

Die Beispiele habe ich nicht aktualisiert.

Nicht nur, dass $ghGDIPDll nun $__g_hGDIPDll ist, Load_BMP_From_Mem ist auch integriert -> _GDIPlus_BitmapCreateFromMemory().

Danke für Info, ich hatte zwar gesucht ob die auch drin ist, war mir aber nicht sicher. Somit kann das erste Beispiel dramatisch gekürzt werden ...

**Alina**

Moin.

Wie spreche ich das Bild so an, das ich es als Variable "$_bildbeispiel_jpg =" ansprechen kann?

Quellcode:

AutoIt

#include <GUIConstantsEx.au3>
    #include '_GuiCtrlSetImageEx.au3'


    Global $sImgPath = StringRegExpReplace(@AutoItExe, '(.+\\).+', '$1') & 'Examples\Helpfile\Extras\'
    Global $aPics[2] = [_Test1jpg(), $sImgPath]
    Global $iCount = 0




    ;Code below was generated by: 'File to Base64 String' Code Generator v1.16 Build 2014-06-05


    Func _test1jpg($bSaveBinary = False, $sSavePath = @ScriptDir)
    Local $test1jpg
    $test1jpg &= '/9j/4AAQSkZJRgABAQAAAQABAAD//gA7Q1JFQVRPUjogZ2QtanBlZyB2MS4wICh1c2luZyBJSkcgSlBFRyB2NjIpLCBxdWFsaXR5ID0gOTAK/9sAQwADAgIDAgIDAwMDBAMDBAUIBQUEBAUKBwcGCAwKDAwLCgsLDQ4SEA0OEQ4LCxAWEBETFBUVFQwPFxgWFBgSFBUU/9sAQwEDBAQFBAUJBQUJFA0LDRQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQU/8AAEQgA0gDmAwEiAAIRAQMRAf/EAB8AAAEFAQEBAQEBAAAAAAAAAAABAgMEBQYHCAkKC//EALUQAAIBAwMCBAMFBQQEAAABfQECAwAEEQUSITFBBhNRYQcicRQygZGhCCNCscEVUtHwJDNicoIJChYXGBkaJSYnKCkqNDU2Nzg5OkNERUZHSElKU1RVVldYWVpjZGVmZ2hpanN0dXZ3eHl6g4SFhoeIiYqSk5SVlpeYmZqio6Slpqeoqaqys7S1tre4ubrCw8TFxsfIycrS09TV1tfY2drh4uPk5ebn6Onq8fLz9PX29/j5+v/EAB8BAAMBAQEBAQEBAQEAAAAAAAABAgMEBQYHCAkKC//EALURAAIBAgQEAwQHBQQEAAECdwABAgMRBAUhMQYSQVEHYXETIjKBCBRCkaGxwQkjM1LwFWJy0QoWJDThJfEXGBkaJicoKSo1Njc4OTpDREVGR0hJSlNUVVZXWFlaY2RlZmdoaWpzdHV2d3h5eoKDhIWGh4iJipKTlJWWl5iZmqKjpKWmp6ipqrKztLW2t7i5usLDxMXGx8jJytLT1NXW19jZ2uLj5OXm5+jp6vLz9PX29/j5+v/aAAwDAQACEQMRAD8A+D5ISFkOzIJA246CtPRzH9nlJRN6YPNRyx7oBt5U8YHJPBqzYxxXFvKhBUrjP+fWgCnqNrI7hiqqrZII7d6uXsTyNA7tFhkCu+BxzWlf2iPDGcYQMFweM54NXrjTogBiIOQMBvvAUAYEEBS4Ro0Mk8bbmCn7wA64xXRRwTnTt4tWQPESpxgcgAnB75p3hvT7c6iDjezqQWk+V+nrXYt4dnmtjteNVaLI2jBb5h+WR+tAHhkt35NzFBMgvLNflmJXaAckAZ7GuqXQ5oNJnf5Y7RXVVj3A/wAWVOe/BIp2qeFLga9PbJa7IEjMjvIe+SMnjrmtXTbTULi1aGRVQERAcgB+cZ47YxzQByvhbSrmTXrea5xI8m6PLtyzZP5V6TaeHG/syK0lt8TbC6yBCFY7m4Pbqc11PhvwtBHvaSJQEff8q+ZhsYXBP0zVqGa7j8O/ZppC6rIwEiYDoN+AR7Y/lQBwmoaRLDc3CMq7lgVAkgCnLJjjPQdse9ReKtFvk0qO9gVYJGiQyIW+Z0IDEjPHb9a717DfrzOZxPNLCqvOyEpNwo6euc/hW94i8PPr2mSIsuQVCIAB8o2YIHftQBwlpb6hq/haxktEt41m8wHIOeDxyB6kVl+N/BsmmeJEu7WCecXMa+e3ccDsenSvSdC8LXM8dnCgG2JQ6yW7EAKc9R6g/wA66/XNH3arb5RDmMglxgsMHHoBz360AfOvh7w9qEutSWmJYoUmZ0DYGTwc/wD169MudCbUGgjkRlCIysCNucjHUelbi6NDZa7C6ORh9m0jg5Bx/LvW3qto9tp3nRqsvzrwCPuY5xQB4x4o0vyXeQRhpWQRpnogU9c/n+dU9B0SeG2Bk2KoYthOPpXc+IdJdnRltzPHtKsF5JGeAfatbQPDsaQ+bNGqD7u0DuP8igDB+yRXasVGAAAex+tZur2rWlowRAw2kepruxpCyeeyn/vkdv8AIrN1HSw4yAxU9cDIPtQB5q8QktzHI2X/AIgFwc1gau083yoCFQjp2Feh3OhI8rMgY4G0r0qvd6VE1vG/2fGAcjFAHBBSIpDsOF6luay30l711L5ZBxwCOK9A'
    $test1jpg &= 'utOUQOCiLt5y3rXN6lL9nt5tsqsqjGVxz+NAHE6rpKwySeSRgY3An8K5TU9NMCfMI2y2Aa6q9uHG4BXIXB3nt7+9YXiKBwgUdGcMDnP+e9AHLpYj7U/7sbE4NQNaATYXlSM8nHFaKmWKT5XU7jkjFI8RS4+ZAFKkbhzk/wBKAMaW1E8zL1K/yorSsk2yzNjHOMGigD05bYyRHhgQnBx0x6VsabbtHaTBlaRSAoAGAahs7n7RMkfKgMcFRngjpXT6Onl2qptGcE8n6jr+VAGU8yzLtlDAK4wAOa3dC059Se6jCLsGSqnrnPJ/WodP0hrmZ0HDFwTnn9a6q2t3trvyoCVXcHI2984/yKAKtt4TlhneRnEqGPDOOAvHOQP51vaHDFZB7VCWVk4ml5BAA6Z/zxW3pl2fJ2vCssroVJUYz6Cr+j6YjBGnCyFWYgBOntmgDJ13wy0+lyX6TRzLLGELxjcSAcjA79cGuV07wM4ldnbyhKAiui/KM8jacdR05r1az0uzurB4V3pIHJRQSoAP8vpW/F4XaSxto0jURl1kCkE4IHX60AcB4J8I6lHdiL7c0lqpYGOT5jgD9Dmtm48HW0sl5I0RmUoAARuU/NngfjXd6Z4WOnWskxjxcO33c+/X261e0rwxI1002WVGyhU9McdKAOCPh6PUbWFJLbykih2AxjlhnBGD9B710Fl4MtoIleNfs5jj6nJIAH69K7oeGoXk4DLz37VbstBNncb/ADcq2VG48D8KAOV0bR1gVCsKGZwSskYwAvGMimeLtNEiafcSyKkUcnlsJR8zhsAnPbv9a66WwjtJQyKC6nqOSOew/Gqnia1iuNNiM52GNhkgDjn0/wA9aAPIbzSxF4sg8qd5IGIY7ugIGAAPTmlv7fz7UAF7eYFWdY/uYyDn68dK6PVo7a4v9KZisJZtsjL1OCe361eXRYdiohHTDEHPHPPNAHPzaZD9gw6IS4AZlIB564qGztIQrxqysDwQenHTmuluPD7XMUoMUaQ45cN1Prmo9O8LCNnUyKCO4OSc0AYQ0WNQxBCsRyR0IqnNpIiG2RdygZBFd0+geWPkbkDByKyNS09ogAcsGHcdqAOJn06EM4Ow5BK8dK4nVNNktZGa33BMYJPIxnqK9J1C3jhkw/AI6gda5vVLRzgLtKkDCkY6GgDzzVQ11aShyVfBxt7DPHFcPdWzOpDkKpbH3eCe4r1XxFFEto5hYByp44wDjtXluoatb4XbImcgFFBIJ9frQBj3mmlbSSRNgAThOxrjNSR2LoH6OCx7Z6Y/Wuu1nU4ybiVVaPcmGTlsnHp6VwGrX7RTPt+6wBb5cUAV/s8cdwHPdsMR2OcfjT7mFFYnac+nUCooj9o25LKpbOTxipL8yKzSb8fQjj8KAIlUqSAc+gA7Yoqot0fmbGAT1HNFAHrWlwKswPY9WXJ+YjoK77w4m92Dp8q8HJ6g+lZNvpfC5iEbE5AxwB9K7nwroUIhVG/esGzuf60AJawRrAMFcg5AX68Zres4UhJkYJuk5YqRx+FSjSY0CnBUK2Ds+vWt3T9FFzdSSMQ+5cLkYC9OooAPD+lw37hWDKxOM9BjtxXdaHobxKVeNS/djWbpOkNZ3SqqLIqnIOOld9YWu7ynAy2MnAoA5qXw+qXPljkL0GK7LSbU/ZYlljAZcdOlTWGl77iSU8uT1rfs9OywyOOtAFRNKWUNkZJ6AdquWelBQRtwDWxa2G3jFaEVjtGcUAYzacPLA6Vnaiwt0OW+VTkcV0l2oiQ4rmdUVrgMB0oA5HVNWY3AGTj+InisHXdWmexkVjgMMgKewIP8q6q70USOG2g/UVn6toxaycsikpGQCOooA8t1y8zJbSSH5QwYY4xz6VoS+LpNKdp5Ny2alQ0+BgZOMnPOOau33hBZBC0zvvDq3TisHxL4auNWsjC8pESSKXjUD58evtQB3um+IrC5gaVZklBBDEDPpxxWpYQGWVyBmN3BVsHvXnHhV/7It1gM'
    $test1jpg &= 'YiWM8gHt6mvWfDMyXCFm+bce56UAOvLMeWxAwf51kz2ImtwOWHTkV2l7Yb3Q7cfL+BrKubXYGJA54OaAPL/EGjIZgQ2GIyR71yepsVkjQTeXjGdw7GvWNWsA8RbyxwCM9hX5xfGPxZ4n8M/GjU5J9Su2Fle+dZxGVhF5Gd0YC5xjbgH8c0Ae/wDxK1vRNCt0e/1CO0MgKIXP3m74FeT3ENvIiPbXaukjEq8fIIPQ4HsKzf2iWPijTtB8S2j+bYTR846pvAIz/wB8kH3rmPhCxvU1CAsMwoG5bGUOcj8/50Aakt663sttPK6nHy5OdwPPrWZrtxHc6huk+dwqjKnkL246GuouvDAniaSONo5mz5aLyR1Gencc81x2vhPD9zam6zh0KbtvJIOCf5UAMmnhht1VopFCy+WzqMAHn/61On0m2nVnUyFh/Fng1sx2qzQQRuyOpbeH2c44GM+/WppNGkWDeSWySCg42j3/AEoA4S7gFuvChRuxnPJorbvdI2HYA2xTgEj2ooA+noNIW4lKuhXHIrsdC0lUyw+UccZxmm6ZaBnG4A9uK1dW1GLw14e1LU5IjJHY2sly0a8bwilsZ/DH40AXbHTInEigjJ/HvXQ6RppgfzO56/nXiv7OXx1m+L+satpWo6da6deWsQuYDaFtrxbgpBDE8gsvI656DFfSlrYBQuSu0juOtAFjTLGPlti5J6gdaxPH3xp8D/CG4sLXxRrSabPdruht44XlfZnG8hAdq5BGT1wcZwa7PT7UKq5KqMcknAA9/avy7+Jer6n+0L+0HfrpIa7m1bUhYaYhPAhUiOL6DaAx+rGgD9XvDFxY65pdrqenXMd7YXkSzwXMJ3JIjDIYH0xW7Y3Fnc3s1pFdW8t3CAZYElVpIx/tKDkfjXg/xd8Y2f7J/wCzRaWOn3avq9vYx6PpLNgNLcbMNPj0X5pPTO0d6+Yv+Ccfg3XvFfx2vPFhkuTp2l2k5vrp2JFxLMCqxsf4iSS5/wBz6UAfplBZ4OcVaa3KrnFW4YMY9allhOwnHFAHK3sZdmFZ7WIPUA10c1ruY5FRGz4PGaAOXm0wFTxj3qhdabvXG3IxXYyWfHAqjPZ8Zxg0Aed6npTOmNo4bIBHSuavtEcNIE2nPWvUbyxyDx0rCvNPU7ht5+lAHmF1ZAXH+q2sAAcdDiuu8GhY/kBIHHANO1LTkAOFBOPSpfDsCRXagAZzQB6FHADGpxnAxzXPeKdV07w5ptzf6nd2+n2MI3SXN1IscSDpksxAHNdjaW2+3BHpXhH7YXwm1X4p/B3UNL0Us+pW0yX8Vspx9oMYbMf1IYkf7QHrmgDW03xTofjXTZbnR9UtNZsixTzrK4WVAw6qSpODyOK+Uv2y/hILnw3B4rs4i1zpx8u5I6tAzcE/7rH8mPpXhP7P3xlvvgb46ZruOZtGum+z6pZEEMADgOFPR0OeO43DvX6D6rBpHxF8Gu1vPFqWj6palRJE2VlicEHB+hPuD7igD87/AIZ+I7bVtCvvCOplQLiNvsUrjIVjyU/P5h759a47wvrc3g/xIssinajGG4j9Vzhh9QRke4qXx74Rvvhz421LRLkslxYz4SUcb16o4+qkH8aztbmGoyJqI+/cf64DtKPvH8ev4n0oA+pNPt4dU0VZVKOAqvFPuyWBGRj/AD3rx746aSLK4sJQOpYE9iSAf6V0nwF1/wDtbSZtInctLZHdED18tv8AA5/MVn/tBMRBYqWZj5uRu4420ATeAyLjSdOlYA5jGWY56ZFdHqGnCaNDGiqQRnZ3OOtc38Iit/4XWLIMkLuvzHHGc/1rsrhZFDFQEHQZPWgDlp9PMjt+4D4IxuHQYorRmklSQrn5u+GFFAH01ptoExlWz3wa2dR8OJ4i8Palpu0k3lpLbjJ/voV/rVPTIWEj5JJzxge1dnpMAzG3JYUAfCX7F1+LD49afbSMUF7aXNsR0yQhcD846/SW1sVIGRnBr8unv/8AhT/7S8t3gx2+'
    $test1jpg &= 'j+ImYgd4POOfzjJ/Ov1Z0iOO8t45IjvicBkfjDKRkEexoA8V/ay+J0Xwj+DmoGCTZreuB9OsUDfMNw/eyfRUP5steD/8E8/h5pkFx4p+KevyR2+meHoXt4J5uFicxl5pfqseB/21rx/9rf4ut8Xvi/fGxnM+haSTp+nBDlXVW+eUeu98kH+6FHavQPjprknwK/Z28H/Bq0cw67q8Q17xLsOGTzCGit298KmR/wBMl7GgDz745fFvXf2qPjHZw6fDL9jlul0zQdMJ+4ruFUkf33YgsfoOiiv1Y+DXwp0D9nz4V2Wg20sFvZ6dA1zqOpSkIJpdu6ad2PQcHGeiqB2r4L/4JwfBA674zu/ihrSpa+HvDSyLa3FwQsb3RQ7nJPAWKMliexZPQ1m/tm/tr3vxeur3wX4OuHs/A0T7JrlQVk1VlP3m7rDkZVOpwC3ZVAPYNB/4KFa943/ac0Lwr4W0a0vPAuoarDpaeZC32ydHcI1yG3fLjJcKRjaOeeR9+TwZh6Z5618Uf8E6f2SpvAemJ8TPFliYvEGowbdIs51w9nbOOZmB6PIDgDqEJ/v8fdTW25eaAOZmhw3IzTfIFa1zbYY8cVW8jHUcUAZj2oPSq09ouPmWtkw8Hg1Xmj4OeaAOYvbRQ39awtQtF5wOK7C8jXnJx71zuoR8NjqKAOL1CAANxmszSnEOoAD1rc1NfvYIHHWuatpCmoqAwJPpQB7Po2JbVcelM1Cx8xGxz7U7wuhexXJ7VqXEOB1/GgD8+f22/wBlc6it54/8K2eL+MeZqtlCvM6gczqB/GB94dxz1Bz84/s8/tBX/wAJtXTTr+aW48K3cg+0W5JJt2P/AC1jHYjuB94e+K/WzXrdXjkBGfpX5p/thfs0nwPqU/jDw1akaDcvvvbSNeLOQn7ygdI2Pb+En0IwAaP7XPg2y8W6FY+NdGkjumgjAklhIIntm5VwR12k/kx9K+TI7gpBLERlXwfoR3/LI/Gtiz8da9p/h+50ODU500m4BD2pOV564z93PfGM1hUAbvgrxK/hTxDb3w3GIfJKq90PX8uD+FdN8XvFFt4gn01bWZZ0VDKzqcjLYwPbGDx7155RQB7D8El+0abcxhyrrPjAHTIHP869F1eG4iUoHHyDkbQMivHPgprP2HxMbRslLlcgA/xLz/LP5V7Hrd8mJTtY8HgHvmgDn5Y1aVsTOH4ztUdKKz3vjLdPuVc7FJycY68UUAfY2nLunkUfKvHUf1rq9IBD53F8H7o6isvQ2jkRWToyjk/4V0VoUs7nKxF9wAJUc+1AH5//ALaWiQ6R8dL6WHA+32dvduB2bbsP5+Xn8a6iH9uTXLH4JReCLPSPJ1cWP9nNrpuiSsWNu5I9ow+z5cljg89enln7RvxBi+Jfxh8QaxasHsFlFraMDw0UQCKw9mwW/wCBV5rQBteCvEUfhHxfo2ty6fBqsenXcd0bK5JEc+xg21iOcHFdLf61qf7QHxojvNd1O2sL7xJqkcc17cvst7VXdUGSTwiLgDJ6LXAUAkdOKAPtv9rP9obwz4H+G1h8C/hNdpJoVlEINX1S2YMs4By0SuvDl2y8jDgk7RxuFRf8E7/2T1+JniEfELxXYCbwtpM2LC0uFyl/dL3IP3o4+p7FsDkBhXz9+zP8ELv9oD4t6V4YRpYdOybrU7uNdxgtUI3sP9o5Cj3YV+3/AIV8M6X4N8P6foeiWMdhpVhCsFtawjCxoo4/HuSepJJoA3IU56HmrqR7h05qtbzK8e85XH3gR0NaMADAcUAZV5bYJ44qg0OCeK6O4t9ynvWPPGUc8YFAFIwHPSqtxb4B3GtTbt5Oce9VLsA9SR6UAc3qBVAR94e1czfMCGbGcjNdZfyBEYBlUgfx964rUJDulwQVIP8AOgDmNVI+fHFc7p0Zl1ZMjv8AjW7fMWL5Gc8da0PCHh/7XepIU5HegD0bw7b+Vp65HOKnnYlyQOBWrZ2At7ULjkCqM8Yy4OPm7UActqxC'
    $test1jpg &= 'xOCMZ59q4PxNocGtWlzaXMKT29xEY5InXcrgjkEHsQcYrudas5Lq6eNMB8YGeh9a5q7ja2eRSRFJnnzcg4z9aAPyk/aN+DjfCLxs0Nsrf2LfhprMtk7MH5oyT125GD3BHfNeUV+g/wC2h4Oj8Q/DPUL7fbNc6VIl7FsJLEZ2uOnTaxOPVRX58UAFFFFAGh4f1E6RrdleA4EMqs30zz+ma981nURqEULQlRIiZJUbcnA4+nfNfOdegeFfFzXUcVpKAJkUKH4JcDgcHvQB2MEMw1CVZUViYkYbTjjminabH9qvXZkkIEKgHb9c0UAfafhyS2+zs3mhccAHgg1y37QPj5PAvwk16+hmxfXMQsLRgefMk4JHuqb2/wCA1t+GtKMrRwsqMn3ydn/16+PP2rfiYPFHi0eG7HCabossiSBCdslxnDNz/dAx9d1AHhR5NFFFABRRRQB+pX/BLn4Zw+G/hJqnjSaHOo+IrxoIpCOVtYDtAH+9KZM/7i+lfcNquSD+dfL3/BPXXrPWf2WvCcNnKjS6bJdWd0i8mOX7RJIA31SRD+NfUFu+5gNygCgDRjiRk5GDjrmrkQAPBz71SjYkffB+gq7bH5eooAsbcgZ71RvLUEE4yPatBOtJMgdD296AOYlA+7kECs2/mKJknGRyea0dSn+zSneMoTgMB0PasLUr0lmQbgcehoAxdY8+RSE8thjJyeR+lcvfMvluD/dJ4I4NbupXDRq0jZkyMELxXKajdp9nd8YLDqRQBgzyeZNtGAOvFekfD62Hlq2Oorygzb5yQw65xXrHgC/j8pAW5xQB30iApgd6ybi3XcSSME1ptcLszkVx3xI8WjwZ4I8Q6+lubyTS9PuL4W69ZTHEz7fx24oA5H4n/Ebwp8K7D+1vE2s2ekQO+Ee5k+ZwOyIMs5x2UE189eI/29vhDqMnlC91GZVGFmj0+Qc+2cH9K/PTxh4u8X/HHxxPqepSXviHXL1zsggRpCq5yI4oxnao7KBXpXhX9iv4g6/p32zUFsPDiEbhDqcrCbHqURW2/wDAsH2oA7b9oP8Aas0Lxr4V1PRfDst9eHUEWEzXEXlJFHnLZBJ3EgY6DGTXybXs+u/skfELSYWms7Oz1yAZ+fTrtWbjr8j7W/IV5lrngnxB4ZkKatomoaaw/wCfq2eMfmRigDFooxigAmgApyM0bBlJVgcgjrThER1GKcVHpQB12geOGtt32stv2gbwPvfWiuSCUUAff3xd+LFp8KvhzeXFhc51m4BtrENywlJ5bBHRRz9cDvX5+zzSXM0k0rtJJIxZnY5LEnJJNeifGjx+/wARPFklwjE6XZL9ms4yMAIDy2P9o8/THpXn2zeCVGKAIaKUrg4pACTgdaACivePA/7E3xT8cW1vdLpVrolpOAyy6tciNsH1jUNIOvQrmvonwL/wS3hYRTeLPGckgyN9tpFr5Y/CWTJP/fsUAfDfhfx34l8EyySeHtf1TQ3lxvbTrySAvjpnYRmuqP7SPxYIAPxK8WYHQf21cf8Axdfqn8Pf2KPg18PhHJbeDrXWrtcZutdc3rH32P8Aux+CV7Tb/DvwkLT7OPCmhfZtu3yf7Mg2Y9NuzH6UAfkz8Gf+Chnxb+FmrwHVNbm8baJuAn0/XZDK5Xv5c5/eI2OnJX1U1+uXwR+Mnh346/D3TvFvhudpLG7BSSCXAltpl+/E47MpP0III4NeS/Er9hn4NfFC0kW48HWmgXrA7dQ8OgWUiH12IPLb/gSGu9/Z2+A3h79nDwAPCnhya8urd7l72e6v3DSzSuFUk7QAAFRQAB29STQB68rYqQHNVY5hjmklvUhXJNAGbrykR7goOO1cFrN26kEKcHriuw1nV0kjZVIz25rhNUvAHUEBgeMN3oAwb3UA8DFmIJ471yV4srW8jFxjHQ9a39QaONGdbcpuByxUsPyrMljL2wJUAEfp2zQBx8okjDMQCPXOKt6Z4wl0mVAGxx60+6t2+Zd2RnHSuZ1Gz2TK'
    $test1jpg &= 'Qxzj0oA9Nj+KgEOWftWJrXxVSS0uAXDhV5U989q86ukeOE/MOnU1zN6zNNJhsDjPPHIxQBtWXjXS/C08q6fpGnaYkrbG+x26Q7ye52gZ+tc5efGYzSM8GG2MRlfX0yfrWH4mmWG4TnyWPRweTyOg9a8j8caYbQOguDCJ5nKK7dR1LflxQB6Bd/HK5mkkljijhYNtOOA2Tjtzn/CsTVPi5cTRSRSTktnAQINuPXmvL/7PvRGhguRKNm7kYOc8g56mufvWkRyZtyN0AoA6LV9X029u3Z7CxmZ8Es9um8YPUZHWuP8AGGk6RqF759rbx2Um3LeSoVG/4COPyqpe3ALg88dPpWZeXbFVBY0AY1/ZLb9CD9DmslzyRmtS9kL5zWW4wxoAN2PSimmigCw0ueAQKfDtJPSodoJOR+NPijVvu80AMePdK/pX0f8AsO/BSP4hfEn/AISPVbcS6D4fZZgsn3JrrrGhz1C/fP0Ud6+fdO0e41nVrWwsYnnvLqVIYYk6s7HAFfpv8Bvhgnws8IafosGpyRzrG09z8iMkk527yDjnnA69FFAH0XYXzyBwx2kZ4Zjn+VbMU2bdQZPmDjpxmuT0/wA2MozTpKrcdCCTWs+ox26qssg4YHIPegDpoG3gHnPPIxWzaPsTB6gVyMF6rkOGUdsbj0/kTUt34rsNOQtcXkcW35iu4ZoA7Rbjy8EYPfnirK34HPH514d4h+NttbqhsQJ2kO1JJGAU++B25qhY+OL7WkMlxfYBYMIoxtAHpx1oA95m1+NOAQxH90g1y2ueLTH8qkj0JPWuKe+lkKvHNwrcgnt780y6lEskYlMh3j+9wcdeKANz+2GuFLMSMkcZGazNRvLZZ8zssbZ4LHFQQ6Da3ACyPMqtztWQrgfhRc+GLGBE228c7L917h2Z/qSaAMO912yCmGO8JDHGxeRT/MEsBdc84G48Z96kl0m3jl2LaQwJtwoC7frT5LcRxF1xtxgf5NAGFdRgk88Z7+tc7qSDzFye3WuhvsJuBUjGTiub1KUDYRySOhFAHOa1KI4yoOTmuPu7l4A2CTJn5vqfrXTavMFJGM9+f0rmoLhL2a4VowMbcjrmgDkPEd9PK5cIjoqswYnGD0B/z6V5zreopdW1p9otgWgDYVTz8wGc+ozXq2tW0c0cgig3llYL0ypJwa4nXbSOzmiiVCUdMHagJ3DHU/TPagDgSbaZX8iRCWTG1SRtPfvXOzwkSYdhg5B9iP8APWu/GmWskj+WgWULtIK4B47GuZvtH+yyo4/dohyVA4oA4zUNN8ne33sd+lYd5Ftb7pz712mpwlg2RkDuOa5nU4wNoxQBzlzESp4rLniKnpW/cBfu4/Gsy6jG4+tAGURjqKKklQE5ooAkjfqOx7U+OElHZM+9QwwM5wCcmug8JaLNe6llo2lhhG+SPzFj3c9MtwKAPo79lb4OXFlew+LNQs5C80DrYOdp8knAEmMjkgtj0+pr6+sLlUEMsMh2KpjLNHgdj/e9RXzVoeo6xaNBPa63/o0ca5iLWwJbHB28DA9QeQPaiX4g6hpdjM39ohczt/o8giUA46jDYwetAH1zaeMWeCGNo3Zsj51HAxUXi3xva6DYCa7vGWIlSG8sE5z7e9fHulfHee385Fu1M4IyrINuenZ/esnxX8Qdf8RXUXm3SPCNrAIpyOfQ0AfSWs/HLVL5vL0q+it41Yg+dbvuYe5yQKwrbXtY1ppJZby1yPl8w27HdyeSSfxryrR737RAWkjiHGS8bENkV03hnU5oYzCUciPG0iQgMSfTtj3oA7G28O6tJND9o1iO5jiUnbFFtxyOMgjjtXZwacljASLllWSUEoZPl6kArkkAc964LTvGXmapcaeXlV1jLMd5UYPAUZ6tXW3exLP5EUYAJYncXJ/DHr+dAHZ6en2KN0LvJJGQrHzQckfQVu6ZcwSSrGwl3vnHJ/DnHHpXC6bfJNqD+YGjMi/Kh3DAB4J/P9Oa6K11CJGgCjDF'
    $test1jpg &= 'c5EnX2wT7UAdxHefZhHEWTzeSVLeg561cmuiOQTuJGOeBjrXPQTJIFBJ3g4OeSKdqV4FVdsgBB6EdPr7UALql5HIzGSRWAPTGdoxx+NUkuibQiH96m3A7YqjNdLPEUM53gsrfIefx9fei2d4oCWb5ScEdOB6e1AFe7uC67G3AjoD1rltYuGM4GegJGO9aWp3incuTkHI/OuR1fUWNzGuPlAIY5oAytav/JmHm/K7ZyBycetcTp3iGIX8+0r5rHgE8Pj3qfxrq4l84oxDRLypbHNed6bq9va6sqTYhO7KqwzkbcZz9TQB293q4uIprqSMRmJ9oQY4weh55zwa4bXfGi3OoskNsC6pjGQSOcZxWs+qxzJJlgrh96/MM5A964/XbiGPUpJmhEYiwofHO3nrjkmgCoPEc0bsWtZAoYAllwfTP5VDq94rKG6BuOD0NZ95dtc3MqpOqW+RtV/0xVa6x5ZY5YDue5oAy7+9RVY5wcHkgVzuot5oXBHX0q9qEplckHPUEYrJuz8qUAZdyg3cc47A1nzoMngir8yjdxn86oTnDEZoAoyxhTwTRT3wfrRQBY02HfNhhxjNeo+DPCltfwRyvGz282UdJWwCT3zg4FeZWxZRhGAbpXS6R4jvbSJY1kc46AHrQB6b4l8VnR4rS2gd4o4kaNYEfIj+XnacdD75rzm61G41a+uZJVEMZLOkeeOT0/Ci51S6ubhWb5uDwR7VZsbee4G84AAHA9aAMqwjaC8LRRkzMcsz/d/EV6JpdxKwjjaN2BwchuD9P8Ky9LE5L7kXIIIbHBFdW/72KJRtRxht2PQ9KAOn0mRooGXnnnbtBz+Na+nLMdzSSyKM7vLjXn8SDXOaRPdE5IijB67epGK6PTJrqN3cpERxgZxQB0ujWWyCKRFmdsjGXwD+nr3rvIr68OnvFLGxVx8sYbG0Dp29q4mw1R7dQU8lWdRjceQPeuhtNYlMOCkfPUFjgdsZ6elAHWWVywtYttzcQgqNqnDn2/I1uaZdP56yi5DndgeYncDFcdpl3cwIitFGOOMPz/KteLVriNQnlqRu3bA3f8qAPRLXWhD800kak4AHTPrVfVNfgicbpEKsSMj5jiuZt9ZuJUQvDGVOcDeOD+VWZb54oml+yqGX+66jNAFiDWraGad1V4l3F8HO0nGMj26cYxWsl8JtNgZtqLtwBnPH1rkLrWLhCyNYBkLEsd67senJqQ6u62qoLaZVHKYK9MfXmgCvqV8rXEsahvvDBHQdeK5PWrtlu+Ny5QkFefStTU9SKSkmIhzgDOP8a47X9Y8lxIofOCM4yDz9aAOI8YLPdXLcMdx+8px27iuX0K1eK7nFyHMxZVV2iLIOv/1q6nVtUS5bzJIxgk5wD1rnNK8Q2891dRSFmYFVDrwFUZ/KgDaFkrXUe/ZKsedwYYYdwf5/lWX4oltHz/oL3MknykooOR9fWrB1qGS0zE67lJO4HBbr+YrkB4lcXl0Af3afIASNxJ5yB6dqAM2ayWGTfHtdVbAEgKnI69qr6jvER6KRznGTWleaxG0ZDAuxzn2+tczfamvO4YJ7UAY90j5ck8Z6VkXTE7RwAKuXl+vOOATWPcXILAj1oAZLncTVR4GZulX7eI3DZAJFb9noGUDvx35oA437DJk8UV3T6GoHynnNFAHn9rMUHAxxWzpgfAyx56cVhW/Fa9lIEUCgDrbKJA0TNnOa6Oz8tYTyB9a46yuRGAc8jpzWxHqKCM7iR+dAHQwyBEYbuPYYqxb6ghcBn/HP1rlpLsSD92/B9TxUyXSu4AZRigD0LSbn7xb5gBgGupsrwIu4g7sDOK8x0e7JOfMbjtnIrprbUVjRAZnBPbd09qAO9a+T7NgKMbf4QcfjirXh+7Q2dsrNkBAeWJrhE1MtExFxIIzwQMZrd0y9AihXecAYOOD9PrQB6VYXzFFUMw9s88/Wta3vhIM+YdoOOMV53bakQVAndeDgMw/wq9b6tIiqFw2D04xQB6Pa'
    $test1jpg &= 'aggbCzfMOo4FXf7UZwyCRSP7rHj6V52usyhd/lqvbhuf5Vei1wcMVckDoO9AHXzahIHk3c4GchsYFNuNZYRwx7flOfm68Y71xkmuBgQySZfoduaVtXU2wkjI3YwS+R+n1FAFjVNZVJWy2AGAJPauC8V6ifLjKOVy52EHknHc1Y1e98wyI5OCeVXqOB/9auE8T6q8AtVMm9UcMAeCMA0AN1jU5EVlEmYB8owhGc9/8+tcraaosN5dNMp8sAZIb5c84z61b1LxL5sbRHhnI6Y/KuKE7XP2qPefLVckk5Ynnr/jQB0cOsZdgzySIj8FiMMMdvbn9Kp3NyjvMGRn3EHdnhff+dc9Z6gI4ljZtu0kjP8ASotT1YRRfIyr14B60AWzqjRGWIyb492F3dfrWfd3YklOG9uaxTfF+DgDtilmvwX6DA9RzQA+4lwecD0qmW3MvfmormYSkFSQPrTrZ9zjPI7UAdX4dtFbDPxXRSSogwDj696xtKmWK09/anXF62N3T8aAJZ7pg2A2OaKxp7neRuJ/CigDkoQR2q7E2BmlSxc/wn8qsJpsxPyxsfwoAmS5KgHPSrcV/wADBwc9Khi0K7kIxHjjuavW/hW5Y5ZlXB5FACxXrMME1YjunyMEMfpzWhZ+DyOWmz7KOtaVv4ahjcOVkf8Az7UAQadO6hj0rXj1ReNxBI5+lVp7SOO3ZowcDjgd6wrq8+yzbcAeue9AHZW2sRscbvnB5Hsa1bXViit85JH4YrzmHVkLj5unXBrVs9bjQn5yWPv0oA9BtNclJyGbA9a0LfxM27ZkkE+leew613DHn0HWrMWvqm0M+GBz83FAHpP9tBVIZSR0GM1PFrwWIhmJ9W3Ywa88TXkkYgOQe2OlSjUlIVwxz14PXt0oA7+fX5GCssxRAOSW7VZ/tuMWuAV+UggDn8a85k1o+W298sRtHOBilGu7ogCw244xwKAOi1HWokuHJB2s3bqOK4zxDrcRuI8oNwPAYZyMVBfa4N7kEbsnr9K4/VNZ81kL4wDhc9hjqaAL+oa5AkWSuM5BFZdnq9rBNO6rjKhOec+9Ymo3sflblJc+o71n2lyCJQPlJPegDdu7lJFQEZAPU96pywpMpUAc85Iqp55Eags2ATzTZrz5MiQn6UAPeFYs4VQT6VVnZGfOOarPcHdneWz70jyHHXJoAWTAGc4qaxZTKA3rVF5c/X0pbOVhIfY0Ad3AY47fAzz6VBIUbjnHY5qvbXW6EZomfao24x9aAIJ3VTjNFRSyK/3jnmigDYgA447VajHI+v8AWiigDYthzVtuMY9aKKAL0P8ArIv901YDsGOGI49aKKAIWJPmZJP7yua1w/vI/r/jRRQBjL2/GrlrwD9KKKALETsGHzHqe9TzsQ6YJHzUUUAXrZiV6mnFiPK5P5+9FFADLh2MfLH86ZC7fZl+Y9fX3oooAytQdvNbk/ePeubvuZEzz8/9DRRQBlzE4HP8NEHPmZ9BRRQBGzHyX5PeoU6D6f0oooAqt/rBSt900UUARnr+FPg+/wD8CFFFAHT2/wDqBVh+VoooAzbj/WGiiigD/9k='




    Local $bString = Binary(_WinAPI_Base64Decode($test1jpg))
    If $bSaveBinary Then
    Local $hFile = FileOpen($sSavePath & "\test1.jpg", 18)
    FileWrite($hFile, $bString)
    FileClose($hFile)
    EndIf
    Return $bString
    EndFunc ;==>_test1jpg


    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

**autoiter**

Hallo @Alina,
Geht es um das Bild aus $aPics[0]? (Global $aPics[2] = [_test1jpg(), $sImgPath])
Das ist doch schon deine Variable, oder? Du kannst natürlich auch $_bildbeispiel_jpg = _test1jpg() schreiben.

Das kannst du auch direkt mit der _GuiCtrlSetImageEx-UDF verwenden:

AutoIt

_GuiCtrlSetImageEx($idPic, $aPics[0])


; oder 


_GuiCtrlSetImageEx($idPic, _test1jpg())

oder verstehe ich dich falsch?

**UEZ**

@Alina ich verstehe auch deine Frage nicht.

**Alina**

Hat sich erledigt.
Sollte mehr schlafen, dann verstehe ich es auch besser.

BLinz

Ich bräuchte mal einen Tipp wie ich deine Funktion für ein Icon in einer Statusbar nutzen kann. So wie bei dem Systray-Icon klappt es nicht.
Das Icon in der Datei hat alle gängigen Auflösungen drin (von 16x16 bis 256x256)
Anbei ein nicht funktionierendes Beispiel:

AutoIt: AutoIt

AutoItSetOption("GUIOnEventMode", 1)
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiStatusBar.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GDIPlus.au3>


$h_FormTest = GUICreate("Test", 300, 200, -1, -1, BitOR($GUI_SS_DEFAULT_GUI,$WS_MAXIMIZEBOX,$WS_SIZEBOX,$WS_TABSTOP), $WS_EX_ACCEPTFILES)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Close")
$id_StatusBar = _GUICtrlStatusBar_Create($h_FormTest, -1, "", BitOR($WS_VISIBLE,$WS_CHILD,$WS_BORDER))
_GUICtrlStatusBar_SetMinHeight($id_StatusBar, 22)
Local $id_StatusBar_PartsWidth[3] = [100, 200, -1]
_GUICtrlStatusBar_SetParts($id_StatusBar, $id_StatusBar_PartsWidth)
;Anfangstext in die einzelnen Abschnitte der Statusbar setzen
_GUICtrlStatusBar_SetText($id_StatusBar, "Eins", 0)
_GUICtrlStatusBar_SetText($id_StatusBar, "Zwei", 1)
_GUICtrlStatusBar_SetText($id_StatusBar, "Drei", 2)


Global $_Resources_Warndreieckico = _GDIPlus_BitmapCreateFromMemory(_Resources_Warndreieckico(), False)
Global $h_Icontest = _GDIPlus_HICONCreateFromBitmap($_Resources_Warndreieckico)
_GUICtrlStatusBar_SetIcon($id_StatusBar, 0, $h_Icontest)




GUISetState(@SW_SHOW, $h_FormTest)


While 1


WEnd




Func _Close()
	Exit
EndFunc


Func _Resources_Warndreieckico($bSaveBinary = False, $sSavePath = @ScriptDir)
	Local $_Resources_Warndreieckico
	$_Resources_Warndreieckico &= '/z8AAAEACAAAAAAAAQAgAM4UAACGAAAAQEAAAAEAIAAoQgAAVBUAADAwAAABACAAqCUAAHxXAAAoKAAAAQAgAGgaAAAkfQAAICAAAAEAIACoEAAAjJcAABgYAAABACAAiAkAADSoAAAUFAAAAQAgALgGAAC8sQAAEBAAAAEAIABoBAAAdLgAAIlQTkcNChoKAAAADUlIRFIAAAEAAAABAAgGAAAAXHKoZgAAFJVJREFUeNrtnV1vG2d6hm/REm2ERiw1kehEjEXRtkgkoqJYThq3J1w05w16LoQ57FGcX6DkF/hQh/Zif0Db8wB1D4KibbJ1vG3hYrP+QL2bGm4tdWEFiT+kHmhmNDMcUvyYj/eduW6AgDmSqVcUr/t5ZvjwvSWEEEIIIYQQQgghhBBCCCGEEEIIIYQQQgghhBBCCCGEEEIIIYQQQgiZpimeguLoV3+tWUkdSeuS3pU063xpV9J3km5Jurm5rV2eLQwA5Qf8rqRPHPiH0U1Jv9zc1g2ePQwA2Qt+R9I1p+KPo1uSPt/c1k2eTQwA2QX/F5K2or42N3dac3Ondfr0KUnSkydPtbf3k3Z2nvZ7uC83t/UFzyoGgOyA/7qkrv9YpXJKa2t11Wqvq1yejvx/z5690MOH/6Pbt+9rb++n8JdvbG7rU55dDABZBv/GxgW1WrWRHuc3v7mv27fvYwIYALII/q6k6+79cnlaH320rrm502M93s7OU3311S09e/bCf/hTLg5iAMg8+OuS/lXOW3uTwj/ABHYlvbe5rfs86/arxFOQG23p6H19XbnSmhh+6fCC4ZUrLf+hWfW5uIgwAJRN9V/3n/c3GmdVq70e2+PXaq+r0TjrP9R1fibCAJABuua/s7ZWj/fRDw601l4a+DMRBoCyqf4d+Sb81tbqqlROxQq/5LyN2A4YS8f52QgDQCZU/3J5Ws1mLXb4XTWbi+EZAroADABlWP278o35ttv1vkM+k8LvGkw7eCqw7qwBYQAoZfgDV+MrlVMjD/uMAr+rVrMWPsXgHQEMAGWgq5Lq/nP/pOH3flawC6g7nztAGABKsfp/5t6vVmfDb9MlBr90+DZjtTrrP/SZsyaEAaAUFBj6abfrqcF/9DMDXQDDQRgASqn6153236v+oWqcOPySVF3o+blXnbUhDAAlXP09hcZ0U4Hf+9kfNgeuDWEAKN7q31Fo5HeioZ8J4JcO33mIGBHu8JfCAFDC1b9cntbGxoXM4He1cel8ePaALgADQAlU/4/lG/lttWrjD/3EBL9rRK3g9CEjwhgASkDxjPzGCL+riBHh6/y5MAAUX/Xvyjf0s7FxYbzqnwD83unIpfP+Q3VGhDEAFA/8s/7qH3HhLVP4XUVckLzGcBAGgCbXVfmGfi5fvmAc/N7aNgJdwKx88woIA0DjVf/AyO/IO/2kBL90uHMQI8IYAIpP1zTJyG+K8B+tsWdEmD0DMAA0RvWvKzT0M9LIbwbwS4cjwhHDQXX+ohgAGk2Bt9JG+rhvRvB7a2X/QAwATVT9OwoN/Qw98psx/JKzOUlwTuFjhoMwADS8AiO/Q5/7GwC//1oAI8IYABq9+nc1zsivQfC7xhUxItzlL4wBoCGrf6VyariRX8Pgd9VsLrJ/IAaARqj+Pfv8HVv9DYXf7QIi9g9kOAgDQBHwB7bVmps7ffzIr8Hwu2o0zoYzCrcYDsIAUK8CI7/HftbfAviPfhdGhDEANKj61/3V/9h9/iyCX4rcP/AzhoMwAORri4MV80Ju4Pd+p0s9XQAXBDEAFBXtHTpnth5+HRxobraixnLVf5SIcQwAadhob4vh9343RoQxABSo/h0NE+2dA/glN2I8YALsH4gBUP2lAfv85QR+V80VIsYxADRctHfO4HeNrr1KxDgGUGz4j4/2ziH8rlqMCGMABdfgaO8cw+/9zkSMYwAFrv79o70LAL8kNZarqi6wfyAGUDz1j/YuCPxHvzsR4xhAsap/Xf2ivQsGvyRVF86EuwAi'
	$_Resources_Warndreieckico &= 'xjGA3Fd/T160dwHh956DD1cGPkcIA8hL9e8oKtq7wPBLTtJR74hwh1cMBpDb6u9FexccfldEjGMAea/+wWjvZk3lmRPA7zPEVnPRf4gRYQwgVwqN/C4Cf0gRI8JEjGMAuaj+XfmjvXvb3cLD750WETGOAeQM/niivXMOv6vGcpWIcQwgVwpGewf3xgP+CF2+xP6BGEB+qv9k0d4Fg1+SarXXGBHGAHKhULT3EvAPKSLGMQDbq39d4WjvhVngH1LVhTNRw0F1XlkYgC0KRnvbVP0NGU5i/0AMwNbq31Fo6GfoaG/g93QYMR6YlyBiHAOwQqFo7yXgH/dawCoR4xiAXdW/G67+Vgz9GPqZhD4jwl1eaRiA8dX/MNp7EfgnVHOF/QMxADuqf3Cfv/aS+dXfgk8jEjGOAdgA/+jR3sA/tBrLVSLGMQCjFYr2Pg/8MWvjUsN/lxFhDMCY6l9XONrb5KEfSzchqc6fUXXhjP8QEeMYgBEKRntfMqT6T+1rqvQieJt63ntsiJum9o0wLSLGMQDTqv/w0d5p8z+1L029OLrpefD+CLepLA3A17EQMR6/pnkKJlIw2tvAoZ+pP/unyfj7+gOjTlfWVs/p7r1H4b/BL3gp0gGkXf078kd7t+v2jPzaoD7XKiqVU1pbJWIcAzCo+hu7z19Odx1uNt8kYhwDyLT6dxWI9jZw6CfHW46XZ6bVXj3nP0TEOAaQGvy90d7NGvCnvO4WI8IYQEbqGfkF/mzWvRbsAogYxwBSqf79o72BP9V1H0aM9wwHMSKMASSmULT3EvBnvO72KhHjGEA61b+ucLS3KSO/Bc4YPIwYD3QBRIxjAIlVf09XPmwCvyHrvvKnRIxjAMlW/46ior2B34h1EzGOAaRW/SMy7IDfgHVvXGqwfyAGkEj17432znroB/h7VJ6ZVmuFiHEMIH6ZNfIL/H0VMSJMxDgGMFH178qkaG/gP7YL2HgvsHMQEeMYwNjwmxXtDfxDiYhxDCAumRPtDfwj6TL7B2IAMVR/M6K9gX9k1RZfY0QYA5hIZkR7A//YihgRZs8ADGCo6l+XCdHewD+RiBjHAMZV9tHewB+LQh8XFl0ABnBc9e8o62hv4I9NlcpJtZpv+g8RMY4BDFS20d7AH+einGsB5xgRxgCGqv5dZTnyC/yxwy+5I8KBLoCIcQxgcPVPPdob+BOB31Wz+Sb7B2IAA6t/dtHewJ8o/G4XELF/IMNBGEDG0d7Anzj8rhrLC5qbrQS6AIaDMAApq2hv4E8NfvdbQh8UYkS46AaQWbQ38KcOvxS5f2DhI8aL3gGkH+1tI/wH9sPv/Y17u4AtDKCY1T/9aG9bK7+xrjT6txAxjgG4SjfaG/gzh9/7W7/DiHChDSD1aG/gNwZ+6XBEOPS2YGH3DyxqB5DePn/AbxT8rporb6o8Q8R44Qwg1Whv4DcSfomI8UIaQKrR3sBvLPyuWiuMCBetA0gn2hv4jYffew28U+yI8cIYQGrR3sBvDfzS4YhwkfcPLFIHkHy0N/BbBb/3Wgh2AYUaDiqEAaQS7Q38VsIvFTtivCgdQLLR3sBvLfzea+KDYkaM594AEo/2Bn7r4ZcOh4OKGDFehA4guWhv4M8F/K423lsODwdtYQB2V//kor2BP1fwS87+gc2e/QM7GIC9SmbkF/hzB7+riBHh6xiAndW/qySivYE/t/C7XUCRIsZLOYU/mWhv4M81/K4aywuFiRjPawcQf7Q38BcCfu81896y/25u9w/MnQEkEu1t6zZewD+2ihIxnscOIN5obyp/4eD3Xju9I8LXMACzq39dcUZ7s3tvYeGX3IjxBf+h3EWM560DiC/aG/gLDb+7qLzvH5gbA4g12hv4gd9ZVKVyMhwumquI8Tx1APFEewM/8IcW1V59K7cjwrkwgNiivYEf+CMW1WdEuIsBGFj9x472Bn7gH7Co5sobqlRO5q4LsN4AYon2Bn7gP2ZR5ZnpqP0Dr2IA2cI/ebQ38AP/'
	$_Resources_Warndreieckico &= 'kOtu1PMXMW57BzBZtDfwA/+I697I2YiwtQYwcbQ38AP/GOuuzucrYtzmDmD8aG/gB/4J1r2x3tMFbGEA6Vb/8aO9gR/4J1z33GxFjXrPiPA6BpCexov2Bn7gj2ndeRkRts4Axo72Bn7gj3HdlcrJsAlYuX+gjR3A6Pv8AT/wJ7Du5sob1keMW2UAY0V7Az/wJ7Tu8sy02u+85T9kXcR4ySL4R4/2Bv4YAQL+KB1GjNs7ImxTBzBatDfwG8dZXjsWmyPGrTCAkaO9gR/4U+xYGnV7I8Zt6QCGj/YGfuDP4HQldC3AmuEg4w1gpGhv4Af+jK5VRIwIWxExbkMHMFy0N/ADf8YXKq+8f3HgaxcDGL36dzRMtDfwA78B71JUKiejRoQ7GEAM1b9vtDfwA79Bb1HaFjFurAEMFe0N/MBv2HxCeWY6vIuw0SPCJncAg0d+gR/4DR1OihgRvo4BjFb9uxoU7Q38yODJxMOI8cCeAcZGjJcMhH9wtDfwIwvGkhv1hfCIsJER4yZ2AP2jvYEfWfSZhMvrDf9dI/cPNMoABkZ7Az+y7ANJtcU/MX5E2LQOIDraG/iRpZ9GjBgRvoYBRFf/uqKivYEfWfxR5Or8q1HDQXUMILr6e1prLwE/Uh72IVgLdgEyqQswwgCcQYmP3futZk2VV04CP/BbD7/kRoy/4T9kTMS4KR1AKNr7HPADfy7g918LMHFEOHMD6I32Xgw/UcAP/FbDL7kjwoEuwIiIcRM6gGC098oi8KcFEfCnum4TI8YzNYBYor2BH/gteb4PI8YDFwQzjxgvZQh/b7T3chX4gT+X8LsyLWI8yw4gGO196TzwA3+u4fde6wZFjGdiAM4gxNHI78JseGQS+IE/l/BLUnX+VWMixrPqALaC1b8B/MBfCPi91/x6PdwFbBXCAHqivZerw0d7Az/w5+T5NiViPIsOYLxob+AH/jw93wfS2tvZjwinagC90d5Lw0V7Az/w5wx+yY0YD5hA6vsHpt0BBPf5s2HoB/iBPwH4XTUvZhsxPpVi9e/KtznixqXzajUXgT8hiKZOvJRKL+P5kfsndPDyBPAn9FB3fvuDvr11z3/o081t3chbBxCK9gb+JCE62C9J+ydiuR3sl4A/wYdqXcxuRPhEGj/EiUv2Pu57eeO82Vf+LYffa+4OSvHcJmoUgX+YhyrPTOvhH564d2f/6n1N/c03uml9B9Czz9/CrNkjv7mAn3XbBL/kRIzPp79/YBqnAMNHewM/8BcQfo+NDCLGEzWAnmhvk0d+gZ91Zwi/5IwIz6cbMZ50BxCK9l4BfiAC/gG68v6FgQxZYwA90d7LVTOHfoCfdRsCv5R+xHiSHcDx0d7AD/zA36ON9Xpq+wcmYgDhkd9Wc9G8nX6An3UbCL/Ud//AjjUGIN/En5Ejv8DPug2F31XEiPB1Kwzg2Ghv4Ad+4B+qCwjtGZBIxHgpZvh7XrcAo71NGvoBftYAbQH8rtKIGI8AuwMIRnubdOEAD/hZt0XwewwAvZvs/oGxfRoA0HGme64BVBcAZvXRX6wBf1YAEE0daKq0H88ASvdL0sEU8GcA9Pt9dfPf9OgA8R/du7uSljcAt7VrWgcQHe0ADfyZVNCp0v4A4ceBY7gdGQkA8Kf/+x0kGjEAHksH4Iwreh8AaG4sV3XlwyYA8GfYPrv7AUwA/fk/T7barz8AcPYDKAH/QXYAa//Hf/led+8AP/Z/cXlzW/cATekAzNvnj3MAftadE/il5PYAD5zYAHqjvRcQsx/5BQATI/glACdi/GL8EeNxAHQAwWjv1SXgAM8NRAL+A3PWAN5+pxb7iPBEAAYQGe2d5dAPAPADf07hl5KJABiftAMwJ9obAPiBP8fwu2peADwb6/6BYxuAAFHR3sAP/AWAAN/tAkIXBCeKQBgvjQm/OQMKgQDfVaM+H1vE+BC4HYAZAwmD32MArjdc9GoqBmAATLQ38Kf7awEAv1FrP9w/8FUA/6GxIsbH6QAA'
	$_Resources_Warndreieckico &= 'so/2Bn5UYPgA3YfYeLenC9ggStQAjIgACQT8AJLciPF5/1dGAI4YH7UDyHbkABf4EfAHNOmIIPDQBpB5gCYj4ADvUeWVk2ETGABp/8BROoDsogC9gR8Bf181LwCeHTtifCgDcADGDb1zi/ZqigBDP8CPgH+gygAz02q/XfMfWgAfdkR4WIqziQD2Bv7JV/v1BwCWOxLwD6PWxQA3dOf7H7S39wCzn9kbE3cATgC0d91/7g/85gDDf7BfkvZPOAA3/78jbi8H3wAODkrAbzD8HgCbvSPCXxz3fwCmjoE/m33+gACfdQP/WPrqHwD+faT9A4+z9hD0o72BwQTYar8APVrEeGlA9a8AK+1ob+Bn3cAAP5EiRoQHRoxAl46p/p4SwUDWAA38sWiUiPFSIJ/q31GawE/PugCBPzZVXjkZNYAi3BmlA0gvgGMAWTfwx66Nd4cQixgv9QAOWyS6AM8f8LNu4E9EAOWZ6fAuwpEjIMJRHUA6RA9RRQCMCF8faACpRQB7Az/rBv7ENQBMxHi4A/jEuxiQkFRAUAEOTY2lAvkADp9EGoAz9QAXOPcHfuAHfgB74Xd/YOtCzwC1gNmoDiBwgQAg9uoP/Kwb+AAzWXPoLcEA6wB+A/A+7js3dxA63nN/QTOf2ZoAyzMnwtuIr0cAGcCS/+IB8AMAP/DbD7/fBKIAWPcbQN39R7UEegYBL+cEfknhAM8H1KMMwNOzBGcvQUx/jtb87AD5y8jjfgO45TD+Y2dnQNkACmjNADu7AaZvRRnAIP8dffNTQhmjNQDv7P6oKNb9BgBw038KsLPzFAHDFP5nzwOn9TcAewxgc1s3paNArYPu/OfvQV6/AO1rPpDu/PYHAP+RXYf1ng5AAJL+1v3H3XuPBQB5E4E/txj+vR8Af9bdB48jGY8AMoAv/Xe++fUC74Elv6XwS9I3AN890CDGAwawALmt+/LtJf7wQOH/Dj4VAGE1xgC+Tu58/996+ACHJ/6v3HAY7wDbAUjS5/5rAQDf/vp3unvvEQHCCwj+uw8e69sA7wKs7zpsBxQAmQvg7Bzy9/6AY2vtJbVXl+IMAOHwf/vdA935AP6H8Fd/4b/4ADfQABwT6Cq0AINIpXJKa6vnAJLZJwCIgB/4ACd6ndx98Fi3AP/jofZ+/Dn8ANVPN7ejY8KOAEsG6uowaXQ2AGwEb9VeU3XhAIxmZqZVLk+HED9tBERgcAmu2QB9b//585d69AD4j/qv3z+JAgB/V9Ln/eA/1gHgDFh3OoF1IYQAbNEtp/LfGvQATVPDPprTDWwASf1TRhBCmesAvqQvB1X9sQwAwGcEH0v6S6cAI6ArQMiMan8AS9LfbW4HB30gEEIIIYSLAFQcAP0/rgwZejGrCKNJAAAASUVORKCuQmCCKGABQGAA4oBgAAEAIEEDHwAfAP8fAB8AHwAfAB8AHwAfAB8APx8AHwAfAB8AHwAZAGmj6hBgAJ9gAP9/AH8AfwD/fwA/AD8APwA/AD8AMgCxDvoQ+A/PPwI/AD8APwA/AP8/AD8APwA/AD8APwA/AD8AFTYAz7QPUDUBI5vWAP82t/P/PcH+az8APAA8NQDAPwA9ADstNQC/PwA9ADo/AP861r4/ADUAOT0AvT8ANQCAMbPz/yCY1jkQBbEPgLEADHq0/z78wv42AD8PPwA/ED8APxB/PwA/ED8Avw8/ED8QPwA4cTAAC3m09Q+xD/IPBMBvqf86vPg/ED8A/z8QPxA/AD8QPwA/ED8QPwAHPxA/EDYANbj4/wQUbqn5DyD1IB+W0f/6Dz8QPwA/ED8APxD/Dj8AH/8PPxA/ED8QOwAdk9H/+S+DgbRfPyA/ED8APxA/AP8/ED8QPwA/ED8QPxA/EL8fFzRg918xIO9xAReKxT/+Dz8QPwA/ED8ANQA2xfj//zU/AP8PPxA/ED8A4z8Q9A8VicW1D7EOS6H/dEAxADFgPxD/Dj8APxA/AAfzDxAHNgBesgAAAAD/NcX//6g7'
	$_Resources_Warndreieckico &= 'v/4WMDoRDL4XDAI5DAYys/P/AGkaowUGgADmCwBpoxAFAAPvAR8Thb//PqTC/hIDPcEfAzwFA/rAEwM2AOsB8wkDnX+9gdgShL+FfYFxEI5/g4HicIWRL6zn1oG1f/VAaCup58l+cNI+x0Df8cEJEH+61j/9QNY/wAaj/0DPAA5+usU+39o+xcM/YMVKK6bi/0DQQD/BP9EA4h9/IH8gaAAoo1riaT9g/h9jIL/hBQj8dK76H38gf2FtAH8gfyBtaQAHYBhkH78fH+YfQPFlJiOb1n8gfyB/IH8go38gbCAhmdZpP0AfHwVqIK/hBgRvqf86/Lz4fyB/IGYg9V9/IH8gAWUANrn4/wRuqS1lH68fHu4fIGUnH5b+0f4ffyBnIPGf/Q8/ED8Aoz8QNwAdlNG5HyAPDhMPAD8Qo581IDa38/8/Dz8APw8/AP8P/w8/ED8Poz8QNAAztPO5H5+PDccPAA8AO5EXisX/Dj8A/z8QPwD/D/8PPxA/ED8A9A/4FonFv44PAA8ADwAxEP6AdSQ/ID8APxA/AP8P/w/HPxA/ED8A/v80sB9/rv8PAA8ADwA9ID+RPwA/ED8AH/8P/w8/AD8QPwD+/w//MAq/Hw8ADwAPAD+Rf7E/AH8/EP8P/w//Dz8APxA7ACx+qnquv44PAA8ADwB6sQzgerT/P8N/Dj8APxA//w/8D/+BPwA/EDYAC3l+tH+uDwAPAA8ADwA4kSf8odw/ED8APxD/D/8PPxDDPwA/EP8ln9y/jg8A/w8ADwAPAH+x8g8/ED8APxAB/w8/sgAAAAD/NsX//6A9wf7/PAUwwB8YAjsFDL/+/wd0rtD/AGmjAQa/AJ5TAAhpo0AEY/8gltGQ/z/D/gIDPsInAz8B4wHrAfMJA4V/sYEelbbRhX2BAUDWf4OBn4EzgARvqf87vfiygQOdf+lAOLv4/wRu2qnFPp8/ON4/INGA6UC34T/lQMx+ID844kCPxRw4N7jz7kDlP30gNbV682kfjx8XHwAfAOIfEMVgAO/hDhiLxeoffyDH/x9/IGMAF4rFZR9hEV4QHxcfAB8AZiCAZS8vPK3nfyD/H/YfcSAtqnrnaT+AHxYfAB8AbiDf8eEPEIC67h95IP8ffyDoD3+6ZR/fHxUfAB8AffIfYHlAdSD/Hz8AORAt+qu6H2CPCQ8ADwAPAA8A0w8APxCjz3EICPCH/w//PxD/D/cP9YE/ADsAsQa0D/7PDwkPAA8ADwAPAA8ADwDxO5Enodz/Dz8Q/w/4D+M/EDsAJqDcv44PAA8Avw8ADwAPAA8ADwAxEL81ID85kT8Q/w//Dz8QNQA5vP74uR9/rg8ADwAPAA8ADwD7DwD7DzA/kT8ANRD/D/8P0T8Q/v8fu44wjwgPAP8PAA8ADwAPAA8Af7F/sT8A/zEA/w//Dz0QsR+xBX+uDwD/DwAPAA8ADwAPAA8AfLE/kfE/AP83xv8P/w87ELyO/3+uDwAPAA8ADwAPAA8ADwC/PpF9sf8P/w+/D/Qyt3qu/7+ODwAPAA8ADwAPAA8ADwDjf7FwChSFv78P+A81AAFxDyKyEDbF//8BMD7C/gESMBOFv/8AaaMlAQzvAAwQAJkAaaMCcASr/y+t5/8/HMP+HgMV94EBL6znW4V9gQFwf3Cigd+BVxCMgLqif5mBEH+6xT4u3z8mPwDkP2DFbCunouL2QCum4sl+YD8miz8A6EC/wS0IdK7mP/dtIGEHZB+/Hw4fAB8AHwCLHwDmH0BlNyOc1n8f0WwgI5vWaT9AHw4fAC8fAB8AHwBqIK/hFwRvYKn/O774fx9kADvsvfhiBmQfrx8NHwAfABcfAB8A7h8gZTggltHvfx9kAGEFaD8gHw0fAB8AFx8AHwByIJ9lQDi589F+Hze487kfnw8FDwD/DwAPAA8ADwAPAA8ADwAPAAX8DxB0i/8Yi8X//EDEPw85ADECv44PAA8A/w8ADwAPAA8ADwAPAA8ADwB9OhCA9SwxID8Q'
	$_Resources_Warndreieckico &= 'tx94L4D/jwQPAA8ADwAPAA8ADwAPAP8PAA8ADwA7IDGR8Q8/ELCO/7ABvx8PAA8ADwAPAA8ADwC/DwAPAA8ADwAPADmRMHCx/z0QsbK/jg8ADwAPAA8ADwB/DwAPAA8ADwAPAA8AfbEM/Hq09g81EDEBf64PAA8A/w8ADwAPAA8ADwAPAA8ADwCDDwA/kaP/KKLc9g//sQC/jg8ADwAPAA8ADwAPAP8PAA8ADwAPAA8APxBzsTFu/3EPMQD4bn+uDwAPAA8ADwD/DwAPAA8ADwAPAA8ADwD5DwYwtVA1AIeyUABpo/8AMO8AMDDGAOEAAedpo78E9wED/4EF/31/AD8APwA/AD8APwD/PwA/AD8AHwAfAB8AHwAfAL8fAB8AHwAfAB8ACgD/DAC6gMMCAeUA/QftBcDjAEoD5QDg4wAH8OMAD1XlAPjjAB/lAPzjAD/V5QD+4wB/5QD/xRXlANECDgH//wINA+cAAg62B+cAAg4P5wACDh/nANECDj///wINf+cAAg3/ISLlAAAOwA3nAAAOwA3nAP8ADsAN5wAADsANAg3ADOcA/wAOwA3nAAAOwQ3mAAAOQzHt5QCAwg3nAMDCDQANwgxt5wDwwg3nAPjCDRwAKOugGwHPYII9IB9GHwAfAP8fAA8ADwAPAA8ADwAPAA8A/w8ADwAPAA8ADwAPAA8ADwD9d4OAOIM/AD8APwA/AD8AXz8APwA/AD8AMwCPtAtAAfEABG+p/w9/uj8/AD8APwA/AD8APwD/Dxp+PwAOPwA+AARuqQU1DGC1Fyum4v8+YML+/z3BPwA1ADytNQDAPwA1ADsxAL8/AFU1ADo9AL4/ADk5AL1RPwAno+L1C6/1Cx/8ltHyCz8MPww/DD8MvwsPPww/DD8MPwz+/ySeKtz1C58wACD1Izq8/vg/DD8APww/AD8MPww/DEc/DD8MMAAHdK71C0B/NDBxDDoYPww/DD8MMwA29MX/MgA1PAA/DD8MPwyxOwwdk9G3I/dHEHTa8P82t/M/DD8APwz8Cz/BdTkA/ws/DD8MOww1uY74uTtLbXQwF4rF+gv/Pww/DD0M/wv/Cz8MPww9DDgZjsu7U/sLNhgysf7tPwy/Cz8M/wv/Cz8APwxhPwz/MrPztQsxChBnT2wyDPFU/xCwWTELgbKQPsL+/wkwPcEXGAI8BQzA/v82xf+w/wAAAAoMASY7ADZUO78XBjoNBr4HAxZAicX/AGmjAQOAIwBPFwBpo98BJy+sfucKuynDAasRA4FtsWEsrKnnhV2BTRCcX0CBFXgIdK6SX6nDlQGtYQ+0frrFL2DaLscwv8ELOCeh3PIw2V/tMCyqx8heJQDIYDq8+O4w1b9t8WEHwCDEL0DmL8Mwn/HBDR+W0dYv1TDlL30YaCWf3GUXvx8W7hcggWEHBG+p/zq9dzAHcRj/F38YN7r4/wS0bqnlFzAfFnIYj+EHeByQy/oXbRj/F38YHrSU0WUXnx8V9hcQYADi7+EIN7jzfxj9F/+SLXEvIB8VehiA4QgUhfC//z/D+xdlGPoXfxjnf9UfAHPared/GGAA9RfB/8P+/zS182UX4T4vv2oPAA8A/wtgMQUQgP668gs/DP8L/wvzCz8MOwD4E4S/vxcPAA8ADwA9DOLPcQUrp+I/DP8L/wv3+As/DDMALb9qDwAPAA8A/w8AOm31Cz8M/wv/Cz8M9Qv8D39/gg8ADwAPAA8AfYXfPwz/C/8Lv2I1DCa/ag8Arw8ADwAPAPkLMDVtOzBt/z8M/wv/Cz8A8QtxHX+CDwDvDwAPAA8Af4UgcIX5CzkMx/8L/ws5ACKb1r8XDwDfDwAPAA8A/wtxhe8xGDFtjz8M/wv1C7+G/v858KH/sQS/ag8ADwAPAA8ADwA1bfgYi8X+CzEA/wv3Cz0M/B+Vf4IPAA8ADwAPAA8Ad3+FPxjwf8b/C/kLNQw1/LbztRexBL8XDwAPAA8A9w8ADwAxDHA9bf8L/ws5APwXin+C'
	$_Resources_Warndreieckico &= 'DwAPAA8ADwAPAAcPAH2F/QvAshAAAAD/BTA2xf8Q/z7C/gYYMrHtUP8AaaMBDO8ADBAjAIxvAGmjYAGDEIAguv8/w/4GAzfGjv8KAwG7Db8Qf7oFvxZgcruHYb+BQyeh3EeKYY0BiV0vrOeFXd+L+l3DL0DBIgh0rtov0ckwDHq0xS9QPyA/AMXAIa/BIyCW0d4wwWldxC6/Px4/AMQvIMEkBMBvqf87vvjaL8FpvcQvQD8eHwAfAGYYn2Iw7pd3MOEzZBevHwofAB8ACx8A6BcQZKH/OLnzsW4XO7344jPkFyAfCi8fAB8AHwBsGIDhExiLEMX/QMTrFxyQy31lF48fCR8AHwAfAHkwNMSz7WYYN7jzf9UfAP8fAB8AHwBo2uEXYQDhMeQXfoAfCB8AHwAfAA8AOgzf/7U8MQC2ar8XDwAPAA8ADwDfDwAPAA8ADwD1CzB1JDgA/79qDwAPAA8ADwAPAA8ADwD7DwA/YXA0Pf9GDwAPAA8A/w8ADwAPAA8ADwAPAA8ADwD/DwAPAA8ADwAPAA8ADwAPAH8PAA8ADwAPAA8ADwACAP/3AgB3AAJCAX8CDQB1AnUAKsBxAAN3AOBxAAcAhADweQAPAAD4cQCqH3cA/HEAP3cA/nEAbn93AMHDQQD/gQZ0AAHbcQCABgN5AAAHB3kAAAe2D3kAAAcfeQAABz9xAJuABnUAf3IQPQCAAXsAJMADewDgB3sA8A+VcwD4dQAfcwD8P3kWnXUAKGANMQDBQQEAbzb/DwAPAA8ADwAPAA8ADwAPAPsPALpzzzxPPwA/AD8APwB/PwA/AD8AMwAxCbEJ8qEbsXCILqvnPwAwAC0xALaqPwAxACw/AD8AqTsAyis9AKg7ABmONpGxCWa/cc01zj3BPwAxADytMQDAPwAxADsxAL8/AFUxADo5AL47ADk5AL35OwALebLWMeaynbHjPwoDPwrxCL+yUDzA/v8NMDsBGL9VExg6CQy+Cww5CQa9AQMGK6jn/wBpoxUBBoAABhAABu8IdCCu/z7C/gYGPcHdEwM8AQMQn0mjB4BFgUkjgk0BAGmjcIFXJ6Gi3LZRNsX/ggE1hAHRtVEkntyFnXCCTQUAiGmj34GhOrz4slEfgU2AIoIBlU/dKDa5+C3FTt/KJsMnUMEtH5Y+0con5SjJJ8EC8XodlBrRxU5QzifDKL8Eb36pzlDhKMV3xQDto8FOBLRuqcEmv9ImwydAwS94G5DLzifdKNEn6SgZtI7LZSdA9hNjFK/hBPg2t/N/FGgA7Tv/emcUaDO082UTr3oT4xMg8WEFE4W/8hN1FPkTfRRoEoS/5RMg/hNjFJ9x4QUvrOd/FP8TehQsOqpmsZ8fE+YTYrYQf9669hNtFP8TcxQPYAxqsYcfAGUUYcv/K6fifxTD8RP/zP8ppOLn2B8A83EoYrY/w/cTZRTtE3/h7ebY338ndhRgdW8/CjsAp/8JP1w5ACWfdmxgjwePDwAPAHdvMVs7vfg/Cof/Cf4JPwr+/zi7tljPf2wPAA8AP1v/IHBv8QnPPwr/Cf0JPQoelXZsv1iPDwAPAD8Kcm83uPM/Csf/Cf8JOAo1tfN/bA8Axw8ADwA+FBiLxfYJPQrH/wn/CTEAF4rFvxMPAP8PAA8AP1twBTkUOQr9CT9c/bATtnZsv1gPAA8ADwB+b/gQgLr6CTUK/wk/XLRYP39sDwAPAA8ADwA0Wy+tzuc+Cv8J+1EuqzjFDwA/DwAPAA8A/wlzbz8U/zf+xv8JOQB/bA8ADwAPAA8A/z8UOVv5CTEA9Z+5CbECvxP/DwAPAA8ADwAPAHlvPwC/R/+xAr9YDwAPAA8ADwAPAHVv/zlbPwozAPHMf2wPAA8ADwD3DwAPADgKz3lvPwCwsbABHzECsQIPBA8ABQDgsiIAQQBpo0AABv8gwJbR/z/D/hIGATZHAUYCVnEAaaO/AX84tLjzDps3gAmETb/yTQWDTyCBQRiLxf9AbsSLT4EJhE8g'
	$_Resources_Warndreieckico &= '9k/DKJ8RwSE0s+3GKDOy7R3FJp8/GP9QwADvEID+usInwQDBAsEE/04/AMQoYoDBSySc1sIAxE6A1z8WPwDkExBgAM/kEmEA/WEBEB8HHwAfAB8AbI5/if8fAB8AHwAfAB8AHwAfAB8A9x8AHwAUAP8BAN8EBgCBXqoBYADAYAAD6ADgYACqB+gA8GAAD+gA+GAAqh/oAPxgAD/oAP5gAEZ/4RFtAIAAAeoAwEQAA+oA4AAH6gDwRAAP4gD4AB/qAPxEAD/qAP4Af+oA/+tBAOkAgewA5+QA4yXlAO4oYACBlIFaASIBHwAfAO8fAA8ADwC8N1D4QT8APwA/PwA/AD8APwBxXLEHvxMAhb//Orz4/z1Uwf46ADwxAMA/ADtVMQC/PwA6NQC+NwA5BTUAvTcANbj4/xIEg78zgmmjrxB/4Lr/PsL+MgA/CP8HTz8IPwg/CDsIDn6ybK9x9ZYvrOc/CD8INgA28MX//zU4AD8IPwg1CPgrqOf7m3AQORA/CD8If/EHpTj9Bz8IOwi0D/eZacSjMPEIJ6HcPwg/CI//B/8HPwg0ACSe3LUP4jD9kAh0rvoHPwg3CN/xBzkA/yA/CDEABzAG/5X9944fsLU/CD8I/Qc/KT8IHB2Ucrv/k/iMBG+pf7I4Pwg7APkX9Qc/CDcANsC6+P8Ebqn/kf+K/z8QPwj/B785OgC4D/+POwjicPEhNrfzPwg4CP8H0/9BtQc0tDbJcA8HDwD9cALfccL/BzcI/wc/QjUIdBaJMsffjwYPAPQHYH/xCvHA/wczAP4HP0oyADD6sDbFYI8GDwA53vG+ccnv/wf/Bz9KMwAPcE2/4A8A8/8HdFmt5z8I/wc/SjAAvC2qfFYPAA8AOwivMUkHteP/B/sHGbNQPcH+/wEwPAEwwAD+/wh0rv8AaYijrwA1AGmjIAAGAP8nodz/P8P+CQIGPsIDBjbF//8fAEICBgEWBfYFAyag3FsBewEDIDZ/A4OfAcc7PL34CoMNfwETBXs5vFr4hX2fuj2DPxCAAe94IJbRhj+BAZE/hUEfNJXRgT3vgh1BAGmjkIAEb6mKgTfGkz8+OsA+wQrBDD8ey0AckN7Lyh/BAMEeyR8bwAj/PsXSIGDBkze488phyqQ0t/PFnGA/HNIg3xTshb/OH8UgE8AGwQg/GkXWH0DBNy+t584fL3Ss58U+QB8JHwB4EL/4EIC67g9hAmEDHwgfAEF/IKP/LKjiZg8rPKfifx8fAB8AbJJAxB/jD3+NHwAfAO+yIJfR/2IA/6wfAB8A83H/bR8AHwB/HwAfAB8AHwAfAB8ACwD/FwAAbQIAtwFhAMAAAEIDYQDgAAAHYQDwgAAAD/gAAB9hABD8AAA/YQD+AAAOf2EAgAgBCf//gAGBMwDAA///4AczACTwDzMA+B8zAPw/q2EHAgAo8AYYMAAwMAD8AQAvJA8ADwAPAA8ADwD9/iSP+CQ/AD8APwA/ADUAvbEF77FpeYK5kjUAOzEAqr83ADo1AL43ADkxANK9MwAZjvZuj3F38XdPPwY/Bj8GPwY1uLB8bneyfPELMngfcIi5hj8G/ud2gT8GOwYdlHyKdIY1DM8/BvwFfww2Bja5tgt3iOEzDN8XisX2BT8GvxLBPwb+/xaJxbN2fYZ/dEmxgD8GMwD1Cz8GMwAzhrR/hDwGzxB/uvoF9zkG/QU9Bg+wAzEEjwV8fo8wfT8G+AW/Ev8sqn+A/w8Ad3z9BTEA9QX/GLYLf349/wUwtcP/BfcFOQYmn/82w+FIDwA/BnJ4OaD/BTcGB396DwB/dqP/I5zWxzoG9QU5HyKb1n94DwD/DwC8vf0FMQDxzD+9DwAPAH//yzEA/QX/yg8ADwA6BnB/vbk/uTACDwAPAA8AtrcY/IvFPrexRD+3DwAPAP+M8XEKM7Lt9gWxAH9ADwD/DwAPAL+zP7MPAA8ADwAHAPWyEABpo0AAMP8wrXjn/y8AMAGwAphJAGnAo78MerT/AQYB'
	$_Resources_Warndreieckico &= 'FqtKtgNfIAADrwQDIE5fETQA////jgmAAAEBggHAAAMA4AAHEYIB8AAPggH4AB8RggH8AD+CAf4Af9QA/4UAgYQBw4QBgC2aKIAnFIABgQMBABh7D4G5g+vBAcES7xuQy1D/PcH+xgA8wQDAqccAO7/HADrFAL7DAAI5wQC9/v8ZjssFwRPvwACABG+p/3g2t/PWFIFTwQDVFDJAs/P/BG6pwROAAcQ83xeKxf8+wo/HE8kUzRPNFBaJxcESit/IUGDBPzKx7dYUUdU+L6/txU5gzWUQvH+6whPNFMUn0RQPwAzj0tHE8i+s584UzRPFFPwsqnx+ZHflCWUK5glsHwwLeXx8Y3X/J6Hcx2oK5QnpKSaf3GUTe3oAaaOfCHSu/z9+w/MJZQphBGEF/4liFO8YIJbRZgrtCR+V0Y9lV/+NYwpiXDu9+GIKw+UJYQs6vPj/YQNmV+sfAOEJEOEPHOBw4QlpHzthc2QTEB8JagpiXDe4PvNmCmFyclcfAGUK3xh8i8XmCWEB6mofAO0JUA3w1VAfB/vTEIC6//9hAP/THwDlcH/pHwBsUn9NLx8AHwAPAPhrEDIAwACiMDIA4ABwMgDwFAAE+AEzAPwD8AD+UgczAP8PNACfMAD//vDyaoEpwQx/a7sj/2c/ABc/ADIAsQPf8VUuq+c9NgAt8E41ALFPNgCp5+T/KzQADn5yIPEDNl/n+l7/Y3ZjL668Xjhe/1338AO4XTEED7MHNyg8XX0I/3Jcv1w7J3CRsU//W/hlMAD6B/NRr38YP1v6Wr9aDwDHNFrxT/0DObv4v1n/A//yTjVZ+QO4WP9OP1gyCPUD/79XDwA/VzdXv1YPAD9WM1YPMQC/VQ8APwSj3xSF/L//MQC/VA8A/wP/SQ8A+w8APARwMgAPAA8ADwAPAEsPAHtHATMAwAMzAOASBzMA8A8zAPgfAEgA/D8zAP5/sbcAAAA='
	$_Resources_Warndreieckico = _WinAPI_Base64Decode($_Resources_Warndreieckico)
	Local $tSource = DllStructCreate('byte[' & BinaryLen($_Resources_Warndreieckico) & ']')
	DllStructSetData($tSource, 1, $_Resources_Warndreieckico)
	Local $tDecompress
	_WinAPI_LZNTDecompress($tSource, $tDecompress, 48348)
	$tSource = 0
	Local Const $bString = Binary(DllStructGetData($tDecompress, 1))
	If $bSaveBinary Then
		Local Const $hFile = FileOpen($sSavePath & "\Warndreieck.ico", 18)
		If @error Then Return SetError(1, 0, 0)
		FileWrite($hFile, $bString)
		FileClose($hFile)
	EndIf
	Return $bString
EndFunc   ;==>__Resources_Warndreieckico


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 _WinAPI_LZNTDecompress(ByRef $tInput, ByRef $tOutput, $iBufferSize)
	$tOutput = DllStructCreate("byte[" & $iBufferSize & "]")
	If @error Then Return SetError(1, 0, 0)
	Local $aRet = DllCall("ntdll.dll", "uint", "RtlDecompressBuffer", "ushort", 0x0002, "struct*", $tOutput, "ulong", $iBufferSize, "struct*", $tInput, "ulong", DllStructGetSize($tInput), "ulong*", 0)
	If @error Then Return SetError(2, 0, 0)
	If $aRet[0] Then Return SetError(3, $aRet[0], 0)
	Return $aRet[6]
EndFunc   ;==>_WinAPI_LZNTDecompress

Alles anzeigen

Danke schon mal!

BLinz

**UEZ**

AutoIt

_GDIPlus_Startup()

ist dein Freund.

BLinz

Zitat von UEZ

ist dein Freund.

Mist. Steht natürlich im eigentlichen Script weiter unten.
Ich werde mir angewöhnen den nach oben zu schreiben ...

Ist ja nicht so das ich nicht schon gefühlte 100 mal darauf reingefallen bin ...

**Tweaky**

UEZ

fände es genial, wenn du in die Funktion "Load_BMP_From_Mem" noch eine Option zum ändern der Bildgröße (Breite / Höhe) einbauen könntest.

Super Tool

**UEZ**

Zitat von Tweaky

UEZ

fände es genial, wenn du in die Funktion "Load_BMP_From_Mem" noch eine Option zum ändern der Bildgröße (Breite / Höhe) einbauen könntest.

Super Tool

Also, "Load_BMP_From_Mem" heißt jetzt "_GDIPlus_BitmapCreateFromMemory" (Raider heißt jetzt Twix, sonst ändert sich nix).

Um die Bildgröße zu ändern, kannst du _GDIPlus_ImageScale oder _GDIPlus_ImageResize benutzen.

**Tweaky**

Danke für den Tipps.

Ich habs mal versucht.

Fragen:

- Ist das so ok oder gehts auch einfacher?

- Ist es normal, dass der Hintergrund nun weiss ist?

- Gibt es auch Ersatzfunktionen für "_WinAPI_LZNTDecompress" bzw. "_Base64Decode"?

Spoiler anzeigen

AutoIt

#Region ;************ Includes ************
#include <StaticConstants.au3>
#include <GDIPlus.au3>
#include <GUIConstantsEx.au3>
#EndRegion ;************ Includes ************

_GDIPlus_Startup()
Global $msg
Global Const $hGUI = GUICreate("Example", 600, 400)
Global Const $idLogo = GUICtrlCreatePic("", 215, 20, 169, 68)
Global Const $idLogo2 = GUICtrlCreatePic("", 215, 150, 169, 68)

;original
Global Const $Bmp_Logo = _GDIPlus_BitmapCreateFromMemory(Merlin(), True)
_WinAPI_DeleteObject(GUICtrlSendMsg($idLogo, $STM_SETIMAGE, $IMAGE_BITMAP, $Bmp_Logo))


;Größe verändert >>> so OK?
Global $Bmp_Logo1 = _GDIPlus_BitmapCreateFromMemory(Merlin(), True)
Global $Bmp_Logo2 = _GDIPlus_BitmapCreateFromHBITMAP($Bmp_Logo1) ;convert GDI bitmap to GDI+ bitmap
Global $iWidth = _GDIPlus_ImageGetWidth($Bmp_Logo2)
Global $iHeight = _GDIPlus_ImageGetHeight($Bmp_Logo2)
_WinAPI_DeleteObject($Bmp_Logo2) ;release GDI bitmap resource because not needed anymore
Global $hBitmap_Resized = _GDIPlus_ImageResize($Bmp_Logo2, 150, 150 * $iHeight / $iWidth) ;resize image
Global $hHBitmap = _GDIPlus_BitmapCreateDIBFromBitmap($hBitmap_Resized)
_WinAPI_DeleteObject(GUICtrlSendMsg($idLogo2, $STM_SETIMAGE, $IMAGE_BITMAP, $hHBitmap))

_GDIPlus_BitmapDispose($Bmp_Logo2)
_GDIPlus_BitmapDispose($hBitmap_Resized)


GUISetState()


While True
    $msg = GUIGetMsg()
    Switch $msg
        Case $idLogo
            MsgBox(0, "Information", "The picture has been clicked!")
        Case $GUI_EVENT_CLOSE
            _WinAPI_DeleteObject($Bmp_Logo)
            _GDIPlus_Shutdown()
            GUIDelete($hGUI)
            Exit
    EndSwitch
WEnd



Func AutoIt_Logo()
    Local $AutoIt_Logo
    $AutoIt_Logo &= '/z9HSUY4OWGpAEQA9wAAkpKSQEBAampr4eHhzdjjVom2ZJnGw83Yv7+/7e3tOmSN2+Pspb7WmrHHWpTMMzM1eaPIxsbGmb3gqqqq0Nvl5uzxp8LdlJ2mf39/hISE8fHxsLCwuMDJ6Ojo/Pz8o8PiISEltLjHTFhj1dXV9PT0W2h0cXJyRnGaUVxoTEyNAABCNjZ8mJiYoKGhpKSknZ2dzs7Oi5mlW1tbZ5W5ubm5NkdXi7TdZ3aEyMjIAAB7kqzFYGBhpa21Q2WGjY2NmrvbUlJSV4Or2dnZe4iUwcHBKkdkVI7HV3mZeYGL5OTkmaKuAABqAAAkAQE00dHRkrLRcHuFra2tQWyWx9Lcg6zUqbC7tra2AABU5ubmIyN5lLnefKnTYGx4g4yUq8nm3NzcSUlKfazZAABz+vr6ZXF9TYO6m62+h5GbVmNuqMbjQ0lWJzhKiqzNOlJpdJq5cqTTiYmJKiou1N7nJ0FbS32s9vb2ytXg+Pj4AAASh4enS3miERERIzxU6/D0k6Kwu8XPmJi5GBsmUn2m6urqZp3QYYeow8TQmbXSk7bYNFNxGBh8NEthbaLUMzpDRFFdmqez39/fjqO4eXl5eIygncDiiJ60jrDSR2F6o7nOAABgnqm1OF6ENVl9s7OzdpGrW5G+nrrVhbHb1uDprrrEGyQ0q7bBZ2eJgaTCa5KwBwcHEBAxf4aNkJef0NLbQFx4PF5+cp7ERnmsPVp1HzRJbaDMHBxpsczoUHGRharNn7bLQ3SiM0BN4OfuWVmEc3V2lZmhZmdpobTGsLO1JCRWL1FzCwt9enqnJDA7MVR3DQ12k6e5u7u8cHmBSH2xp6engafJPVZursrnCQlkjqjBeabQDAxOFBRFT4Ov/v7+7vP28PT3sba6t7e3oL/dqanDxMTEEBkieqG/oaesYo+zTWyJQ0N0RUV/y8vLLk1roaWoq6urfHx9mpqbUInB4+nvOztf6Ojta2ufd3eQdafWeKnXh7DWaYObkLje6enp2eHp2dnhEBBrDg4oAAAA////AACAIfkEAAAAAAAsAAAAAKkARAAACP8A/wkcSLCgwYMIEypcyLChw4cQI0qcSLGixYsYM2rcyLGjx48gQ4ocSbKkyZMoU47MkiJPHlMr9uVQSbOmxxUh/On0oOELkV4ybQodKtGYTn/Y6pAgoQHfiBbDxMwkSpVksiwrVpgrtyKLomRTDebZqWGQ2bNYnkYNW7VtRkXm8hiCV6duHQ0JBg2I8KtXFrADU+isk7eFpHXr4JgdgCNDNTFuI1cstgJQgqP+PIypu1Qp3gEj1PWqlaMYPH8kBuEbFOABMCAB8MmGZEVNJraScy80Z+ioBxJ5OwgfPhxf3iRCiOQBlDmBbHxgBHR4IQOL8CTnJFlbort7wiw5dQL/x0dcOJbz6NN3sE6CMHEEETpkADI8yQgWpG573z8wHjadTWGRRBKQfMOCLyg4oqAIOyDhAgwDRpiEbAJKmIQAD1hx3oAjOPPAFZDx110y3oiHT4QGCiACCmhwccOLN5CBBgoi+OKCExbmmAQLDwAQ4QBCTNCICiGKKJkireiUQAcDLoOBCGjcMEQMfihjhhkNXPnIBZPcgMYOLECoIw00JOGDDAOkCVoLDxBp5JH6+HMHPmme4wMKXEzpB5bB5ILJn5jkEkyWj/gxRAk7vCCEmmoGAEYSGIChJiR2kuLmm20hiVoSaW4ADBp6NhAMJgyUaqqpgQZzpRJDoLFOBIwO/wAGEADIAAYkaQqBgACqXMEdplXlRAKBkLSAAhlnVGKGn6Va4KwFaTyLai6ExsAFMMtAoi0k6wggiQkZaPsFDC0E0MQVM4mhwrrstnupbuq6q8IVIRmDDQkDfPFFCyKQEUMkDeQCCgPdPJvGwQg72w0DoFBrhjJ+lFACDfpWbPEXTnQCTCAqZPKPGCBgIPLIJGMAwq+SgVyyyDuo8NEKGuCrr7El/NvAIQN388EHCHsRTTReHPyBBd10'
    $AutoIt_Logo &= 'A8ohDeigTAyXCLDMxfoKAUMnvsRxrlSZBIDZ1jqBoQJuEy2Rydhko0xR1lz7ow4e6ZLtNkXFGDIGFkIEiQI0kwCMc9Ef6P/8gRdeWDBqGtGksXPfPxzdwDSRTNKGCUTUXfcITnzjggBWq7DETCpgkPZRX8jQBNgRXfFAAKin/qFFaG89QAZ4iLEECKnX3sREvdQxiBAjIGDCIjdEosMhh/zQDSXI75yLEuoYgoA4ZliwMyXdSPADIk8oXQk5bcAxwvcjnLNBBmCA0ITmUzXhw+eo4QAME0VSxAQCXNPAdkWtH6XBrngs0TnXHugH6RRSjFZoABKUg0MbLuEJHTwBET+QgASRR4lIsKIVfcigO0Lgh0MgT4I/0MIhLME4e0ADDS4AHwLgQAp+zOs2U5nfUbBBw/9gQwPZid1FZIiZOrBAhwYRwxX/2OWrg+QvM/jghgBi97+tnaMfZmtICgZhnxF0AgVtOEIl2PBALWhBghKcxiry0YdsaEMbfcBCKWIARgl4ERGWYMMpPNGDNvgiAk5wwjIk4cJMSIUgeICBb+5wBw/8pw5OcAEUBSKGJvTjkZDsRxMaGUlITpKHOsHGANiBB3QR5ApMAAEQRraDB/TjXf84ogeSuET/eQ4zHcBBP0AEkSokQAhOgEEGFnGJQpyCDZa4hzCFqYV7DOEPFSjjGbNRATmcwRPFHKYNLIGLOZLDFSK4kROIAABS0LIg/ehhAjRwh//cYQQuSIXH/tHErZ3yle7cQwAEmcnf4AB1ewhREx5A/z+uJQADe3CZQFSZRBPggQkBaAFmeJIA1J3MIVnAVS6tgIJEkKMQEGBDPWzA0XvY4B72uMACKpDMDPahAgv4BhfcwNGW1gMXz5jBLXqwCGZEAAY4iAIQvjmQ2flGAx3YwBh0cocgxUGg7TwKDCQJT9D1Q2vsI0Ej6NWEHbBPJ5B4wO1SCdWdFBQP4WQfNkwwuob0AjkwgAELauCKExQAFlSoRyjmOldPkEEUvOCFO0hKUnfwggJK4AIV6BoKKmwBAuM4Qg9kgYINwOAcVjCBKqKYPw8kABJRuINOxjCATpiLc031xwhewNStjSAKT+UaNn4jhE4cVQVAWChokqDZo/8kYA8eIyg3DBpWzKwWX8sAwiQbooQBOOEc3/BFEXpwhAIYYAthiG50IYACDiyAFwtYQD7ykV3siuIAzDiCdMNAD2pAoACCkIIsFsGCc+AAAT7wJluuYNXNpgUOJNhJB4LLBNBihgQRAEBpj0ICHLAjtUixYR0gsQwA+AIEKsADJI5yB3IBoBMDGKqSMtBfgkYWrDv5T2Y6YCBfBAB+DEnGOb5wjnN0QgTo6AEdCvCJN8yDHjimxy1YIYfsimIKf+DAASiw3XxQoBQiOAI95sHkNxgAvSeQRREkQYRzEOEFU41fO+/AGAHQIJMJiIAkdJhUAAu4CU01cz9A0IkkjOH/P5YlwjocqoIHYCYBkU1FHAbhmyQQYQ9i6yoSlXjQDTiBBCJGJADAEADzxQ8hWXDCCHDwDXbUIBFSmPEnHMCIN3T6FlwggChEIYcDVOEMzFDCHwggB1JPgRWOMECnGUEIB0D5FUVAwwRwQARnAEFzBGHCBiisKxksg8DngB1kyhzgAYsnAj44JR76OeJOAAEPeDifCXwT1B2A2DcDsMJRdbtEFTAhzRFYRz+yrZ+FrCCXEVjGKuaQiBPM2AgOIAQhGCGIXfxh1D8uRat2IQIeHIAAFJADBf5QAlnou9ZGKAAdTrAJdDjCBxH4RhR2MNlgU7sOI7DCA449GCe0YJHM/z4zuqO9BEx6oAOd8HYmlqA+bndiib31xxggsQHhkrt/Zf5GBmYphkcjpBeP/YYVuDAHTmS6Hfh2gAMMsAglJJwCdhjFGdDQCGjUAAqjmALCsV6KXfRA6g4wQjsmXvEa2JQIUQCGKtr9DzxcRjwwmMAD4HlOZ+yBXil3NmqgDUWXd8AKwOjfPwz/4ZyP4QvqAAMTriDo'
    $AutoIt_Logo &= 'VRLalf/9BssfYgocRIAIG0BB008QizIYIerI4IIdFE4BDlhrFzWY+DFi8AexU4AAB4gBKeiQdrWzHR1z4AIREBAFXtE95xqIQAtSAc/HR+Go7ES3yv9L+JZT2/KtXPz1v+r4L0xA8pRfKP8rgb7yRTpEHpQmwoubLoXSn94BCtjFkClAgQM84gY1WMMJjGCAV9TA4ASAcATAAWhQBKdnBGUQC7pQcXyABkSwDOogWZ7EVTOUAAjAAv2wbZuVBFYgXDkQeGhGfSzncuPHHSS4W9+2WV/gDOBXeSXIbJt3ft+AAMuwfk5XelBXBqTwCGNnakggAscgC86Vb21ABn9gBwFIAFNQduhwemXQDFLAgGhAgxMgAIEwgZWFD1aAAQiGRAggA/ADguVnfb5RgtpXhijYfSw4eS54eTBofg1hCjRYg6J3g2UAdegABXZAf1l3BlzQCItwAoIQBIQoCGugCUiYhAdwAaQgBe3/kIBSwAnowAdcsAw04Axy903t5AFY0AkGJWhhNmbqIn2CB2AjuH2EBhknyFuY8XhrGH5o2EpvGEUKYQ7cQCadwAV8gAwKEAvN0A7I4AjzRwB/oARQoAY1QHAosIw0IgLMsIe3F4B/QAZ8UAaQyAlF4HY0wA0uwHETWHM7MQjQhgd2RmAw4APkR33TR2DVd4LZt4opqHMr2ILi54Zj+BDv0AnbaAWrwAfEoAC60AwKQAoc0IOaMHA18Ae3F41JSH/0F4B2UApqUATNoAsKgAxz4AhdQAOd8AJA0CsxRG33gg/qlnOIpEiYx47r+GynGIuKB49qSI8umZIsCYcMUQtR/0ADVmAFLzAH6LAJuhALsxAD0LiEZ0AGsKcJopBdTKldpOaQDnkAfkAKxGCRxMAHJdACVrABAGAu7RZIV0VhIzABIDBEpBiC7NiSXnV5Z7iWrHgUriiTaymL9+gQyaCVnWAFL1YETjcHKHBw9TcKrHADatAGSEABTFlkT0kAdjAFB+CYB3AAowAFpLAJkjgLq9AJnTABGaBV6/QPOXdVj7cBbSKGIlh4qLhEqoiKb6mCr9iGdHmatJgQOYAEG6CZnQAF/lgExxB2pbAlR6kgf1lqHFCcxTkKo1AKVcADmvAISvCcfnABQ7ALs4CRszABG7ABLWACHPMrILM1NJQ2Hv+QBDQABExgmmmJmjPZloPWmjonBC4gl4MWm+k5mwiRA+XgDNm5Ac6wBkUADiWABDLCIgnSCDXQBUpwAazwCxfQoAp6Bl2ABFBABlxQAjOyjAoSCHzAB47ADRsQBSwgA/zwTUeUFB3AO18wCHUAZ4NABO+Dls+2koOnlkhEA++4fTTgnufEDicGi3OZjgSGAzHoELXwAuqQndwgAnPAB6QADoFAClB6DGtwCbfAIlzADEiwCl3QBauABDdQAglSA41wDMcApYEADuBACnwwC13QCVHgDHBgLt9EXwvVAQjAC7cADgDgDDCQAB4AgBQagAPrkG0AaXYOJwejM6oAnjuRAERgUKoA/zhsYEYEGJAAgvdiJ1bzczQAiRowcGD2iRAAYoABzqAOUbAAAb8wC+jACQoAIAV6cA0FUAAA42AA1EAFwIQAMwxgAaVyNDoA8Ayw4AYz8AkABXANemCVRcAAB7vADVGgDi8AYALm025JNQYAI8CjDwAGLKAAAUdRBzBAWoYAegc+UYrtKJIAJCAE6Mgd7XQAL0LASb1lWTQAsA4Q5qPzCaQARMVgNskQOfAADuzgDBMwATQAoKS8SAftsGkA+zYPYfBREvAAN9FgC7ZQOB8AIAH3EAph8AYAhGAAtkYHUmAAnW2qDi7gA2AA4EJFImw9dI4AgXBQvoAZ5zQAAXtgqDyhAQEA0A/Udqhk+FMASQACkkSnCfYAGx4gT9M6rjsA/9APYwOb7JoAGXgBBP0weQ8AsQ8Z0AL0eqQA/rkJJ3AN7WAAALLmrzagBZQAILAEa7AIGwoAW8CwBvAJ12AAkcEqAsswAc4A8AJV'
    $AutoIt_Logo &= 'cy5hgUkAqHEOcABh1yoABOpwVLGVSVcAZYpQ1AQvsBMAfYoZ69AEe4AABTHzZgA0ABsA4AsP0D+WCrMAHmBImEED/eUAEPEKAC5Qr50AsAqkCpDX8AkABkALbxAGofAARVJrC0FzsPcAYFi0kLW+KgUAV7kGwvCmLQAABxcLbAPRD9IAig0JkADkmQEA4LAuGogXHQAAA85gLntAGOMAxBSD0AEJMAYAd4AXCTAANDAAdEtwBTKQBF8AAAlYME6EAQMAotMEAgADIzAAAAlQB/81lpIA/wAEqUAkrQMAHIMQGom3BCAA0wH6kgSD0L0A3QoHQNQQ0uAAC+zgAs7gDAgAgAb+iKqVe7kAW1APiCABUQsAOJ/bDVpgA2EAAAG0wKsQywkAczALZ9AJzuAAAiwgAObDU6AA6Q9CYAXqMAEALgAHwICzWYMADxoHtuyAAScA1gS+QIMIgAAAVtACPoABOzAAAVFQryEsAIsAdG4u8AL4W68AL6DCTNByJvAAuFaAADjQYggAMAE+IABgsAcATHAbWfOnGwAAtkF8bdzRBEAAELZEOwEUCwcAMqB4jDsMGXAAvy7gAssgAnwA4HR6EASWCwEAAQxBUXs4CIwACFTAwDNQAHoAIAW4hpk0cMYA7DBnLmQ2WUMAAzS8AzIgA0AA/+CzYvMAzuAAC4icyEAgeZkA0AQykAHfIgAAMhAAe9AIwIAAyIi8yIuUCQgABQSJfMpA8AAA8NNyrmECviAACZLgCwKwA2AA8ACpMHkzkQkAD6AOkhDJigwABoqXA00QB7MAcsq/LMYOIQYAauADL9ACLeAAAgiAAmuMqkEA0Kqw8Az18EAAP7DN1xNHEAAACzNQCOnVx6sAsAzOzA7zwQ8ATUB3AuFIlfQASEP8D+5cSXgAQCQttwdxkM8Ae3BQTPDOP+sAnRH2zpMHGcIAjAd7AAL5HAcAILAH69YxYTEAz5GUbSGSA1cAgG30PFwPkQMA0rADPsAOzgwAzfybCAqgB4IAMA4zAAungAsAXPQETxBHzxAADm4wDkGgBz0A/4CNa9AF5twAAi8Axhk8m7IAswRAHdSbw0gAQh3Uf5QDNMcABOc5c0VX1EAAHRY50NRF/UcAjDRESs0E58MA1Ljx01PNFlEA7dRUndHVIAAAHe3MLUAEZ1AAA+jwCuSgB4UAYNJuEA6nMNcA4QDTqCDOt/AACokwByKwAdwAcM4+sANxcJ4AQw0SUR3WG5EAA4pddIgtFGIAYA0CAAfs8AIAzayPJUBvPUAADkcQBIWACp4A7dmFUAhHMFMA61UDQxABE6AA0ywAB4K91AMABCyR8dg7kAEAAEDZPrwMUcAABYuQCK7QA7cAcATADdy3QA4ArwANiwANSFAAgzqNpxggA3EA0EevDduxXQ0AQCAJPsACto0AxstwATeARW0A/wANsiAL0PAA3WiABDzwDZ0A0AKTzQI+EL4AILDURifd3SEARA8gALTNAuwAkN8vMAEemg4Av9AFQ9AFZ/AACzywDVbQwy8AwA4sAAAZAAwAARAIWR3d8p0AMplgDWAALgAAwAL4PdnOIAwAy0AEII4ANMAAnwmu4AxuAkAA8NznU9gT/iYAslMNpAAEJoAAAT6Q4Rue3zgAnt8aDgAzLAAAKa7O89LYLS4AIlGdCdUQCAEAIAMmsA4Z4AMANQ4AUM7jPpAAAetgApv83C4AdAXsPOTAUuQAV6AKpPCsQLAAA8AgAGb+yZMA3GiBAORaLuQAXI4pi50JV/AA5aqgCk8KAqQAAAKBoArqfD4Ac66+Ev7mmNIA1HI+5+syRHMAIO4rgC7ojF4AEIp92IxddIoA3eiUXumWfukAmJ7pmr7pnB4AEAA7'
    $AutoIt_Logo = _Base64Decode($AutoIt_Logo)
    Local $tSource = DllStructCreate('byte[' & BinaryLen($AutoIt_Logo) & ']')
    DllStructSetData($tSource, 1, $AutoIt_Logo)
    Local $tDecompress
    _WinAPI_LZNTDecompress($tSource, $tDecompress)
    $tSource = 0
    Return Binary(DllStructGetData($tDecompress, 1))
EndFunc   ;==>AutoIt_Logo


Func Merlin()
    Local $Merlin
    $Merlin &= 'R0lGODlhRABHAPcAAP///xgxcRw1fRgtbRw5ghgtaRw1eRw5hsrKyhgxdRw9lhQkYRgxbRQoaRQ1fRg1eRw5ihg1dSBBkhQtZcLCwr6SlhQkWSA9kq6qrsaamrKytrq2tsrKzr6qQRQtdSA5ijldlhg1hhQxfaKenhAodRw9igwkVXl5eaJ9eRgxaUFpns6ioj1JVRAcSVVZWWFlYQAEHIaCghQ1jhgoYbaiPevr676+vhQtceeysiBBnrKOjhAkbS05Wd+mqhAkXY6KjqKWQWlpacqyQSAtSQggZcbGygwcUWFlVWl5kn1hYWGGshgxeaqqqsbGwpaSltvb3yQ9cYpxcSAxWRw1gt+uro59hqKmpjFFeYZpaaqCghQoXSAxaRAkZZKSjhAxhgQQNT1dkvPz8yhJmhQ5mhQgPTU5SX11SYaGjgwgWaKCguPj4wgQJK6aPZZxcUVFRTVZkklNYa6KjnF1eX2GnteiomVVVU1NUbaSltvX1zlJaZKKTVVdZdemqop9ORQoVcqmqiA5guvKzl1laa6aNZ6ennFZWRgxYbbC31GGwi1BaZKKVUFJZbq6vmFZca6engwYOUVZdVl5quvj3zFJilF5oiQ5aUFZpjExKKaWTZ6qvt+6vjFJglFJJAgYSUlVZaaWOWlpYQwofUU1NSA1cZaChnFxVXFxaUVxpk1dhhw9ktK+QVFBQdvKyu+2ukk5PSRFmjFVhjlFYQgkcca2SWFNVbaqXRwtWb6Wmj1JcX15WWFJScqyrlFBOSRBhuPGyvPv63VpNXl5ZYZ9VVldRWF1ivu+wj1lmhw1cWFVHLqqSUE9RW15in2CgmF9ohQcNQAMKCAoPSRBinl1PePf2yQ5XZaSaV1phig5ZbKysjVZloqCefv774aSru/XTVFtlsa2VZqORTU1QaaeXYJhXZZ9eUVFMdK+TZKGRWGGnhQkTVVNRW1lVTk9VV1hYTFZprKGhnWSsp6KNRwxbff7+//GxmV1fRw5fVVdfc7Kyhw5eRgtcb7CzkU5IG1hHIZlYf///yH5BAEAAP8ALAAAAABEAEcAAAj/AP8JHEiwoMGDCBMqXMiwocOHECM+dGdMosWLCMXkuJAPFsaPFlFpfBUgEciTDpd906bxAMqXC8XJySFm2SQxMHMWVAFJwqsc3mTqHPov2odIOWjOAYeOaE4kan5ZGpNp275mTl9mklTjVyZL07rigZcVJDwKP6qQ2kXPUZUYViiU/aikUYUePajgwNujTT0lczFWoKMpkK/Cgf7QIRX4YjM6rOZZOiT1UBg+txpbrELHV5hDeFodelJDUwYkmh8SuxVnRStWgTThCGQYRwZHjFMzJIZFxwo+VFoVG96KD58MWcZF0r1wzjgdGSoAx0GdygroUaIAZp6QWxsdWaJk/9Fxp8KdOGmwVEiTZjv3g0rS6HinrhCW+1iS1NGF/Md7hVXo4Ig6rvCyyoGuiBLDH1nM8V9CVeATBgJBrOLKhW50UUMNu6D24EGM/FJDGDVw0AVcT5DYVSYfGsRNWGrg8cQ0aqjxxBN4yBijgy0OhA0eHBRBASFO/BBDDE5gwIgNCOBjRY8CKcEENtgwYUoht1BBBR9Z1HGGFUxgYIV7H85RpBNBnLDLHxVUcMsfjrRzwg8/ENJUj2eccEI7MeDDAQUbbMAIBRzYEESaMZwBpSntuMAMBwhEGiSkTTIShAtBMAMlLuGYskERkYYaqpBWtMMDJT2eMgQ0MTDBCKiiRv9KgQZWBPGFIS26E8sljwThBDY2wDoqI0z8oMwaX+Tz4D21mDNLH27EQAiwwlJgAwZOmDLEFASUEA0Y3PUiQy3ddFNNGaB0wcQGFBThrg3YjBCDGwVIYO8FB7yRmgrRyIDKN9WYcwUJZTAz7aDWEovmtlN8cIG9B0zSWDYClHCBNZN4IUg7Mtjygrob2EABI9gQEoMyS4iDyxQWS3ABBPacUpYKD1xgcyoQCOBBPgccUMYJB9uwAbYuTHCP'
    $Merlin &= 'OZ54QIDDNkMgcVa9lHDvBwQEII8AgJTwgB0gM0LrCTzIYIo5eqSwRAgQpPKKBFNk45QxU9grQSpePNBAAvYAckAJhgT/Me0G2DhhxwMQXDGLEEdssccm1dSjwAWAOJWP1GsHAUoKLOAiAAGAfAABDzFggI0VL8hTwgEh5KIKOCxgkkwwCqzd9lD1XKG2AvXU0kEf65RiD+d7LwHHCBj8wEPPPYsgzO6DYOLwvb3o1AwuqdwbDSCLALNFKJvrvXcKJzABxxQ9AwKIACLkMUwfHUACgU8SQBA9TJu8fy8BS3BRxg0JGJA38iFIhCAYcADzAYIA9hDAEgrghlgIIgQPs9cUQPASKDQAEK94xQU+IAB9+EEK+gjAA37nPa354AAESOEBE2iAFKTDBwnImk8uIAAtgOsk14DBGlpggFQcwAAzGEIB/xjAgAgIIAQh8N4Bp2APbqWQhQxoQToYIAAIlGACj1jDGm6IQxjokAcG8MCqBlCAASTgAYK4QhLNRwABuPF3bTTAAwbgh0dM4AFQgMYadMhFlCTiC87gRTh80AI/BKAABQiACEyRDDWu0I1uTKEADGCALWjhEUawBS9EsQYy9BEliDhFIVCAAmV8oQD6KEADFAkJVSgiBJKkJCTdKII9uIALjyDDKNsAh6y0hgp0gEMDBnCNRNwgFLmYxSweKUsB5AN9odCDC4iQDnLg4DiKIgoSspCBFWQgDvIgphkSUYoOzCIZv3OjLEUQDEWAAhQdWAcR4ODNFVSAHKgaChLekf+BDNThFqMYwASkwYYOdEAIwRCBOilJSXsoQhUdoAEQhtGINERhBbdAgVOQgALWkCEDUBhAA1hAAyEIQRiQZChDH2AARUSUBtJoRBTYsYI4oGA5Q7GGP7LzhSTgogAzWMAiPOEJA6T0AUhl6BKEIQSJSmEP7BhCGvxRCKdQog47hQY0GABULTTAAyJg6UojgNQHiOAFQtCDHtjAg058oQ7kSII3skKJRtAiCZxApBa0UIAEkHWsESArS9vxggSMQg9wSActCqGLuc7FDsDgxDV24AO+BuCvcoxAAjYb2Ah4wAMJ8EAlYjEEdXDiHogIzDDigYw+mIEFPkikX8u62QD/bPa2tdVHA4aADH54ZC6IYEE/+vAJcLghtgywLVKXkIAAONe5t3UuV4fAiXT8di6XQMYnzrEFNPA1uZu9Ai48EAB93OC5zyViAaSgjk5cNytg4IcdzDAIHlR2iLb1QB4wUQkSVGIR50UvA8iohXLkMjAqSAcXCmAGO6DBAmVMrn5pkIsjAMETAZYuVwtQYGc8IjDGMMEEGpACalgAwikYgD5G4QkgsIEGpbgBEZMbAPVy2AgWSAeIRVyACczAAnwtgDxKAYQOsOHIeZDxjGes13RYAFdzMYQFJkDlGfghyAyoxB7McGQagKMS+mBAmJkM1HQYQQsI3usMZqCFKyNyacCyWAQbznEEM7hAyWSeQJuvoALNwAIKUNBCC6b85hvAgQ2J2MEO5LFkG0/AAipILXNOAQYLxBaRN1hEOxqgygWseQYNaEBQfZCCFHxIBW8otTwYPYAUGGITIIi1rGP9BplB6da4TkhAAAA7'
    Return Binary(_Base64Decode($Merlin))
EndFunc   ;==>Merlin


Func _WinAPI_LZNTDecompress(ByRef $tInput, ByRef $tOutput, $iBufferSize = 0x800000)
    Local $tBuffer, $Ret
    $tOutput = 0
    $tBuffer = DllStructCreate('byte[' & $iBufferSize & ']')
    If @error Then Return SetError(1, 0, 0)
    $Ret = DllCall('ntdll.dll', 'uint', 'RtlDecompressBuffer', 'ushort', 0x0002, 'ptr', DllStructGetPtr($tBuffer), 'ulong', $iBufferSize, 'ptr', DllStructGetPtr($tInput), 'ulong', DllStructGetSize($tInput), 'ulong*', 0)
    If @error Then Return SetError(2, 0, 0)
    If $Ret[0] Then Return SetError(3, $Ret[0], 0)
    $tOutput = DllStructCreate('byte[' & $Ret[6] & ']')
    If Not _WinAPI_MoveMemory(DllStructGetPtr($tOutput), DllStructGetPtr($tBuffer), $Ret[6]) Then
        $tOutput = 0
        Return SetError(4, 0, 0)
    EndIf
    Return $Ret[6]
EndFunc   ;==>_WinAPI_LZNTDecompress


Func _Base64Decode($input_string)
    Local $struct = DllStructCreate("int")
    Local $a_Call = DllCall("Crypt32.dll", "int", "CryptStringToBinary", "str", $input_string, "int", 0, "int", 1, "ptr", 0, "ptr", DllStructGetPtr($struct, 1), "ptr", 0, "ptr", 0)
    If @error Or Not $a_Call[0] Then Return SetError(1, 0, "")
    Local $a = DllStructCreate("byte[" & DllStructGetData($struct, 1) & "]")
    $a_Call = DllCall("Crypt32.dll", "int", "CryptStringToBinary", "str", $input_string, "int", 0, "int", 1, "ptr", DllStructGetPtr($a), "ptr", DllStructGetPtr($struct, 1), "ptr", 0, "ptr", 0)
    If @error Or Not $a_Call[0] Then Return SetError(2, 0, "")
    Return DllStructGetData($a, 1)
EndFunc   ;==>_Base64Decode

Alles anzeigen

**UEZ**

Ich würde das so machen:

AutoIt

...
_GDIPlus_Startup()
Global $msg
Global Const $hGUI = GUICreate("Example", 600, 400)
Global Const $idLogo = GUICtrlCreatePic("", 215, 20, 169, 68)
Global Const $idLogo2 = GUICtrlCreatePic("", 215, 150, 169, 68)

;original
Global Const $Bmp_Logo = _GDIPlus_BitmapCreateFromMemory(Merlin(), True)
_WinAPI_DeleteObject(GUICtrlSendMsg($idLogo, $STM_SETIMAGE, $IMAGE_BITMAP, $Bmp_Logo))


;Größe verändert >>> so OK?
Global $Bmp_Logo1 = _GDIPlus_BitmapCreateFromMemory(Merlin()) ;wenn 2. Parameter = True, dann GDI Bild, ansonsten GDIPlus Bild
Global $iWidth = _GDIPlus_ImageGetWidth($Bmp_Logo1)
Global $iHeight = _GDIPlus_ImageGetHeight($Bmp_Logo1)
Global $hBitmap_Resized = _GDIPlus_ImageResize($Bmp_Logo1, 150, 150 * $iHeight / $iWidth) ;resize image
Global $Bmp_Logo2 = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBitmap_Resized) ;convert GDI+ bitmap to GDI bitmap
_WinAPI_DeleteObject(GUICtrlSendMsg($idLogo2, $STM_SETIMAGE, $IMAGE_BITMAP, $Bmp_Logo2))

_GDIPlus_BitmapDispose($Bmp_Logo1)
_GDIPlus_BitmapDispose($hBitmap_Resized)
_WinAPI_DeleteObject($Bmp_Logo)
_WinAPI_DeleteObject($Bmp_Logo2)

GUISetState()


While True
    $msg = GUIGetMsg()
    Switch $msg
        Case $idLogo
            MsgBox(0, "Information", "The picture has been clicked!")
        Case $GUI_EVENT_CLOSE
            _GDIPlus_Shutdown()
            GUIDelete($hGUI)
            Exit
    EndSwitch
WEnd
...

Alles anzeigen

**Tweaky**

Wow Danke funktioniert einewandfrei und der weisse Hintergrund ist auch weg.

Wie sieht es hiermit aus?

- Gibt es auch Ersatzfunktionen für "_WinAPI_LZNTDecompress" bzw. "_Base64Decode"?

**UEZ**

Zitat von Tweaky

Wie sieht es hiermit aus?

- Gibt es auch Ersatzfunktionen für "_WinAPI_LZNTDecompress" bzw. "_Base64Decode"?

Warum?

**Tweaky**

Dachte nur, dass es hier vielleicht auch inzwischen Funktionen gibt, die zum Standard von AutoIt gehören.

**UEZ**

Nee, diese zwei Funktionen sind nicht in der WinAPI Lib enthalten. Keine Ahnung, ob die neuen Modifikationen, Bugfixes, neue Funktionen jemals veröffentlicht werden, da Jon scheinbar kein Interesse mehr an AutoIt hat.

UEZ 5. Juni 2020 um 22:12