Jump to content

Gui icon, use image instead?


Chimaera
 Share

Recommended Posts

Hi all

Im talking about the icon top left on a gui i have it changed to one of my own atm, but i wondered if it was possible to use a jpg there instead, i have no text there and only the close button so i thought a longer pseudo icon might look ok.

So how to remove the icon completely and change to a jpg?

Thanks for any pointers.

Link to comment
Share on other sites

  • Moderators

Chimaera,

In my Toast UDF I use a label as the title bar and generate my own closure [X]. You could use a Pic control in place of the label to hold your jpg. :oops:

I know it is not quite what you asked, but it is a quick solution until someone comes up with a better one. Feel free to use any of the Toast code if you do decide to go that way. :D

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

Hi Melba23

Btw i throws an error for StringSize, i downloaded your latest and it worked.

I had a look but im wanting something simple rather than adding UDF's into the mix, i have about 18 includes already.

It may not be possible without major work which it isnt going to get at this time.

But thanks anyway

Link to comment
Share on other sites

  • Moderators

Chimaera,

You would not use the Toast UDF per se - I was suggesting you extract the relevant code from it to create the Pic control and [X]. :oops:

What throws an error with StringSize? :D

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

Toast did m8 it prob needs adding to the toast download as its the missing udf type error

I dont need the [x] anyway its just the icon on the left im changing as im still leaving the normal close button

Thanks again

Edited by Chimaera
Link to comment
Share on other sites

  • Moderators

Chimaera,

I understand. It does tell you in the topic that you need to download StringSize and even gives you the link, but I suppose it ought to be in the zip as well. I will add it later today. Thanks for pointing it out. :D

M23

Edit: Done! :oops:

Edited by Melba23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

Try this:

#include <GDIPlus.au3>
#include <Memory.au3>
#include <WindowsConstants.au3>
#include <WinAPISys.au3>

_GDIPlus_Startup()
Global $u, $aBitmapAnim[8]
For $u = 0 To 7
    $aBitmapAnim[$u] = _GDIPlus_BitmapCreateFromMemory(Execute("_EyeBlink_" & $u & "png()"))
Next
Global $hWnd = GUICreate("Display Windows Title Icon from file by UEZ 2011", -1, -1, -1, -1, BitOR($WS_CAPTION, $WS_SYSMENU), $WS_EX_DLGMODALFRAME)
GUISetState(@SW_SHOW, $hWnd)
PlayAnim()

AdlibRegister("PlayAnim", 2500)

While 1
    If GUIGetMsg("") = -3 Then
        AdlibUnRegister("PlayAnim")
        For $u = 0 To 7
            _GDIPlus_BitmapDispose($aBitmapAnim[$u])
        Next
        _GDIPlus_Shutdown()
        GUIDelete($hWnd)
        Exit
    EndIf
WEnd

Func PlayAnim()
    Local $u, $hIcon_New
    For $u = 0 To 7
        $hIcon_New = _WinAPI_SetWindowTitleIcon($aBitmapAnim[$u], $hWnd)
        Sleep(60)
        _WinAPI_DestroyIcon($hIcon_New)
    Next
    For $u = 7 To 0 Step -1
        $hIcon_New = _WinAPI_SetWindowTitleIcon($aBitmapAnim[$u], $hWnd)
        Sleep(80)
        _WinAPI_DestroyIcon($hIcon_New)
    Next
EndFunc

