Код:
#AutoIt3Wrapper_Res_File_Add=1.bmp, rt_rcdata, G1
#AutoIt3Wrapper_Res_File_Add=2.bmp, rt_rcdata, G2
#AutoIt3Wrapper_Res_File_Add=3.bmp, rt_rcdata, G3
#AutoIt3Wrapper_Res_File_Add=ANI1.gif, rt_rcdata, ANI1
#include "resources.au3"
#include <ButtonConstants.au3>
#include <GuiConstants.au3>
#include "GIFAnimation.au3"
$hGui = GUICreate('', 330, 144, 330, 144, $WS_EX_CONTROLPARENT)
$PicBack1 = GUICtrlCreatePic('', 0, 0, 330, 144)
GUICtrlSetState(-1, $GUI_DISABLE)
_ResourceSetImageToCtrl($PicBack1, "G1")
if Not @Compiled Then GUICtrlSetImage(-1, "1.bmp", -1)
$B1 = GUICtrlCreateButton('', 12, 71, 131, 20, $BS_BITMAP)
_ResourceSetImageToCtrl(-1, "G2")
if Not @Compiled Then GUICtrlSetImage(-1, "2.bmp", -1)
;-------- ( если компилировать без этого, то будет все нормально )---------------------
$B2 = _GUICtrlCreateGIF(@ScriptDir & "\ANI1.gif", "", 21, 21)
if @Compiled then $B2 = _GUICtrlCreateGIF(@ScriptFullPath, "10;ANI1", 21, 21)
;--------------------------------------------------------------------------------------------------------------------
GUISetState(@SW_SHOW, $hGui)
do
$msg = GUIGetMsg()
Switch $msg
case $B1
_ResourceSetImageToCtrl($B1, "G3")
if Not @Compiled Then GUICtrlSetImage($B1, "3.bmp", -1)
sleep(211)
_ResourceSetImageToCtrl($B1, "G2")
if Not @Compiled Then GUICtrlSetImage($B1, "2.bmp", -1)
sleep(211)
EndSwitch
until $msg = -3
Суть проблемы: после компиляции при нажатии на кнопку она должна меняться, но GIF анимация в GUI как-то мешает этому процессу и кнопка ломается.
Как сохранить и меняющуюся кнопку и анимацию при компиляции?