Jump to content

Recommended Posts

Posted

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.

  • Moderators
Posted

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

 

Posted

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

  • Moderators
Posted

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

 

Posted (edited)

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
  • Moderators
Posted (edited)

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

 

Posted (edited)

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!
¯\_(ツ)_/¯  ٩(●̮̮̃•̃)۶ ٩(-̮̮̃-̃)۶ૐ

Posted

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

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
  • Recently Browsing   0 members

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