;======================================================================================
; Function Name:        _WinAPI_SetWindowTitleIcon
; Description:          Loads an image, scales it to desired width or height and creates an icon handle
;
; Parameters:           $sFile: image file to be loaded or bitmap handle
;                       $hWnd:  GUI handle where the new icon should be displayed
;                       $iW:    new image (icon) width. Default values is 32
;                       $iH:    new image (icon) height. Default values is 32
;
; Requirement(s):       GDIPlus.au3, _WinAPI_GetClassLongEx() and _WinAPI_SetClassLongEx()
; Return Value(s):      Success: HICON handle, Error: 0 (see below)
; Error codes:          1:  Code is running as x64 - not supported yet
;                       2:  $sFile value is empty
;                       3:  $hWnd is not a windows handle
;                       4:  filename doesn't exist or $sFile is not a valid bitmap handle
;                       5:  unable to create image from file
;                       6:  unable to create thumbnail from image handle
;                       7:  unable to create HICON from bitmap handle
;                       8:  unable to set ClassLongEx from GUI handle
;
; Limitation:           only x86 compatible currently
;
; Author(s):            UEZ, Yashied for _WinAPI_GetClassLongEx() and _WinAPI_SetClassLongEx()
; Version:              v0.98 Build 2016-11-21 Beta
;
; Remarks:              When finished release icon with _WinAPI_DestroyIcon()
;=======================================================================================
Func _WinAPI_SetWindowTitleIcon($sFile, $hWnd, $iW = 16, $iH = 16)
    If @AutoItX64 Then Return SetError(1, 0, 0)
    If $sFile = "" Then Return SetError(2, 0, 0)
    If Not IsHWnd($hWnd) Then Return SetError(3, 0, 0)
;~  Local Const $GCL_HICON = -14, $GCL_HICONSM = -34
    Local $hImage, $bExtHandle = False
    If Not FileExists($sFile) Then
        If _GDIPlus_ImageGetType($sFile) = -1 Then Return SetError(4, @error, 0)
        $hImage = $sFile ;interpret $sFile as a bitmap handle
        $bExtHandle = True
    Else
        $hImage = _GDIPlus_ImageLoadFromFile($sFile)
        If @error Then Return SetError(5, @error, 0)
    EndIf
    Local Const $hImageScaled = _GDIPlus_ImageScale($hImage, $iW, $iH)
    If @error Then Return SetError(6, @error, 0)
    If Not $bExtHandle Then _GDIPlus_ImageDispose($hImage)

    Local Const $hIconNew = _GDIPlus_HICONCreateFromBitmap($hImageScaled)
    If @error Then
        _GDIPlus_ImageDispose($hImageScaled)
        Return SetError(7, @error, 0)
    EndIf
;~  _WinAPI_SetClassLongEx($hWnd, $GCL_HICONSM, $hIconNew)
    _SendMessage($hWnd, $WM_SETICON, 1, $hIconNew)
    If @error Then
        _GDIPlus_ImageDispose($hImageScaled)
        Return SetError(8, @error, 0)
    EndIf
    _GDIPlus_ImageDispose($hImageScaled)
    Return $hIconNew
EndFunc   ;==>_WinAPI_SetWindowTitleIcon

Func __Exit__()
    _GDIPlus_Shutdown()
EndFunc   ;==>__Exit__


