#Region - TimeStamp
; 2011-08-24 18:26:02
#EndRegion - TimeStamp

#include <GUIConstantsEx.au3>
#include 'C:\SHARE\Code_AutoIt\TEST\TransGifButton.au3'

Opt('GuiOnEventMode', 1)

#region - Transparente Bild-Datei
OnAutoItExitRegister("_DelBinaryTempFiles")
; == Picture binär
Global $aBin[3], $aPictFile[3]
$aBin[0] = "0x47494638396130003000F7000000000062440E6365397F7624616F427A7C6B3E7ECA417CC118BA7824C6793DDB7F7EAD6F52D07E5E89AC5CB7857182807F9D9C729DAD64BA8675A5B5478BDC498CD3488AD94D91D64E95DB518DD0599CCB5595DB559CDC5F95D35B9DDD468CE14C91E25095E35499E4589CE655A1DB5BA3DD5DA4E45CA3E85FA8E16797CF6193D0629BD7619DDA63A9DE6AAADF6AB0DC76ACC675A3D47EA9D578AEDA79B4D360A7EA63ABE263AAEA6AAFE568AEEC6BB2E36BB2EC76B9E87BBBF07DDE877FC2EB847929867A37887845847B568F822E87813B99862B958739A58D37A6932AA3923D968650858276988D639D98679B977F96AC70A99643A19975AEA65EBDA446BBA958AFA066A0A179BBAE63BBAD69B9AB74BEB068BEB477C2A332C3AD53CAB147C8B457D8BA4BD7BE53C2B369C1B677C0B478C2BA7BC8B97ADDC14DDAC355CFC07BDAC467D7C876DED27CE3C54CE4C853E4CA69E3CC74E9D16BE7D47BF2D97981949A918F889B97869F9F9E9BAC879EAF9284AEB698B4A492BABDA4AD8BACACABB6B4ABB5B5B684A3CD87ADD68CAFD285BEDA8CB0D68ABFDA94B8C694B2D69BB6D784BFF0A0B8D7A4BCD9B7C399AAC0A8BFC9A48EC2D685C4EA85C0F092C5ED90CCED98CFE79CCAEC92CBF0A1C8CDAFC4DBB2C4D5B7C7DAB7C9DDBFCDDEA2CCF2ACD6EAA5DAF1CCBE83C3B995C4C183C0C48BCCC184CDC18AC8D793DBCA85D2C491D0C49EDBCE94DACB9CD6D084DCD195CBC5B2D2CAA4DDD3A1DAD2B2E1CF87E1CF96E9D787E7D899F1DB85F0DD93E1D6A1E2D7A8E4D9A4E3DAABE9DBA2E8DCAAE6DCB3EEE0A5EBE0ACEBE2BCF4E4A8F2E6BCF7E8B6F5EABDFDECB4F8EBBFC4C4C4C6D8C4C6D1DFCCD5DFD2D0CCD4D4D3D9D9D7DCDCDBD3DAE2DADEE5D0F5D7CDE3F5D3E5F5D8E6F6E2DDCCE2EFCBECE5C3EFE8C5E3E2DEEAE7DCF1E7C2F4EBC4F5EDCBF6EFD0F4EEDBF8F0CEF6F0D1F7F2D8F8F1D6F8F3DBE2E3E2E2E4E8EEECE5EBECECE3ECF7EEF8E6E8F0F9F0EEE3F1EFEBF5F1E0F3F0E9F8F5E2FAF7E8FBF8EEF4F4F4F8F7F5FDFBF5FCFBFB00000000000000000000000000000000000021F904010000FF002C00000000300030000008FF00FF091C48B0A0C18308132A5CC8B0A1C38710234A9C48B1A2C58B18336ADCC8B1A3C073C21622F338901C3E7CE674219427AE583292E0F0DD73860F9CAC82F6F2A1CB974F5CBC8EE7E6D58BF60C5EBD6337FFEDEC642145A374F9EEADDB38AFEABC77CE9EE19B274C95BA6919306010B12186A675F9EC4DB5488E9ED5A0DD4EB6F381AACE0103062A5CE060C2838C4E68EDA1A3F8EDEDB973E68252539040829F0615F45EB851E3848911843CE5B4271822B9AA87119BFB062E1B03040E4841C0C08103091B3B6EC83E71828521669BD5AE5B9B10746873E0487FE3B2008A9908244AA0B0C17C870D13B26F9CB0B12251339E9C39EF3EE81B31B8EFE06695FFC942FE8186163AD2DB6861A244090F362E55B3C643448744D278A6CD998FE0B7D0DE81074C2C6460415E16574CF0820E3CA867837B1EB8000A3BD7D430820820A8A0C834D8F1F60F38BF05F7DD30B1105805165BA468861E30F0E06283CCA150020FD65843D909187E40810A4FF13450398701978C70BDF0728B1A552499E21863A8C1070D3FBCA803732EB0F3496CB48D1002081F7C20483ECA0C141A38430657A491A9A42106185580B10593A994D2872492440923252EEE908374226CD9416702FD770E99C70407CC2EBCE872CB2B69349A06186C8231061BAE3812099D51A677430F3CE829DD081B48638F7FE78C934CA1DB1CCA8B918B3A9AC61B8D42FF0A861A73B8F2C8A592BCC8430F3D786AC226F9C0421038E31C73CC37DA0C53A42EB2BCF2CA2D6B34BAE61B68C0BA661BAED862CB32A0E4EAE2229CEA49C83DD8DC624C49DF24E34DB2BDE892A8B3CF46EB6AA36EBCFA861C73D882CB2B9980120A9DE0F230C33AEAD442CC290215AAAE36DA1CAA68B3CEA6C2869A6238FA06ACF6BE0107BEAE40E26F28984CC283A8AD1C4C1031C70C330CC3C30003312BB6DC624BC5698481F1ABF6BA01EBBD6C20528825B96E62CF2C261BE4CBCAC9B6FC8B2EACA4920A2D6AAE8131B56FE87CF1D56F5031451E7B1C82083CE59A92D028BE00D30B302DF3E28BCCB4441B86B48EEAEC86DC172311C5DD4E3C834E2BA230FFA44A30BFACDAEE2D84436DB1A336DFECC6174628A104128044B34ADF0ED9228C2F6BEB420B2DB7C41187BC35EB9C061A73C3AA4411411C21C533B09811D128B704B336E16CACB1061C71C041EDDBA1CFED46124710308432CE6841512AB9DC92BCCC6234BF46EE70A8E94618737711801145442EC545C82F6F8BEE6184717BEE55BB81C611030071C7334F6834472EB9683BC7D56FC3813B1C611421C0F08070340A1DF1931FD6C4A0312DD8A100818806495241075CE8CB1672C09A1B84C0843FA0030F2411481C1CF840DDBDE10B4110421332489051C8C181287C4314967006121AC4140DD4161C84603C171E840DB8C08517AC604385C0A10A3D0CA210068748C48A0404003B"
$aPictFile[0] = @ScriptDir & "\tmp_pict_0.gif"
$aBin[1] = "0x47494638396130003000F70000000000153E0C1F5B0A3B5F382668072A700E357C1833672E3975383D7C31437D1C4A7C2449484950524F5153515958576A6A696F6D6A7173717574737B7A777D7D7D7E7E7E3E820D3E82163E84233E813E43820C4880164E83154B8A114A8A1851871B538D1457921A4186234789224A8A2C4A8E2F498E314F92254A90314B91324E93354A9039528F2250803253962052972B5A992652973754973D54983B5A9D345D9F33619F2967A22960A13B6BA7326AA53D6CA93B72AA2D70AA3F78AE3C49934C5C89455895525E935F57A55C5DA163648C4F6C985C6991687298677B9D6A61A14065A44A69A64461A3506CA85169AA5C76B04C7CB5457FB64972B05477B15779B75762A66966A36867AE6D6EAC7773B36B7EB8667DB86D7DBA747EBC7079B8797EBD8686BA4781B85F86BB668BB96F87B57281BF7D8AB8718BC1528BC66B8CC77C91C7749AD27D8384838585858686868989898C8C8C8E8E8E9090909292929494949596959696969799989898989A9A9A9C9B9B9E9E9E9F9F9F80AD858DA782A0A0A0A3A3A3A5A5A1A6A6A6A5AEA5A8A4A2A9A9A9AAAAAAACACACAEAEAEAFAFAFB0B0AFB0B0B0B1B1B1B2B2B2B3B3B4B2B4B2B4B4B4B6B6B6B7B7B7B8B8B8BABABABCBCBCBEBEBEBFBFBF85C18086C3858FC98B92CA8291CD8797CF8890CB9092CE9496CF9094CF969DC59895D1999FD6929CD6959EC9A195D0A19BD2A99FD9A39ED9A59FDAA69ED9A89FD9A9A0C698A0DAA6A4DDA2A7DDA7A1DAA8A4DEAAA4DDACA7DFAFA7DEB6A8D9B2ABDCB8B4D2A9B5DDBDA7E0AFAAE2ACACE3A8A8E1B1A9E2B0ABE2B1AEE6B6AFE7BBB1E8B9B0E9BDB0E8BFB2EAC1B4EDC7B7EFC8B8F0CBC0C0C0C1C1C1C2C2C2C4C4C4C6C6C6C7C7C7C8C8C8C9C9C9CACACACBCBCBCCCCCCCDCDCDCECECECFCFCFD0D0D0D2D2D2D4D4D4D6D6D6D8D8D8D9D9D9DADADADBDBDBDCDCDCDEDEDEC1F8D3E0E0E0E1E1E1E3E3E3E4E4E4E5E5E5E6E6E6E7E7E7E8E8E8E9E9E9EAEAEAEBEBEBECECECEDEDEDEEEEEEF0F0F0F1F1F1F2F2F2F3F3F3F4F4F4F5F5F5F6F6F6F7F7F7F8F8F8F9F9F9FAFAFAFEFEFE00000021F904010000FF002C00000000300030000008FF00FF091C48B0A0C18308132A5CC8B061C35CB874399CE890141857CA96A9A2C831218B2DA58C914B86AAA3C98147323839138B96AD2F270FBA9BC74F6192022AA06C5A6503D9939803B3CDCB974F60357008051858816294272AC1CC70FC4630933B78F0E209B4562F21810C3098B4B2226A0DC769F5BA4E3A87AEADC046F3FC250C7221C50B2FB57810AB42B15ABA75ECD699BBD62C9A403FF88A26548041468C50A7A20C43E37051377099C48D2B576EDAA27FD2B4B16BB770C3881A4D5AA9E9F4C961A26E901840C0E4AE9DBA73E5C4691EB75089871337BAF492226C4CC367DEF8188A30215C3D7B89F5E1AB278FA18B0F3470809235A5581986E22E35FF703388DAB66EE6D0A96BF72E1E69861C48E4F011AB0D1B53BB146AFB96E7810309E378C3CD34D468739E37CC381482093A70014C1AB390A19038DF6CC308058F7CA3A137DA38734925844C64840833F4C0892F62DC020B42D870B39F80DD78E3CD37323A1348470BB4B0C40FACFC728C160735F38C1E6FECA7E137D92CE207501D94B08326AFA472854195348348258944E34D254B023510202024200416456451D023972C72C925CF48E32542086800041161F032D0229554F28C33D34CF2A642481C30C41F0229428933D650D3E79F0B05304021913C52498BDB5CC3684377B079C937E284A3CDA50D25228736D8A073CE36A0326489345C6AC84DAA0B51FD53CD37F55C22C9ABB026C44D35E7ECB3CF3D7B5C836AAE0671430D3CFDF4C38F37FFC48114B1046133CD3CC9EED3CD407B5005ED3FD048230F51F6E03A5025E2A62A499BF0CC338F3C9F165447BBA9D2014D34EBB5B30E3608C1712DA87544F34C39E69833CE340AF5E1CCA582EC29A337DD1CBC10268EFC590933CC686331360E2F6441365EF259C925D2841C8D610EC9414D4CCF6C938D33CDB4CC8C9B146913CDC91C61D34D228478738D2596441322459938624947E1D0DC0838963CF3334570AC4A3045E50C248938D41C72921DDD444DD138CF42F34D2231C181083D5A3BE40738D554D38D1E5EC2612B4773E0214705DBD66DF7DD78E7CD5040003B"
$aPictFile[1] = @ScriptDir & "\tmp_pict_1.gif"
$aBin[2] = "0x47494638396130003000F700000000001E4F65364E59384F5A38505B3B535D20516624546929596E2C5C72335D6F3F566031607636657A3B617238677C39687D4259644960694A636E4B646F4C626B4C656F4D66714F687350656E5A696F506872516974566A74546C76566E795A69705A6D755C6E75596E785C6F7857707C5C727C61727A61757E65737966747A64757D68767C6A787D3E6B814472864673884873874A768B4C798D5A75805E78835C7E8E517D91617680647681627881627984657982657A84657C85647E89697A82697D866F7B816C7D836C7F876A7E88797E805380945783985984995D899D6E80876A80896D808A6D838C6F848C61849370828B70838C71858D77858B75858D76888F7981877A878D79888E7C898E718791748790738890758891788A92798B947A8C947E8A907C8B947E8C917D8E957E90977E9098608BA06590A46892A66B95AA6F99AD7794A17099AE7F9BA8739CB178A1B57CA4B98484848085888A8A8A808C91818E95858E9482909680929982949B82949D85919885949A85969D87989F88939888949988969C8C969C89989E8E999E909090909A9E8396A08599A2899AA1899DA68D9BA28D9CA28E9DA48A9FA9909BA0919CA1909EA5949EA3959FA48FA1A78FA0A982AABE8CA6B291A0A694A0A592A1A894A2A895A4AA96A5AC9AA3A798A4AA98A6AD99A8AE9CA9AF95A8B19AA9B19DAAB09EACB19CACB4A1ADB2A1AEB4A6AEB3A5AEB4A8ADB0A1B0B6A4B0B5A5B3B9A5B8BFAAB0B2A9B1B6ACB1B3AAB3B8A9B5B9AAB7BCACB5B9ACB7BCADB9BDB0B5B7B0BABE87AEC28AB1C58FB6C990B7CA94BACE98BED1ADBAC1B0BBC0B1BCC1B3BEC4B4BEC2B4BFC49EC4D7A7CCDFB5C0C3B6C0C5B9C2C6BBC4C7BCC3C7BAC3C8BAC4C9BDC5C9BFC8CBBEC8CCC0C7CBC1C9CDC2CCD1C5CDD0C5CFD4C7D0D4C7D2D8CAD2D5CDD5D8CED8DBD0D6D9D1D8DAD2D9DCD5DADDD6DCDED7DDE0D9DEE0DAE0E2DBE0E4DCE0E2DDE2E4DEE4E6E0E4E6E2E6E8E5E8EAE6EAECE7ECEDE8EAECEAEDEEECEEEFEBEEF0ECEFF0EEF0F1F0F1F2F1F3F4F2F4F4F4F5F6F7F8F8F8F9F9FBFCFCFDFDFD00000021F904010000FF002C00000000300030000008FF00FF091C48B0A0C18308132A5CC8B0A1C38710234A9CC8D04C902A14330A9CD2889D3F7DD30A0571A4F1611354CE9C8DF3C792A5395451BC9444384A4A3363826AF142E48C25BB7C2DEB212B1364D2CC815CC4F903056A56A52CF1F42D3184E88B397EFA6CF5E993C74F102B33C7941195ADD9AD6AE9DEF91B176A50AF7CC80465B973A7CC34589A4255E1B1896219679BB20C391142040F6DE2E4E9DB970D88A1402BC60DEA50608004125F36E9C10116E21867AC226149A141C38A6BD9B67503A7EE1DB96CD72208984D5BC0820C2B260D0A922354C32FD05A45CAA2A2F4896AA8BB79F3064E5C3973DD26A1A840A0760413AA8CF5BAD5A84908550A81B7FF92A4A5B88613CEA6255F3D6E5CB9E7E3BA8DE2914102905B7FA674BA750BD62A545F98D009425F4C430B79E69980CC2EA218738D6ADE8843CE39EAA883CE39E294D54C1426E4B14111B0A872CA28A17012C5230715786079A591B04B210244E14C72DE84338E39EAB0E38E3BECB043CE35B6F8D1C97FA488E209278F3832C2415E18481E0BA589A08B23042CA00A35D764994D3737A6A3A33CF3D8238F3BE7EC32E2279D68F2C82280047190150652A205941A88008B2D8E3C624C2CA9C4624C32D154D3CD84EBB4F38E3CF6E4A34F3CBA1C3989238BFCB1879B065511A7187486B00A2CB070A2482CD138739331BBEC328D3738B6E30EA2F8E8738E9A8B44FFAAC7199416548535B4508269692188A20824B14873CD34C614B30B2EB7C4E25F35387E59CF3DED4CB2C8207FCC1A46109A548A6B2562B4A001083A2442CC36DE90C3CE39E174630C2CAF8858A431CDB613CF3CEEACF2071F6794F1851741FC61D014D6DC52891D2D80E0C425B814D38CA8829ED38E3ADD8C68649AA998E3A5AAF11863EDBE5304215341525893CB2604FBC0482CD54C23CD4DBBDC624C363982330A2793ACB9082EE6A4EACE356584E1C5145334114411064971CDC864FC514D7BE364C3CC2EBA282B6233E3A8438E28B1DEABC7A0CD7A03C6CF5208DD030F064571F424DDF0B38F3EF8D8438F3BE014B3CA29466A120BAADE54AB47CF7F88FFD325385C045D840F3CE08083414D5C33CA3B8BF1C3123F58E5334F3347AEF9C72936EE7246185F4F618C381282137610639B603AE2CE54E34E3CF2D473CD2E97C4B28E3FFDF0930DA4D596D14C37DDE8F173D08B28178E374F0451B8E9239880F82A5D4E138503061C900003369CC34F3FD9E86186CF5F5CD34D334E345144104E6CC9FB14C79BF00107CA17D4042EBC5F13C4070120D0C00B32C0F00237F6DCC3C9CF4E608229861504C2E90005D2D85236B8603A137880031BD081418A60AA6B14620A0A3800046690043428E1063230873BC25105B14DC119D2E0020E1A188B2C61C30BEAE300072E30811E4CD065C8D0831E0EC0001928C10D7180431AFF6EF0068B89C2073A301D2E8CA109D37DC003A9105635BAB0BE0DD070024D30481050C1A99A1900024758032682F10B3824E105ABE9050A4CE78151DC62140FB4E22B9A110D691401821498801EC1A0C551A80215A73885035C900438006319C390031A64D0C26938D08A8B50C5236648010BACE24FCDC0C115F548017F152408A6D8452E70810B1BB8000970F8853284A1C81728C219CFD0C105F298884F9C418F13F0412C76518C637C00977ABC"
$aBin[2] &= "00270C6287513C4354CEC0850B6EA00639F802136C48820B14718B5D1401978B78C43527400146AC22164BDC64307D63102CEC424BD928C50B92A00636AC41093368C02550A10A13E811038AD0C32F27B0FF054EA0A215B1200630F5F88184148277E020C7386431831B20E10832800014F8030B0BE8D10961F8C1042EF0833F7C6214A7F8E64037B00485DCE21CE430073BDAF18D4CDCC0051068C3C290010B824EC1071830C10FF6F0084D784214A8F80430D9C7906BB4A347F2C08752F1418FA665C90B13F8C00E7650831F74410F7F58842326D10954DC72A326A082438C518F31B9A3ACEE30477BC0710BF695A0AA4EE00218CA80D54264D3144C605F4921A20A7BE8E31E628A078FD4710D26D080063BB8021E12A1087C85E10C7B18842352E1038C4C0411AD1887DAD8A68E4E08C1084698431D0E31105794E8128FB84429247114420CE20E62A08368477B94DA0DDAF6B6B8CDAD6E77CBDB820404003B"
$aPictFile[2] = @ScriptDir & "\tmp_pict_2.gif"

