[FlatX007]

Больше ничё умнее не смог придумать ... (Изображения кнопок запихнёш в папку со скриптом) ... или всё сразу в архиве

Код:

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

$Left = 232
$Top = 8
$Width_Button = 95
$Height_Button = 45

Global $PushButtonINFO

$Form = GUICreate("Test Button", 332, 58, 302, 218)
$ButtonINFO = GUICtrlCreateButton("Справка", $Left, $Top, $Width_Button, $Height_Button, $BS_BITMAP)
GUICtrlSetImage($ButtonINFO, @ScriptDir & '\' & 'Help.bmp')
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg(1)
    Switch $nMsg[0]
        Case $GUI_EVENT_CLOSE
            Exit

        Case $GUI_EVENT_PRIMARYDOWN
            Switch $nMsg[3]
                Case $Left To $Left + $Width_Button
;~                  MsgBox(0,'',$nMsg[3] & " - " & $nMsg[4])
                    GUICtrlSetImage($ButtonINFO, @ScriptDir & '\' & 'Cancel.bmp')
                    $PushButtonINFO = 1
            EndSwitch

        Case $GUI_EVENT_PRIMARYUP
            If $PushButtonINFO = 1 Then
                GUICtrlSetImage($ButtonINFO, @ScriptDir & '\' & 'Help.bmp')
                MsgBox(0,'','Готово')
                $PushButtonINFO = 0
            EndIf

    EndSwitch
WEnd