#Region Animation Frames
Func _EyeBlink_0png($bSaveBinary = False, $sSavePath = @ScriptDir)
    Local $EyeBlink_0png
    $EyeBlink_0png &= 'iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAL/SURBVDhPPVNbK7RRFN5hhrhCDjfiQpIhkpIcCvVNIYeEZBxzPiWSQxjGtiM5hgjRCCmJpAYZLggpJaVcULjRXCi/4Pn2WvV9b+3W+6537bWetZ5nCaXUn6WlJbW2tqZ2d3fV8vIyn9vbW/X09KSurq6Uw+FQe3t7iuI2NjbU4eEh+10ulxJjY2Mzq6ur0Jewvr6OlZUVWK1W7O/v4/HxES8vL9DBOD4+xtbWFihWJ8D9/T1+fn4gRkZGJF1oaWlBQ0MDmpubkZmZiezsbHR1dWF6ehrd3d2QUmJxcRG6IBYWFnB0dASNEkL/lE1NTcjIyEBaWhrCwsJgNBrh4eEBT09Ptm5ubggODkZqairq6+uh22YkZ2dnELqirKqqQmxsLHx9feHu7s4Xo6KiEBoaisDAQPj7+0MI8T8poRsaGsLOzg6ExWLhBNHR0VwpKCiIWygvL2dUJSUl0DEwmUz8TUkpWW5uLiYmJiDy8vJkeno6/Pz84OXlhbi4OFRWVjJUsmazmS/TDGpqahi+j48PvL29UVtbC6GdkjL/gxoZGYnOzk60tbWhvb0d+fn57Lu5ucH4+DjbhIQERpGSkgJRUVEhCU54eDhCQkI4uK+vD729vcwK2YGBAVRXV2N7exvf39/clsFgQExMDERjY6MsLi5GUlISEhMT+VB1okz/Y3qpHZrJx8cHtHjYFxAQgIiICAjNtaTArKwspqm0tJQrb25usnA6OjpAQz45OQE9Dw8PKCoq4mHT4MXg4KDs6emBHiaSk5NRVlaGqakpaNnC6XTi+fkZb29v+P39ZWWSiChhfHw864akLG02G8MsLCxETk4O9zw/P88oTk9PWcoXFxf8rneCGSEUBQUFEJpLOTk5CUJBSYgqOlSlv7+fZ0F7cHl5yZbEMzc3h7q6Op6R0HAlVRseHgYhGR0dBSWkpSK9UxvX19eM4vz8nH16c9Ha2spqFLOzszN2u50rEeSDgwPW+N3dHV5fX/H19YXPz0+8v7/zN20h0UlF7HY7/gIkL01ljYA2awAAAABJRU5ErkJggg=='
    Local $bString = Binary(_WinAPI_Base64Decode($EyeBlink_0png))
    If $bSaveBinary Then
        Local $hFile = FileOpen($sSavePath & "\EyeBlink_0.png", 18)
        FileWrite($hFile, $bString)
        FileClose($hFile)
    EndIf
    Return  $bString
EndFunc   ;==>_EyeBlink_0png

Func _EyeBlink_1png($bSaveBinary = False, $sSavePath = @ScriptDir)
    Local $EyeBlink_1png
    $EyeBlink_1png &= 'iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAL/SURBVDhPPVNbK7RRFN5hhrhCDjfiQpIhkpIcCvVNIYeEZBxzPiWSQxjGtiM5hgjRCCmJpAYZLggpJaVcULjRXCi/4Pn2WvV9b+3W+6537bWetZ5nCaXUn6WlJbW2tqZ2d3fV8vIyn9vbW/X09KSurq6Uw+FQe3t7iuI2NjbU4eEh+10ulxJjY2Mzq6ur0Jewvr6OlZUVWK1W7O/v4/HxES8vL9DBOD4+xtbWFihWJ8D9/T1+fn4gRkZGJF1oaWlBQ0MDmpubkZmZiezsbHR1dWF6ehrd3d2QUmJxcRG6IBYWFnB0dASNEkL/lE1NTcjIyEBaWhrCwsJgNBrh4eEBT09Ptm5ubggODkZqairq6+uh22YkZ2dnELqirKqqQmxsLHx9feHu7s4Xo6KiEBoaisDAQPj7+0MI8T8poRsaGsLOzg6ExWLhBNHR0VwpKCiIWygvL2dUJSUl0DEwmUz8TUkpWW5uLiYmJiDy8vJkeno6/Pz84OXlhbi4OFRWVjJUsmazmS/TDGpqahi+j48PvL29UVtbC6GdkjL/gxoZGYnOzk60tbWhvb0d+fn57Lu5ucH4+DjbhIQERpGSkgJRUVEhCU54eDhCQkI4uK+vD729vcwK2YGBAVRXV2N7exvf39/clsFgQExMDERjY6MsLi5GUlISEhMT+VB1okz/Y3qpHZrJx8cHtHjYFxAQgIiICAjNtaTArKwspqm0tJQrb25usnA6OjpAQz45OQE9Dw8PKCoq4mHT4MXg4KDs6emBHiaSk5NRVlaGqakpaNnC6XTi+fkZb29v+P39ZWWSiChhfHw864akLG02G8MsLCxETk4O9zw/P88oTk9PWcoXFxf8rneCGSEUBQUFEJpLOTk5CUJBSYgqOlSlv7+fZ0F7cHl5yZbEMzc3h7q6Op6R0HAlVRseHgYhGR0dBSWkpSK9UxvX19eM4vz8nH16c9Ha2spqFLOzszN2u50rEeSDgwPW+N3dHV5fX/H19YXPz0+8v7/zN20h0UlF7HY7/gIkL01ljYA2awAAAABJRU5ErkJggg=='
    Local $bString = Binary(_WinAPI_Base64Decode($EyeBlink_1png))
    If $bSaveBinary Then
        Local $hFile = FileOpen($sSavePath & "\EyeBlink_1.png", 18)
        FileWrite($hFile, $bString)
        FileClose($hFile)
    EndIf
    Return  $bString