For $i = 0 To 2
	Local $hFileOut = FileOpen($aPictFile[$i], 2+8+16)
	FileWrite($hFileOut, Binary($aBin[$i]))
	FileClose($hFileOut)
Next

Func _DelBinaryTempFiles()
	For $i = 0 To 2
		FileDelete($aPictFile[$i])
	Next
EndFunc
#endregion - Transparente Bild-Datei

$guiMain = GUICreate('Main', 400, 300, 200, 100)
GUISetOnEvent($GUI_EVENT_CLOSE, '_exit', $guiMain)
GUISetBkColor(0xFFFFAA, $guiMain)

$GifButton1 = _GUICtrl_TransGifButton_Create($guiMain, '_ImageClick', $aPictFile[0], 60, 126, 48, 48)
$GifButton2 = _GUICtrl_TransGifButton_Create($guiMain, '_ImageClick', $aPictFile[1], 176, 126, 48, 48, $WS_BORDER)
$GifButton3 = _GUICtrl_TransGifButton_Create($guiMain, '_ImageClick', $aPictFile[2], 292, 126, 48, 48, $WS_THICKFRAME)

_GUICtrl_TransGifButton_Show()
GUISetState(@SW_SHOW, $guiMain)

$t = TimerInit()
While 1
	Sleep(50)
	If TimerDiff($t) >= 3000 Then
		_GUICtrl_TransGifButton_SetImage($GifButton1, $aPictFile[2])
	EndIf
WEnd

Func _exit()
	Exit
EndFunc

Func _ImageClick()
	Switch _GUICtrl_TransGifButton_GetMsg()
		Case $GifButton1
			MsgBox(0, '', 'Picture-Button 1 geklickt')
		Case $GifButton2
			MsgBox(0, '', 'Picture-Button 2 geklickt')
		Case $GifButton3
			MsgBox(0, '', 'Picture-Button 3 geklickt')
	EndSwitch
EndFunc