EndFunc   ;==>_EyeBlink_1png

Func _EyeBlink_2png($bSaveBinary = False, $sSavePath = @ScriptDir)
    Local $EyeBlink_2png
    $EyeBlink_2png &= 'iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAALvSURBVDhPPVPJK/1RFL8hSfEylSysqGfKwlRCKb0FilDmzESEMmwow/U1ZRaZFo+QhcgcCSHThhXKwkbKxp/wcT+nfr9Xt/N95577OZ/zOeeokZERx9zcnLW4uGhtbm6KXVlZse7u7qyXlxfr8vLSOjk5sba2tizG8W53d1f8Pz8/lhocHJwwTiwtLcHpdIodGhrC/v4+DADe3t5wfX2Ng4MDrK2tyb0BwMPDA35/f6F6e3t1X18f2tvb0dzcjJaWFmRmZqKoqAjmDgS3LAtTU1NYWFiA1hozMzPY29vD/f09VGdnp25oaEB6ejrS0tIQHh4Ob29veHp6iv13wsLCkJubi7a2NgEkk9PTU6jGxkZdVlaGmJgYBAUFwcXFBUopBAYGwt/fH15eXgJGH09AQAAKCwvR3d2NjY0NqPLycm0OIiIi4ObmBh8fH8TGxiInJwdJSUnIzs5GXl4eQkJCEB0dDZvNBg8PDxQUFMDoB2Vo6dTUVPj6+sLd3V2AWH9FRQVKS0vhcDiE/sDAgGRubW39n6iurg6qsrJSp6SkiMPPz0+CTVmgLrRkYrfbpRMEubi4QFRUlJTDd1ICaZJicHAwQkNDpSNGXNTU1Ijt6uoCdWIbv7+/RUxXV1dERkZC1dbWajri4uKQkJCA+Ph41NfXY3Z2Vijym0AlJSX4/PyEGR5hR8ZMpkw2zSC2MTk5GcXFxfKQ/WdGzgX1ODw8BH83NzfCgOWyNGXaoTs6OpCVlYXExETk5+djfHxc+nx+fo7n52e8vr5K5qenJ5hxRnV1tXSE8coIo/v7+4Um25WRkSHDMjo6ivn5eWxvb8PsggwNAfmfYlJcJlXDw8PaLJSIRepVVVUwuoileAQ5Pj7G1dUVjo6OsL6+LmPNGCZVY2Njenp6Gj09PSATohufaMAHt7e3eHx8lNrZQi7Z8vIympqaJIGanJycWF1dFdW5jTs7Ozg7O5Nte39/x9fXlxx24OPjQ8A4woa5iXfiD81gThB4HifAAAAAAElFTkSuQmCC'
    Local $bString = Binary(_WinAPI_Base64Decode($EyeBlink_2png))
    If $bSaveBinary Then
        Local $hFile = FileOpen($sSavePath & "\EyeBlink_2.png", 18)
        FileWrite($hFile, $bString)
        FileClose($hFile)
    EndIf
    Return  $bString
EndFunc   ;==>_EyeBlink_2png

Func _EyeBlink_3png($bSaveBinary = False, $sSavePath = @ScriptDir)
    Local $EyeBlink_3png
    $EyeBlink_3png &= 'iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAMFSURBVDhPPVNbK7RhFH1wIZPkQpGQYxGKQhlJou/CMUQkh8YMwswoowk55fWInEKR04Q0JOVUFEqTcsoFNyKlZChX/sHy7P31fVNv72H2s/Zea+0lxsbG/iwsLMiVlRXpdDrlxsaG3NnZkTc3N/Lh4UFeXFzIk5MTub29Lefm5qTD4ZAHBwfS5XLJ7+9vKUZGRqZWV1eh/sDm5iboeXl5GWdnZ3h6esLz8zMuLy9xdHQEBY6lpSXs7+9DNcDPzw/E4OCgJqVEX18furu7YbPZUFtbi/b2dszPz3MxHSLQxcVFDA0NYXZ2FmoKBhFdXV2axWJBRUUFSkpKkJGRgZCQEAQHByM8PBxRUVGIiYlBbm4uqK6/vx/Dw8NQlHF6egrR1tam1dXVQa/XIzIyEp6enhBCwNvbGz4+Pvz87/Lw8EBCQgIaGxvR29uLra0tCIPBoNXX1yM+Pp4P+Pr6IjQ0FJmZmUhOTkZ2djZycnIQGBiIoKAgBqE7nVH6QZSVlWlUEBAQAC8vLx6bqFRXV6OyspIPx8bGcsf8/HyUlpbyNNSkpaUFQiFpKSkp0Ol08Pf3R2JiIkwmE1+tra0oLi5GXFwclG0YGBhgUSMiIhiEwIXRaNQIlcQKCwvju9VqZTcaGhrQ2dkJJTRqamqwvr6O9/d35OXlMQA1YwDqkpSUhNTUVNA0JNLMzAxP0dzczEBVVVV4e3vD5+cnv5NW0dHREB0dHVpTUxPzy8rKYu70Tr6vra3BbDaDXKJFop/aTBQVFcHPz+8vgBJHozFJuPT0dJSXl2N8fJx9Pj8/x/39PR4fH+F2u3F7ewu19jwBCZuWlgahlkKj7aKPyhHmRxqojDANlQ8cHh5C5YHXe3d3l7e2oKAAhYWFEKOjoxoV2+32/3yJgtIGPT093PH4+JhdIBASkiYkfahWTE5OarTbZBFNQrmYmJjgUNHB6+tr3N3d4erqivnTNJQNspiyI6anp6coZSqqjL63t8fcie/Lyws+Pj7w9fXF9r2+vnKAKLW0hQ6HA79Eck5SZY7tyAAAAABJRU5ErkJggg=='
    Local $bString = Binary(_WinAPI_Base64Decode($EyeBlink_3png))
    If $bSaveBinary Then
        Local $hFile = FileOpen($sSavePath & "\EyeBlink_3.png", 18)
        FileWrite($hFile, $bString)
        FileClose($hFile)
    EndIf
    Return  $bString
EndFunc   ;==>_EyeBlink_3png

Func _EyeBlink_4png($bSaveBinary = False, $sSavePath = @ScriptDir)
    Local $EyeBlink_4png
    $EyeBlink_4png &= 'iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAL+SURBVDhPJVNZKIRRFL5Rtpo8EKUsUx5QJNkSxTxMKXuRyJKypBFSiGwz153sa/OgZiwREcoSWRNZkjxRiAcP5EGePH/uOf469XfvOef7zne/IwYHB81Op1PNzs6qzc1NdXR0pG5ubtT9/T3HwcGB2t/fV8vLy2pyclLNz8+rnZ0ddXFxob6/v5UYGBgY04dYWFjA1tYWrq6u8PDwgLe3N3x9feHx8RFnZ2d8Nzc3B5fLhd3dXdze3uL39xfCZrPJoaEh6EaYnp6GRsLe3h4uLy+5+Pn5GdfX19jY2IDD4UBPTw+mpqawvb2Nu7s7iK6uLtnR0QGLxYK2tjb09fVhZGSEk5eWlqDp4vDwEHoMZtnb28s59H98fAzR3Nwsq6urkZeXh4KCAmRkZCAmJgYBAQEIDAyE0WiEyWRCZWUlGhoa0NLSgsbGRrS3t2NtbQ2ipqZGVlRUwGw2IyIiAu7u7vDy8oKPjw+8vb3h6ekJPz8/hIWFITIyEnFxccjNzUVVVRXsdjtESUmJpIOEhAQuFkLAzc0Nvr6+zIAaeXh4ICQkBAaDgZkFBQUhNTUVtbW1/wySk5MZlRIIlYqDg4ORkpKC2NhY/ieNiAUFAVHjzMxMiPr6ellcXMw0qZgQkpKSWBNiRuOVlZWxDiSeUooBiGlUVNR/Az0Gz0aUQ0NDkZWVBSklysvLQXfUqKioCO/v7+yRxMREbkDMhKYm8/PzER0djfj4eOTk5KCwsBDj4+P8jKS6HhPn5+egTzsVaWlp3IAARWdnp6RnoSK6yM7ORmtrK5tK2xhPT0/4/PzEz88Pu5Q8Qoz8/f0RHh7+70Sr1cooJEp6ejo3m5iYYNuurq7ye6+srLBLyYX0hCQ86UK7IIeHh9mFWg+emxLq6uo4NABoV8j/6+vrmJmZgWbNeaWlpRCakiS6lEjR398P2g1isLi4yIukt5M1OD09hd5YZkHNm5qaIEZHR8cokbxPSLR1JycnvCgvLy+s/MfHB8fr6ysvGYnb3d2taxz4A9+TThkJSD2rAAAAAElFTkSuQmCC'
    Local $bString = Binary(_WinAPI_Base64Decode($EyeBlink_4png))
    If $bSaveBinary Then
        Local $hFile = FileOpen($sSavePath & "\EyeBlink_4.png", 18)
        FileWrite($hFile, $bString)
        FileClose($hFile)
    EndIf
    Return  $bString
EndFunc   ;==>_EyeBlink_4png

Func _EyeBlink_5png($bSaveBinary = False, $sSavePath = @ScriptDir)
    Local $EyeBlink_5png
    $EyeBlink_5png &= 'iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAL/SURBVDhPPVNbKLRRFD0pHog8YES5JHny4BaSEA1FHpRB45Zyi+QSklvxOWUGI8S4zowIpRBJLg+YEB6IiEJRCq/e13/2Lv/D7vvOae+11t5nbWEymfRzc3PSZrPJzc1NeXh4KK+uruTt7S3H3t6e3NnZkWtra3JsbIzz6HxyciJ/fn6kGBwctDgcDiwuLmJ7exvn5+d4eHjA29sbvr+/8fj4iOPjY2xtbcFut2N2dpbzLi8v8fv7C9Hf36+ZzWZQWK1WrK6u4uDggBPu7u5wf3/PoBsbG5icnERPTw9GR0cZ5Pr6GqK7u1vr6upCQ0MD+vr6GGhgYABSSii5XKha4y+de3t7GWRhYQGqXYiWlhatrq4OBQUFKC0tRXZ2NnJychhwZmaGi9fX1zE9PY329naofNTX16O5uRkrKysQNTU1mgrk5uYiMTER6enpDNTU1MRzubi4wNPTE15eXrC8vMzgeXl5KC4uZjWivLxco4u0tDREREQgKiqK/zMzM9Ha2spSj46O8P7+jq+vL0xNTSEmJgapqakoKyuDUHI0vV4PDw8PuLm5wd3dHd7e3vD09ISfnx8iIyORn5+Pzs5OBmxsbOQ2/f39kZGRAaF61SoqKhAQEAAhxP8gIIrAwECEhoYiODiYi7y8vKDT6eDq6orw8HAI1SvPIDk5mVldXFxYCbGHhIQgKCiI1dE/tZqQkMA5RMKkSpZWW1uLrKwshIWFwcfHh4vj4+N54vSkExMTUO7E6ekpiOxPra+vL0RHR4dWXV2NuLg4viC5VEwvQU9HZlKWxfPzMz8bkSUlJXErlCsUg0bGIB9QG9HR0YiNjUVRURGbyWKxsPOU5fnc1tbGQyXClJQUCOU8bWhoCORGQjcajTAYDKyAhltZWYmRkRHQvtAeDA8PQ6lGSUkJCgsLIdSFRj3+2ZeYiFVtHubn59nzTqcT+/v7vCNkacqvqqpiRwqFbiGH0SKR83Z3d7ng5uYGr6+v+Pj4YBN9fn7yhp6dnWFpaYkVj4+P4x+sH1WKKPyLHwAAAABJRU5ErkJggg=='
    Local $bString = Binary(_WinAPI_Base64Decode($EyeBlink_5png))
    If $bSaveBinary Then
        Local $hFile = FileOpen($sSavePath & "\EyeBlink_5.png", 18)
        FileWrite($hFile, $bString)
        FileClose($hFile)
    EndIf
    Return  $bString
EndFunc   ;==>_EyeBlink_5png

Func _EyeBlink_6png($bSaveBinary = False, $sSavePath = @ScriptDir)
    Local $EyeBlink_6png
    $EyeBlink_6png &= 'iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAL1SURBVDhPPVNLKPxRFL6EhJKVR2g2pNmwIAsWQ8yCxTQLyVuU8ooJE+XddRliWGAS5dHkkeeCUN7FoBQ2lEfJithh+bnn6P9fnO7vd+95fN853xH9/f3myclJNTU1pdbW1tTu7q46OztTl5eX6vb2lv9XVlbU/Py8GhsbU+RLfoeHh+rt7U0Jh8PhnJ6extzcHDY2NnBycoLr62vc39/j5eUFd3d3ODo6wvr6OmZnZzE+Po7V1VWcn5/j8/MToqenRw4ODqKvrw8ul4udyPng4AAXFxfQSHB8fMx3ExMT6OrqwsjICBfTSCHa2tpkZ2cnqqur0dLSAiklRkdHsbS0hL29Pa6uabC53W5+b21thabDd6KpqUk2NDQgPz8fhYWFfBYXFzMiSkLVCQ1VJKqE1mazoa6uDjMzMxA1NTWyvr4eubm5yMzMhMlkgsViQXd3N3Z2dnBzc4PX11c8Pz9jeXkZvb29aG5uRmlpKZ+iqqpKUnB2djZSU1NhNptRUlLCCHSn8fT0BN1tfH194fHxEU6nExUVFcjLy2PEQsORBQUFiIiIgNFoZBSEQFPDwsICrq6uGMHHxwdPZXNzE2VlZUhJSUFWVhaEhi+JU3x8PLy8vJCQkMB0qNt6/pzg/f0d39/f+Pn5wcPDA7R2EBUVxQW5iZTAarUiICCAk0RGRjIVu92O7e1tDiLb398HTSwtLQ3+/v4IDw+H6OjokI2NjcjJyUFsbCyEEGw+Pj4ICQlBcnIyamtrmW9cXNz/d7KwsLA/IbW3t6O8vJyrBgUF8SMh8fX1RWBgIMMNDQ2Fn58f3/8rEBMTAzEwMCC1gbSQkZHBAd7e3uxI3wQzOjqa6QUHB/M/9SspKYn9xdDQkBweHmaYiYmJPA0KpAoEkWgYDAbmTV2vrKxkIdHkioqK/hLQDiiloDXBE6DsxD09PZ0Fo+UOKkLKW1xc5F0gypSIEjhJ47QoemV59nTqlcXW1hY8Hg9vHm0nier09JQlTfvgcrnwC28cWcgdYmhNAAAAAElFTkSuQmCC'
    Local $bString = Binary(_WinAPI_Base64Decode($EyeBlink_6png))
    If $bSaveBinary Then
        Local $hFile = FileOpen($sSavePath & "\EyeBlink_6.png", 18)
        FileWrite($hFile, $bString)
        FileClose($hFile)
    EndIf
    Return  $bString
EndFunc   ;==>_EyeBlink_6png

Func _EyeBlink_7png($bSaveBinary = False, $sSavePath = @ScriptDir)
    Local $EyeBlink_7png
    $EyeBlink_7png &= 'iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAL4SURBVDhPPVNJKLZhFH3M80LJFMlCZCl2NsJPKUNmRRnKsCAylYy9XhlCQnwyJyXjQiQZMkYhLAwrlCixsLA8/3Ousrg93/c+9zn33HPuVV1dXf8sFos5Pj5uLi0tmdvb2+bR0ZF5fn5u3tzcmDs7O/J9bm7OHBkZMZnL/3t7e+bb25upOjs7+6ampjAzM4PV1VXs7+/j8vISd3d3eHp6wv39PQ4PD7G2tobZ2VkMDw9DA+D09BQfHx9Q7e3tRk9PD/QplwRbWVmBroyzszMJghJgbGwMbW1tGBgYkGLHx8dQjY2NRlNTE0pKSlBdXY2WlhYMDg5icXERu7u70O1At4WNjQ1hwEINDQ0CsrW1BVVTU2NUVVUhOzsbOTk5yMzMRG5uLrQ2WF5exsnJiQQByI5smV9RUYHJyUmosrIyo7y8HBkZGYiJiUFUVBRSUlJgGIZUuL29xevrK15eXrC+vg6tGerr61FQUIDa2tpfgLS0NMTHxyMyMlLO/Px8dHd3i3jPz8/4+vrCz8+PiDo6OorS0lJhS6aqsrLS4A8fHx+EhoYiNjYWycnJgr6wsIDr62th8Pn5KQCbm5vQRaVYQkLCLwB7Cg8Ph7W1NcLCwkSP1tZWsevi4gLv7+/4/v6WeHh4EB0CAgKkoKqrqzM0CFJTU+Hq6gobGxsEBweLJmyDfpMBQaiHHiQkJibC0dERvr6+UM3NzQbtS09PR0hICJRSEk5OTlKFgrIirY6OjoaLi8tfjre3N1RHR4dB74uKihAXFwc3Nze5tLKygr29PZydnREYGAg/Pz/Y2dn9PSbToKAgKE1TJpGi0QG2wccMBwcHeHh4wN/fXyoTjPd8SK1ou+rt7TU4VRyMiIgIeHl5SbKtrS08PT3h7u4u3ygY77OyssRGnnl5eVD9/f0GvTVNE4WFhUhKShItSJvO0Nbi4mLRgLvCpSNjzgq1I0Df/Pw89DqD5/T0NIaGhjAxMSGzzxHmLlxdXeHx8REHBweSq3dIO2LBf6J6WgSaqy/EAAAAAElFTkSuQmCC'
    Local $bString = Binary(_WinAPI_Base64Decode($EyeBlink_7png))
    If $bSaveBinary Then
        Local $hFile = FileOpen($sSavePath & "\EyeBlink_7.png", 18)
        FileWrite($hFile, $bString)
        FileClose($hFile)
    EndIf
    Return  $bString
EndFunc   ;==>_EyeBlink_7png

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

Br,

UEZ

Edited by UEZ

Please don't send me any personal message and ask for support! I will not reply!

Selection of finest graphical examples at Codepen.io

The own fart smells best!
Her 'sikim hıyar' diyene bir avuç tuz alıp koşma!
¯\_(ツ)_/¯  ٩(●̮̮̃•̃)۶ ٩(-̮̮̃-̃)۶ૐ

Link to comment
Share on other sites

Thx UEZ

I changed it to a jpg and managed to get it working the only problem is it still uses a square size when my jpg is rectangle.

I guess the placeholder is a preset size.

Im after the same height but 3 times the length along the top of the gui

Thx all for helping

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...