Animated GIF Gadget - Another approach [Windows]

RASHAD · Post by **RASHAD** » Sun Mar 11, 2012 6:47 am

Tested with XP x86 - Win 7 x86


cur = LoadCursor_(0, #IDC_HAND)

OpenWindow(0, 0, 0, 640, 480, "",#PB_Window_SystemMenu |#PB_Window_SizeGadget|#PB_Window_ScreenCentered) 
  SetWindowColor(0, #White)
  
  Length = ?mail00008_gif_end - ?mail00008_gif_start
  Filename$ = GetHomeDirectory() + "AnimGIF.gif"
  
  CreateFile(0, Filename$)
  WriteData(0, ?mail00008_gif_start, Length)
  CloseFile(0)  
   
  ButtonGadget(0,10,10,100,30,"Quit")
  ContainerGadget(1,10,50,40,40,#PB_Container_Flat)
  WebGadget(2,-8,-10,70,70,Filename$)
  CloseGadgetList()
  
  DisableGadget(2,1)

Repeat 
    EventID=WaitWindowEvent() 
    
    Select EventID 
        
      Case #PB_Event_Gadget 
        Select EventGadget() 
          Case 0
            EventID = #PB_Event_CloseWindow
        EndSelect
        
        
      Case #WM_MOUSEMOVE
              GetCursorPos_ (@p.POINT) 
              ScreenToClient_ (WindowID(0), @p)              
              Select ChildWindowFromPoint_ (WindowID(0), p\y<< 32+p\x)
                 Case GadgetID(1)
                     SetCursor_(Cur)
              EndSelect
              
      Case #WM_LBUTTONDOWN
            If ChildWindowFromPoint_ (WindowID(0), p\y<< 32+p\x) = GadgetID(1)
               Debug "Left Button Clicked"
            EndIf         

        
    EndSelect 
    
Until EventID = #PB_Event_CloseWindow
DeleteFile(Filename$)


DataSection
  mail00008_gif_start:
    ; size : 6436 bytes
    Data.q $001F613938464947,$0000000000F7001F,$8080008000000080,$0080008080000000,$C0DCC0C0C0C08080
    Data.q $0000540000F0C8A4,$00542400002400A8,$004800FF2400A824,$4800A84800544800,$00546C00006C00FF
    Data.q $009000FF6C00A86C,$9000A89000549000,$0054B40000B400FF,$00D800FFB400A8B4,$D800A8D80054D800
    Data.q $24A8FF0054FF00FF,$A800245400240000,$2424002424FF0024,$24FF2424A8242454,$A848245448240048
    Data.q $6C24006C24FF4824,$24FF6C24A86C2454,$A890245490240090,$B42400B424FF9024,$24FFB424A8B42454
    Data.q $A8D82454D82400D8,$FF2400FF24FFD824,$48FFFF24A8FF2454,$A800485400480000,$2448002448FF0048
    Data.q $48FF2448A8244854,$A848485448480048,$6C48006C48FF4848,$48FF6C48A86C4854,$A890485490480090
    Data.q $B44800B448FF9048,$48FFB448A8B44854,$A8D84854D84800D8,$FF4800FF48FFD848,$6CFFFF48A8FF4854
    Data.q $A8006C54006C0000,$246C00246CFF006C,$6CFF246CA8246C54,$A8486C54486C0048,$6C6C006C6CFF486C
    Data.q $6CFF6C6CA86C6C54,$A8906C54906C0090,$B46C00B46CFF906C,$6CFFB46CA8B46C54,$A8D86C54D86C00D8
    Data.q $FF6C00FF6CFFD86C,$90FFFF6CA8FF6C54,$A800905400900000,$2490002490FF0090,$90FF2490A8249054
    Data.q $A848905448900048,$6C90006C90FF4890,$90FF6C90A86C9054,$A890905490900090,$B49000B490FF9090
    Data.q $90FFB490A8B49054,$A8D89054D89000D8,$FF9000FF90FFD890,$B4FFFF90A8FF9054,$A800B45400B40000
    Data.q $24B40024B4FF00B4,$B4FF24B4A824B454,$A848B45448B40048,$6CB4006CB4FF48B4,$B4FF6CB4A86CB454
    Data.q $A890B45490B40090,$B4B400B4B4FF90B4,$B4FFB4B4A8B4B454,$A8D8B454D8B400D8,$FFB400FFB4FFD8B4
    Data.q $D8FFFFB4A8FFB454,$A800D85400D80000,$24D80024D8FF00D8,$D8FF24D8A824D854,$A848D85448D80048
    Data.q $6CD8006CD8FF48D8,$D8FF6CD8A86CD854,$A890D85490D80090,$B4D800B4D8FF90D8,$D8FFB4D8A8B4D854
    Data.q $A8D8D854D8D800D8,$FFD800FFD8FFD8D8,$FFFFFFD8A8FFD854,$0024FFA800FF5400,$24FFA824FF5424FF
    Data.q $FF5448FF0048FFFF,$006CFFFF48FFA848,$6CFFA86CFF546CFF,$FF5490FF0090FFFF,$808080A4A0A0F0FB
    Data.q $FFFF00FF000000FF,$00FF00FFFF000000,$0BFF21FFFFFFFFFF,$455041435354454E,$0000000103302E32
    Data.q $746165724319FE21,$2068746977206465,$454E4F20656B6154,$04F92100352E3320,$00002C0000000809
    Data.q $0807001F001F0000,$A0B0481C080100F2,$10B85C2A130883C1,$87443218E97CBE5D,$4C1A250E8BC58CCE
    Data.q $A90D170019A2E677,$3E6A74C0A34E8749,$E88D3E5CC8633422,$33C4E232C84CA90C,$416671585496591A
    Data.q $A0D1584500CD049B,$46A3340A49118B4B,$4A5D3DD1029F3A61,$F492A11BAB482772,$127B04AC1AAAD149
    Data.q $C1418A00286E9734,$6682B99D304A9C0E,$B0A29D10797D06C8,$586A143A94148CE9,$ED54BBA5EED1039C
    Data.q $D03B7B9AF7659F5A,$AABE12A533A8E18C,$ADEA075599CF2A94,$46854FAE41AFD20C,$4F4DA5E7B19169DD
    Data.q $098B6129F14C2452,$95E9E978FCEC9A8B,$58A2529866A721B5,$F4532CF4F64D1785,$7C7C77178BA1006C
    Data.q $4E9F4B9B6687C930,$0904F92100407ABD,$0000002C00000008,$FF0807001F001F00,$C1A0B0481C080100
    Data.q $1F30C85C2A130883,$C6A353A21D10863A,$883441F2E83319CC,$321E3F208F999D0E,$248CE80046E34E94
    Data.q $D31B74A1D1486434,$1094C42492D854A9,$45442790B87A2A59,$BA23F19844F54CA7,$24D079F2AA594774
    Data.q $8E64522E050E3341,$C9F4620D449B22A7,$1D861130964998D2,$8D4C86B0D82095B8,$9766A4198016B835
    Data.q $4743532132F43539,$82D3915749E5E2CD,$CB2D178B25C30066,$6C76FAE476C98184,$B02C5D3E332BB6CB
    Data.q $0BDDE2071DC742E6,$33A63B6B83D326A0,$1F13577CA1A5967A,$3B92C6C9A90E9CFC,$0AB04D3210A45A9B
    Data.q $82EF60BB6ABCD33F,$49F4DC0DD46D0D3A,$10E6645A1A0FA300,$48A8A99B46F985F1,$5893E607C7D8CB0D
    Data.q $038BC3E0EFF67B72,$0904F9210010184F,$0000002C00000008,$FF0807001F001F00,$C1A0B0481C080100
    Data.q $A1B0C85C2A130883,$267333A5D2660043,$08C21A0B0F743A22,$DA990C87451990C0,$9D0D067CC8401198
    Data.q $512286C714CAA432,$0D972AD8CC75341E,$9FA998D0797AA955,$B29950A9C4B618C6,$554AB5341A78CA65
    Data.q $D178F44DD0878D3A,$68ECC94D3F82D2A8,$33A596AA533A2368,$0E9CCA84D3E8EE97,$D149A44A114AAAEC
    Data.q $2FACC2282C67CB19,$8931A6B4F7CCF94D,$3994D6084B1DCD73,$99546534629D4D81,$4C7995EA6767AB44
    Data.q $5632A98EC6943A2F,$C32956CA836468D5,$A54ECA55002A556C,$313563C273975B93,$17B4DE8019765D1A
    Data.q $9B802933F855227F,$32E2573A6AAA2EC7,$B91BFB158209579D,$CA7555F1974D9D39,$87CE3A754FA042D4
    Data.q $52BA59496322D0CE,$2F2EAE61D4F84CF4,$766531D4F52C348B,$E4DF95508CFCD2EF,$4335B3E837D27504
    Data.q $B10E7553A5DD6A95,$815444A93F409FB4,$82288A2188B575F4,$6A85C6644C8642DF,$D171990549524228
    Data.q $962488E228721387,$080904F921001014,$000000002C000000,$00FF0807001F001F,$83C1A0B0481C0801
    Data.q $43A1B0C85C2A1308,$88CC6632290C8B00,$CA653AAA0B0F6532,$889219148A74AA94,$CB1D4F1D63A9A331
    Data.q $AA1F258BCB954007,$6D0374BA194CB652,$179A31A1EC69DBE6,$743A1F314814B18D,$39A0AE8A3CC21D3D
    Data.q $E98E67CC2A6347A3,$F3691B9A3AAA8E51,$BB1C528F3BAA4358,$3B1AA90BA1D15CD3,$29D137B3B1D8CF9A
    Data.q $8ACAA8D86D33874B,$4684DA2856D745AE,$BF532A1307CD3DCD,$5F26D779E522ED4D,$E56E6BA60618E69D
    Data.q $794C264A91989DDD,$8AFD42F98EA33A59,$4D7F2D3BBEDB3419,$DAF7ACC131EE97C7,$4CE99DDFAADA48BC
    Data.q $50C05FF74CB63BE5,$B631EC6CBBA39B61,$EB1F34EC8CDED90D,$DD3CED631A174974,$0E986DD6D9738232
    Data.q $7C2AFA2930EC4D26,$02331B8BCD60765B,$4487434F54D14938,$8697C7A05EAF721E,$AE40FEBD135FE8CC
    Data.q $18160480E027F96D,$00080904F9210010,$1F000000002C0000,$0100FF0807001F00,$0883C1A0B0481C08
    Data.q $454361B0C85C2A13,$41E1D1053C4622A6,$916CA6532D951863,$124744122CA643A2,$96329D4CF98C3E5D
    Data.q $34C5D0E974C0E44F,$0A5D247331D4CE67,$7CF9434CE62CB74C,$387CBA671327CCEA,$98B9A492E4339A4B
    Data.q $5310C8A55471D144,$1151AA0D11F35191,$B41655129AE8533A,$674589D367433A24,$64924540B4512BF4
    Data.q $8A8F32A7A9DD14E9,$4B5153B2AF92498C,$AA742A9F366935CA,$995261D577CB99D2,$60ECF3053BE54D25
    Data.q $6D75E74622BF84B6,$72EB54C26AA698C9,$E992AE23409251EB,$6D190EA6A3D9AA12,$92B196C2D6A8F44D
    Data.q $6F5AA1CC66749A24,$009D3198EC7C5C9B,$E446E38AAA249B4E,$6354CAA55D4B0327,$98EC6654714CC697
    Data.q $188F097E05C8EBD5,$000203C8F3F9BCBE,$000000080904F921,$1F001F000000002C,$1C080100C2080700
    Data.q $2A130883C1A0B048,$20A65543A1B0C85C,$18534261CA643A2A,$8445996CA633194D,$C99F2E865B99D2E8
    Data.q $1CCE874C8A43078F,$52C74CB5D106943A,$67CB2A652582CC26,$5486792E7CC0E6F3,$165F219A4EA073E6
    Data.q $874B74CCA652A005,$3D935025951A4526,$9BD658D347CD267D,$D42792673329F2E9,$2D14474B9A6B39A2
    Data.q $F2E734F2615FA456,$8B3C9AB956A2D2A9,$46027D77B257A436,$1A4B3AB5D32975CA,$F942A762EB135976
    Data.q $4B8F3E6CAC7934FA,$CC2A956A6CDB1D8D,$E190DA443688CD4B,$2100080C1F53A8D3,$2C000000080904F9
    Data.q $001F001F00000000,$481C080100FE0807,$5C2A130883C1A0B0,$9914864343A1B0C8,$23088729954A655A
    Data.q $C66329D54CA6321E,$63C5954AB82C622E,$40E46E895BA1CCE6,$2633174471F2F943,$2E974B99F3029748
    Data.q $A9C4AE62E694BA5F,$74B668E99FD0A793,$1A7A8A92A1D0CE89,$4CC763A1A9B38A4D,$8A95CF2994AA54A9
    Data.q $A64F596E89FBA1F2,$592C52B653A6B52B,$9D35B964B10D30A6,$D34B1A1DD08A74CB,$BAFDCAF34C98D267
    Data.q $F5CAE4F99739AFF2,$D29B8991D0EDD3A9,$D110975898F42954,$E891E5F0B3E96299,$535C2C793C2E0E24
    Data.q $646C768B6DB6FF9B,$26962BCD72AB7DB2,$135C6D066B309C4F,$E63EAAFB1D8E8027,$CB1A6B5843AAA2BB
    Data.q $1BA2CB6346801BE7,$20A64340B9ACA553,$0191F7BBBDCEB442,$00080904F9210001,$1F000000002C0000
    Data.q $0100FF0807001F00,$0883C1A0B0481C08,$654361B0C85C2A13,$2190C8B4331996CA,$54CA743459970887
    Data.q $71853A9954AA53BE,$18848E46C75331A0,$34B1D0F900496591,$7A312D993A18D025,$D2E881BE59531744
    Data.q $31A231A31447CB2D,$8731A6537A2411D1,$D594D216532D0D37,$9D13274C3A9337A1,$53CA649D8EC6AFB1
    Data.q $2654F66CF9734369,$3571D2E6733A1974,$12F177A6B2A6F0BB,$B2C7B7C36DCE663D,$1E745FE9965BC51E
    Data.q $B962AB1419B509F3,$D7AF3729B399D367,$682E66560E1B4DA6,$15DB3CFE839F7CDE,$3875DEEF8CB9B1AD
    Data.q $6D72E7A7B2C42595,$73388A55606ACF98,$9353962AB0F98C65,$03D1DC2930CAD662,$826766FC5E464A91
    Data.q $C0EF3AF8C5A2898C,$9955FB051B038CBB,$797B231EBF937CC0,$7D3FC569952AD4D2,$D50C663319D94009
    Data.q $26CA9AFB22F2155E,$01FFFFBFBFCFBFDA,$00080904F9210001,$1F000000002C0000,$0100FF0807001F00
    Data.q $0883C1A0B0481C08,$7CC321B0C85C2A13,$439D0E974C48CCE6,$224868D21914E984,$4E881C5D0C877480
    Data.q $67CC124486532A95,$34C994E886CA9548,$1A1CA64329DD1079,$173453BE6133B9DB,$AA533E61515654C6
    Data.q $7432996E985A9D4E,$CAE38F974299D0C6,$AA0E88AB2E172763,$D24552AD4D105339,$CAEB99970AA02994
    Data.q $52AA0748635769F6,$C9F2F963452154E6,$8D318159ACD6E74C,$00634F2F35BBB31D,$BB4F1CD39A429EBA
    Data.q $DBF253B7CDE18EE9,$B0D466553A3F7053,$6CB98E726515C7E1,$8534F22AC6C15199,$75A739A5ADD3AF97
    Data.q $A5D0C763B2EF560A,$F37B63D1B4DA4C3B,$3255EA6654DA9D9E,$96551F327DCBE67D,$6CA4CE963B2B8B15
    Data.q $79C86B35539D8E84,$DDC449E514AB553E,$FB1DCD0AE4E8A133,$2D573184DD7450BB,$E34783E232B9485D
    Data.q $64B341A73E0BF436,$08A8148A29D4745D,$292C409234A0E941,$4A4E84486A1A86B2,$A855795E55D4160B
    Data.q $00405068761C86E1,$000000080904F921,$1F001F000000002C,$1C080100FF080700,$2A130883C1A0B048
    Data.q $0110863A5D10985C,$138B1A8CC66743A0,$8AC763A867441A23,$3A2051A7CBA08D15,$9CC4684219168A45
    Data.q $D1D88BA219288E46,$A532ADD10B924454,$53A61533844E208A,$9A46664521A1D364,$273D9E42696F9839
    Data.q $049FBA4012B43BA2,$9347627455353E1F,$C990F1D84CBA0D4D,$EAAF982D2A074774,$571B6B9A048A8EC1
    Data.q $553532B503A73A6D,$6D66C356B75B5F35,$8EDD688959914AA8,$E9728F4228304A1C,$E6BEC9E158DB6E36
    Data.q $4550B2B1C9357DCC,$6033867BBBA61D2B,$EBD71BBD990D06BD,$D85B65E20946A4DD,$E91E8DF34B89D4AC
    Data.q $3C2EAD25BE21E119,$D650F9846A22336A,$9306C061B9309E0D,$222341A2A86BFC6A,$AC7622F17EAC7399
    Data.q $B99E091B0AA747DA,$21000407D3E8F3F9,$2C000000080904F9,$001F001F00000000,$481C080100FF0807
    Data.q $5C2A130883C1A0B0,$A2190C7CC39F3098,$0C6735198CC4674B,$1674BA60D11743A1,$8EC7235244319A07
    Data.q $C9D1523434262600,$63B309721A572F88,$CE97CCBE5F0B8849,$333429CC865521A0,$2C0A70E98BC6E4D0
    Data.q $027B1AA5D120D319,$950A9FD1684E8998,$4565BA2A12A35002,$8249A6305AD2194D,$5A29AA65340E3F33
    Data.q $94D2F7CD42D486B4,$11B33568CD094322,$BA9426F133A94BAD,$229A6727A0D99CD4,$2D0D2F653A6D14EC
    Data.q $2971AD42EEF53BEA,$563342E4B3DA0D4F,$7332B2B7C743A6B7,$602054F8429AD942,$D55944399AE31074
    Data.q $57C904108D04B221,$381DB954AAD8C6E7,$0C1F8B09C15DE15C,$910E86866EA0DB8C,$53284574A57CF8EC
    Data.q $AEECCD0D5D2826B6,$736F9DED9C1254CD,$BDBE0E568F471394,$F921000203F0F7FB,$002C000000080904
    Data.q $07001F001F000000,$B0481C080100FF08,$A85C2A130883C1A0,$343218E6743A5D10,$290C8633199D0E84
    Data.q $04E843C660D127CA,$028EC854D1943C62,$97A9A0AE955A990D,$B294CA7894725EAA,$554AA653198D2E93
    Data.q $3449D41671406547,$A65BA156CA9D42E2,$9BE58D4493C0A5AC,$A274C76353281099,$B1528E29914E97CB
    Data.q $5BA8BA2CACB83D0A,$AA399CD407CCDE5F,$B1AB0A674D015708,$D8F53ADAAAACE974,$340B2B2A6F40854D
    Data.q $58453ADF7C63545F,$3CEB0D85A6002756,$A2EF93855CDD1156,$30C6CAC419783B65,$59A254F337B6329F
    Data.q $B2C87210B63BE6F9,$5E6DCC77465AA4CB,$DF33AC932A610B87,$D3D84E2ED915BB59,$2655E77D41CAE664
    Data.q $34594F15DE4A9571,$02B2C79770EF1157,$33BE55219D2868C8,$A3D298DB9C973E06,$DA3312BDCF31CD58
    Data.q $A3B3DA05554D3589,$0A7534C205634546,$80C8A77104AFC4EE,$94606A45D19449F9,$0D6A9534112875D1
    Data.q $1014761484E12846,$0000080904F92100,$001F000000002C00,$080100FF0807001F,$130883C1A0B0481C
    Data.q $0C63B190D0B85C2A,$65B194EAA53A2A17,$B1A0D1165A190C8A,$A34A67432994C687,$AE891C0E3ACA55A2
    Data.q $6532A996006332A5,$339A472A94AA98CA,$B65540914ADD2E97,$D2F96340E78E996C,$3D7450E1938A4BA1
    Data.q $AAD55CCF90054597,$CDE1EE8A94B69F1D,$AA4E87350EB34A9E,$70BA6BE69123A439,$99E5825CF9B4D929
    Data.q $1D0E974AA1C26D8E,$A2B51153D163EF99,$A18196D228783BE3,$89745C70CC6BA61A,$6564D8F679EDC71F
    Data.q $D3EC18FCDBE63B3D,$DD3567462732C674,$F11C8636F3839E32,$AD25D6472EABEBA3,$15D6A4CA65E36692
    Data.q $0F370B883A196CB9,$0CC663B1E6EAAE16,$03D66129D3096CD5,$825235D488ED8327,$4AE7D4A91607459D
    Data.q $1B89BC2A779B75DF,$6D76B6ED2FDE40B3,$24AA42ABE2F1400A,$291487454D7E0A68,$05FDD746A0BF3F12
    Data.q $0010142A0480E028,$000000080904F921,$1F001F000000002C,$1C080100ED080700,$2A130883C1A0B048
    Data.q $4D0986A1A050C85C,$8B652A956A653319,$653A195058843D14,$29D54867CB19F320,$A5AE87CCA9F3058E
    Data.q $2E974C12513063B9,$28DB1DD12D973A5F,$53A23D2A96B99D33,$AE73349640A64E99,$9F2A9A3A26F46954
    Data.q $1E74CB68D4F453A6,$9CD35F31AA931DF3,$D0E9F5696D4E893E,$A9D659BA1E58E6A1,$EF9B2D910D516539
    Data.q $C0051A6C86964DA7,$ADF6AD6C4355E952,$16CF52BDBA2E54E9,$F787C04AEFB74AAE,$91CBA19CD3F74546
    Data.q $6332CCC46BED0251,$5A70D4FCA5A6CB98,$A738895D0E812BC9,$16991B1A5199B3E2,$EAB802F7A063B1A9
    Data.q $5AAA2800DD44D0FA,$5E09C0CBB2D97165,$030BE7F3B9BC9E5E,$00080904F9210002,$1F000000002C0000
    Data.q $0100C40807001F00,$0883C1A0B0481C08,$5343A1B0C85C2A13,$C394CA689B1956AA,$1D0CA633E5F26684
    Data.q $F1E6341E2EE87CBA,$692C1A451E74BA23,$F49E0B2A74C95CCE,$D2690498B1A3D288,$5CF992C0E70F9904
    Data.q $2097C0A7CE674B1A,$903A5F33AA34F65D,$52E4F2E973A29930,$4014692CD650E99F,$F53A25764F20934B
    Data.q $8ABCCE9D28B1D863,$CD1A4325A0B9A893,$7AD266AECA24F5AA,$A726231199546B3C,$5D8DC6D9727A9516
    Data.q $C54FAA35AA253DCD,$5670B1D9F60E4F81,$6399B6346AF0C763,$A860057741A08AD7,$6D5EAB53A3D2E9B4
    Data.q $080904F921002030,$000000002C000000,$00FF0807001F001F,$83C1A0B0481C0801,$2994D0985C2A1308
    Data.q $94E67332AA071086,$CA6834454F178731,$B6548A42CA534790,$53A1D1235532E091,$E40125733A596E96
    Data.q $D1337329A6AC699B,$C79FB9A77319DBA5,$92CF1F2E8953A400,$CE9CCE8A1CAA7345,$1F2A68B39A6F257C
    Data.q $35699C6E87339551,$B74516AD4FA32A9D,$64FEAEA7952AA551,$EACF4353D0E2330A,$973BA1C6EAD56A24
    Data.q $55AB50E4B58A7512,$5350D5548A2E0AC5,$BA6CF6EA3D2E993A,$9D110C662B10E9B4,$D2AAC5C9F3699C2A
    Data.q $663D16C10E742AEF,$A57AA70EA459196E,$9E1D3A98B198EE6B,$F92A2319996CB63A,$73ACC0A9B49B2BA6
    Data.q $95EE6B538A9446B5,$EEA97AFBDDFA82E8,$58FD49AF498F3598,$BAE633280131D7BE,$F4127401D9D7756A
    Data.q $8FC5E187F9A1CA78,$03EDF7FBBDBE9437,$00080904F9210002,$1F000000002C0000,$0100FF0807001F00
    Data.q $0883C1A0B0481C08,$433E5950A85C2A13,$118CC8674002230C,$A1F05894690D0F33,$D24633E6351A5329
    Data.q $6552AD55028E2AD8,$3C95CCF98149D4CC,$1196AA65CD9951C6,$D112654D9D0F97CC,$3198C1A84E97CBA1
    Data.q $65B2A84CB74C49CD,$BA5D0E69E4FA2710,$954A77CD0E851174,$50B9A3E5D342ADD6,$CAFCF2853F7CD6D9
    Data.q $231E793D63431F33,$A2C50CB6DB6B5449,$D16AB3D5A6D57655,$5AC25598F5773431,$C5399D379BB5B5CD
    Data.q $E0A7B70A159ACD6A,$F273CB5606BF4385,$D3DCD55D97448565,$691E118EE9ACCF33,$1E1A870CA04FF239
    Data.q $1AEB4192496D595A,$24AA6329A9F8BA9A,$8A9F21D14CA9F5C2,$85D0F5E8A55229D0,$D658DB7A3D2B4770
    Data.q $6A911DBF5264C6C7,$1F032F2E7F05EB4F,$54A760C69B2A9951,$314D1F7CC7383EC5,$6128E65CD8D0253F
    Data.q $F98DC7E428A4546A,$E068160143DC340D,$F9210010141E0881,$002C000000080904,$07001F001F000000
    Data.q $B0481C080100FF08,$A85C2A130883C1A0,$CC3218E874BA1F30,$A48C66452290CF97,$2C86533A20F128AB
    Data.q $1F81C750D0E81C62,$96C7E0B26552AD4D,$39A1334532A9D312,$A690B6331A531290,$3029AB1994CA862A
    Data.q $7533E678C77340A2,$400278CBA0BA616A,$CDD0C79DC6E1F217,$4F37A6CEE930A534,$2B8FA99973B8A4D1
    Data.q $9BD4D8EC7A4BA613,$3A67EAA653A2A74C,$5954165BA212CBB1,$3359954EE94C74BA,$B74B9AA17B845725
    Data.q $3CEDCD5CC339A793,$CA6729745798D07C,$1B06CA31E3F879A5,$0255D070793B231B,$BEE62779684EA269
    Data.q $E82C576635ADF353,$AEB5AC8D79F35ED0,$949CC506E70BC240,$1B1219CC00ADE626,$8600CC86CC5F195C
    Data.q $2A608A43BA58D418,$15D0334861ECABEC,$A14176F8096D4251,$50D4D0DDB4499543,$554A6BAC33CB06F3
    Data.q $169555D63BD9BD5E,$7FD332290CED21E1,$14894549DF94B88A,$7F4BA0847119199D,$E168561483D4662D
    Data.q $04F9210004050985,$00002C0000000809,$0807001F001F0000,$A0B0481C080100F9,$30B85C2A130883C1
    Data.q $974C3218E8743A5F,$8198D46A331990CE,$9A2D16333A20D128,$D0008EC462F17001,$1D9341E468A453A5
    Data.q $8FC4A370C4321A21,$C7A692B85BA66B2E,$A2EF984CECCD0493,$F3981C3E77387CC1,$087CE691058B3A20
    Data.q $5D362105A7C288D4,$9A0933ACD008D03A,$154F8455ABF598FB,$66B1D35D2E67CC0D,$94D361F038D3A213
    Data.q $3E5D1029F5CA535F,$EDB03BDD65F37DBE,$174B459E092AB5D0,$D82DE6F32A825480,$AC72232EA2BE6053
    Data.q $F6846774DE2C30DB,$EA6A43412EF40C3D,$93A65FAED02C1442,$D340A508B453A207,$CD73D579B6DB5105
    Data.q $F790AB5219151ED8,$F29DB4C299BE99CD,$08A4C7811A92C6A2,$4F6BB3D8EBF335F1
    Data.b $18,$10,$00,$3B
  mail00008_gif_end:
EndDataSection

Edit :Modified to disable the Web Gadget to not to respond to the Mouse Right Click

oryaaaaa · Post by **oryaaaaa** » Sun Mar 11, 2012 10:46 am

Very nice

I did this tips at 2004 summer.

code snippets from 2004 summer ( didn't on ie6/7/8/9/+ )

Code: Select all

Procedure WebAnimeSet(no.w)
  For ii=1 To  SkinLData("Index", SkinIndex("AnimeGIF"))
    animgif$=SkinLTxt("Image1", SkinIndex("AnimeGIF"+Str(ii)))
    url$="about:<html><body scroll='no' leftmargin='0' topmargin='0'><img src='"+animgif$+"'></img></body></html>"
    WebGadget(no+ii,SkinLData("PosX", SkinIndex("AnimeGIF"+Str(ii))), SkinLData("PosY", SkinIndex("AnimeGIF"+Str(ii))), SkinLData("Width", SkinIndex("AnimeGIF"+Str(ii))), SkinLData("Height", SkinIndex("AnimeGIF"+Str(ii))), url$)
  Next
  WebGadgetID=no
EndProcedure

Procedure WebAnimeChange(no.b)
  If SkinLData("Index", SkinIndex("AnimeGIF"))>0
    For ii=1 To  SkinLData("Index", SkinIndex("AnimeGIF"))
      animgif$=SkinLTxt("Image"+Str(no), SkinIndex("AnimeGIF"+Str(ii)))
      url$="about:<html><body scroll='no' leftmargin='0' topmargin='0'><img src='"+animgif$+"'></img></body></html>"
      SetGadgetText(WebGadgetID+ii,url$)
    Next 
  EndIf
EndProcedure

Procedure WebAnimeClose()
  If SkinLData("Index", SkinIndex("AnimeGIF"))>0
    For ii=1 To  SkinLData("Index", SkinIndex("AnimeGIF"))
      FreeGadget(WebGadgetID+ii)
    Next 
  EndIf
EndProcedure

Procedure Text2WebSet(no.b, name.s)
  If SkinLTxt("Image1", SkinIndex(name))<>""
  GIFPath$ = Space(1000) 
  GetModuleFileName_(0,@GIFPath$,1000) 
  animgif$=Chr(34)+GetPathPart(GIFPath$)+SkinLTxt("Image1", SkinIndex(name))+Chr(34)
  Debug animgif$
  url$="about:<html><body scroll='no' leftmargin='0' topmargin='0' background="+animgif$+"></body></html>"
  WebGadget(no,SkinLData("PosX", SkinIndex(name)), SkinLData("PosY", SkinIndex(name)), SkinLData("Width", SkinIndex(name)), SkinLData("Height", SkinIndex(name)), url$)
  EndIf
EndProcedure

Procedure Text2WebChange(no.b, name.s, txt.s, Center.b)
  If SkinLTxt("Image1", SkinIndex(name))<>""
   GIFPath$ = Space(1000) 
  GetModuleFileName_(0,@GIFPath$,1000) 
  animgif$=Chr(34)+GetPathPart(GIFPath$)+SkinLTxt("Image1", SkinIndex(name))+Chr(34)
  TColor$=Chr(34)+"#"+RSet(Hex(SkinLData("ForegroundR", SkinIndex(name))), 2, "0")+RSet(Hex(SkinLData("ForegroundG", SkinIndex(name))), 2, "0")+RSet(Hex(SkinLData("ForegroundB", SkinIndex(name))), 2, "0")+Chr(34)
  Debug TColor$
  If Center.b=1
    TText$="<Center>"+txt.s+"</Center>"
  Else 
    TText$=txt.s
  EndIf
  url$="about:<html><body scroll='no' leftmargin='0' topmargin='0' background="+animgif$+" text="+TColor$+"><BASEFONT SIZE="+Chr(34)+"2"+Chr(34)+">"+TText$+"</body></html>"
  Debug url$
  SetGadgetText(no, url$)
EndIf
EndProcedure

RASHAD · Post by **RASHAD** » Sun Mar 11, 2012 11:31 am

Thanks oryaaaaa
I will take a deep look into your code later
Looks interesting

Next is the 2 version

Code: Select all


cur = LoadCursor_(0, #IDC_HAND)

OpenWindow(0, 0, 0, 640, 480, "",#PB_Window_SystemMenu |#PB_Window_SizeGadget|#PB_Window_ScreenCentered) 
  SetWindowColor(0, #White)
  
  Length = ?mail00008_gif_end - ?mail00008_gif_start
  Filename$ = GetHomeDirectory() + "AnimGIF.gif"
  
  CreateFile(0, Filename$)
  WriteData(0, ?mail00008_gif_start, Length)
  CloseFile(0)  
   
  ButtonGadget(0,10,10,100,30,"Quit")
  ContainerGadget(1,12,50,24,30,#PB_Container_BorderLess)
  WebGadget(2,-14,-14,60,60,Filename$)
  CloseGadgetList()
  SetClassLong_(GadgetID(1), #GCL_HCURSOR, cur)
  DisableGadget(2,1)
  
Repeat 
    EventID=WaitWindowEvent() 
    
    Select EventID 
        
      Case #PB_Event_Gadget 
        Select EventGadget() 
          Case 0
            EventID = #PB_Event_CloseWindow
        EndSelect
              
      Case #WM_LBUTTONDOWN
            GetCursorPos_ (@p.POINT) 
            ScreenToClient_ (WindowID(0), @p) 
            If ChildWindowFromPoint_ (WindowID(0), p\y<< 32+p\x) = GadgetID(1)
               Debug "Left Button Clicked"
            EndIf
       
    EndSelect 
    
Until EventID = #PB_Event_CloseWindow
DeleteFile(Filename$)


DataSection
  mail00008_gif_start:
    ; size : 6436 bytes
    Data.q $001F613938464947,$0000000000F7001F,$8080008000000080,$0080008080000000,$C0DCC0C0C0C08080
    Data.q $0000540000F0C8A4,$00542400002400A8,$004800FF2400A824,$4800A84800544800,$00546C00006C00FF
    Data.q $009000FF6C00A86C,$9000A89000549000,$0054B40000B400FF,$00D800FFB400A8B4,$D800A8D80054D800
    Data.q $24A8FF0054FF00FF,$A800245400240000,$2424002424FF0024,$24FF2424A8242454,$A848245448240048
    Data.q $6C24006C24FF4824,$24FF6C24A86C2454,$A890245490240090,$B42400B424FF9024,$24FFB424A8B42454
    Data.q $A8D82454D82400D8,$FF2400FF24FFD824,$48FFFF24A8FF2454,$A800485400480000,$2448002448FF0048
    Data.q $48FF2448A8244854,$A848485448480048,$6C48006C48FF4848,$48FF6C48A86C4854,$A890485490480090
    Data.q $B44800B448FF9048,$48FFB448A8B44854,$A8D84854D84800D8,$FF4800FF48FFD848,$6CFFFF48A8FF4854
    Data.q $A8006C54006C0000,$246C00246CFF006C,$6CFF246CA8246C54,$A8486C54486C0048,$6C6C006C6CFF486C
    Data.q $6CFF6C6CA86C6C54,$A8906C54906C0090,$B46C00B46CFF906C,$6CFFB46CA8B46C54,$A8D86C54D86C00D8
    Data.q $FF6C00FF6CFFD86C,$90FFFF6CA8FF6C54,$A800905400900000,$2490002490FF0090,$90FF2490A8249054
    Data.q $A848905448900048,$6C90006C90FF4890,$90FF6C90A86C9054,$A890905490900090,$B49000B490FF9090
    Data.q $90FFB490A8B49054,$A8D89054D89000D8,$FF9000FF90FFD890,$B4FFFF90A8FF9054,$A800B45400B40000
    Data.q $24B40024B4FF00B4,$B4FF24B4A824B454,$A848B45448B40048,$6CB4006CB4FF48B4,$B4FF6CB4A86CB454
    Data.q $A890B45490B40090,$B4B400B4B4FF90B4,$B4FFB4B4A8B4B454,$A8D8B454D8B400D8,$FFB400FFB4FFD8B4
    Data.q $D8FFFFB4A8FFB454,$A800D85400D80000,$24D80024D8FF00D8,$D8FF24D8A824D854,$A848D85448D80048
    Data.q $6CD8006CD8FF48D8,$D8FF6CD8A86CD854,$A890D85490D80090,$B4D800B4D8FF90D8,$D8FFB4D8A8B4D854
    Data.q $A8D8D854D8D800D8,$FFD800FFD8FFD8D8,$FFFFFFD8A8FFD854,$0024FFA800FF5400,$24FFA824FF5424FF
    Data.q $FF5448FF0048FFFF,$006CFFFF48FFA848,$6CFFA86CFF546CFF,$FF5490FF0090FFFF,$808080A4A0A0F0FB
    Data.q $FFFF00FF000000FF,$00FF00FFFF000000,$0BFF21FFFFFFFFFF,$455041435354454E,$0000000103302E32
    Data.q $746165724319FE21,$2068746977206465,$454E4F20656B6154,$04F92100352E3320,$00002C0000000809
    Data.q $0807001F001F0000,$A0B0481C080100F2,$10B85C2A130883C1,$87443218E97CBE5D,$4C1A250E8BC58CCE
    Data.q $A90D170019A2E677,$3E6A74C0A34E8749,$E88D3E5CC8633422,$33C4E232C84CA90C,$416671585496591A
    Data.q $A0D1584500CD049B,$46A3340A49118B4B,$4A5D3DD1029F3A61,$F492A11BAB482772,$127B04AC1AAAD149
    Data.q $C1418A00286E9734,$6682B99D304A9C0E,$B0A29D10797D06C8,$586A143A94148CE9,$ED54BBA5EED1039C
    Data.q $D03B7B9AF7659F5A,$AABE12A533A8E18C,$ADEA075599CF2A94,$46854FAE41AFD20C,$4F4DA5E7B19169DD
    Data.q $098B6129F14C2452,$95E9E978FCEC9A8B,$58A2529866A721B5,$F4532CF4F64D1785,$7C7C77178BA1006C
    Data.q $4E9F4B9B6687C930,$0904F92100407ABD,$0000002C00000008,$FF0807001F001F00,$C1A0B0481C080100
    Data.q $1F30C85C2A130883,$C6A353A21D10863A,$883441F2E83319CC,$321E3F208F999D0E,$248CE80046E34E94
    Data.q $D31B74A1D1486434,$1094C42492D854A9,$45442790B87A2A59,$BA23F19844F54CA7,$24D079F2AA594774
    Data.q $8E64522E050E3341,$C9F4620D449B22A7,$1D861130964998D2,$8D4C86B0D82095B8,$9766A4198016B835
    Data.q $4743532132F43539,$82D3915749E5E2CD,$CB2D178B25C30066,$6C76FAE476C98184,$B02C5D3E332BB6CB
    Data.q $0BDDE2071DC742E6,$33A63B6B83D326A0,$1F13577CA1A5967A,$3B92C6C9A90E9CFC,$0AB04D3210A45A9B
    Data.q $82EF60BB6ABCD33F,$49F4DC0DD46D0D3A,$10E6645A1A0FA300,$48A8A99B46F985F1,$5893E607C7D8CB0D
    Data.q $038BC3E0EFF67B72,$0904F9210010184F,$0000002C00000008,$FF0807001F001F00,$C1A0B0481C080100
    Data.q $A1B0C85C2A130883,$267333A5D2660043,$08C21A0B0F743A22,$DA990C87451990C0,$9D0D067CC8401198
    Data.q $512286C714CAA432,$0D972AD8CC75341E,$9FA998D0797AA955,$B29950A9C4B618C6,$554AB5341A78CA65
    Data.q $D178F44DD0878D3A,$68ECC94D3F82D2A8,$33A596AA533A2368,$0E9CCA84D3E8EE97,$D149A44A114AAAEC
    Data.q $2FACC2282C67CB19,$8931A6B4F7CCF94D,$3994D6084B1DCD73,$99546534629D4D81,$4C7995EA6767AB44
    Data.q $5632A98EC6943A2F,$C32956CA836468D5,$A54ECA55002A556C,$313563C273975B93,$17B4DE8019765D1A
    Data.q $9B802933F855227F,$32E2573A6AAA2EC7,$B91BFB158209579D,$CA7555F1974D9D39,$87CE3A754FA042D4
    Data.q $52BA59496322D0CE,$2F2EAE61D4F84CF4,$766531D4F52C348B,$E4DF95508CFCD2EF,$4335B3E837D27504
    Data.q $B10E7553A5DD6A95,$815444A93F409FB4,$82288A2188B575F4,$6A85C6644C8642DF,$D171990549524228
    Data.q $962488E228721387,$080904F921001014,$000000002C000000,$00FF0807001F001F,$83C1A0B0481C0801
    Data.q $43A1B0C85C2A1308,$88CC6632290C8B00,$CA653AAA0B0F6532,$889219148A74AA94,$CB1D4F1D63A9A331
    Data.q $AA1F258BCB954007,$6D0374BA194CB652,$179A31A1EC69DBE6,$743A1F314814B18D,$39A0AE8A3CC21D3D
    Data.q $E98E67CC2A6347A3,$F3691B9A3AAA8E51,$BB1C528F3BAA4358,$3B1AA90BA1D15CD3,$29D137B3B1D8CF9A
    Data.q $8ACAA8D86D33874B,$4684DA2856D745AE,$BF532A1307CD3DCD,$5F26D779E522ED4D,$E56E6BA60618E69D
    Data.q $794C264A91989DDD,$8AFD42F98EA33A59,$4D7F2D3BBEDB3419,$DAF7ACC131EE97C7,$4CE99DDFAADA48BC
    Data.q $50C05FF74CB63BE5,$B631EC6CBBA39B61,$EB1F34EC8CDED90D,$DD3CED631A174974,$0E986DD6D9738232
    Data.q $7C2AFA2930EC4D26,$02331B8BCD60765B,$4487434F54D14938,$8697C7A05EAF721E,$AE40FEBD135FE8CC
    Data.q $18160480E027F96D,$00080904F9210010,$1F000000002C0000,$0100FF0807001F00,$0883C1A0B0481C08
    Data.q $454361B0C85C2A13,$41E1D1053C4622A6,$916CA6532D951863,$124744122CA643A2,$96329D4CF98C3E5D
    Data.q $34C5D0E974C0E44F,$0A5D247331D4CE67,$7CF9434CE62CB74C,$387CBA671327CCEA,$98B9A492E4339A4B
    Data.q $5310C8A55471D144,$1151AA0D11F35191,$B41655129AE8533A,$674589D367433A24,$64924540B4512BF4
    Data.q $8A8F32A7A9DD14E9,$4B5153B2AF92498C,$AA742A9F366935CA,$995261D577CB99D2,$60ECF3053BE54D25
    Data.q $6D75E74622BF84B6,$72EB54C26AA698C9,$E992AE23409251EB,$6D190EA6A3D9AA12,$92B196C2D6A8F44D
    Data.q $6F5AA1CC66749A24,$009D3198EC7C5C9B,$E446E38AAA249B4E,$6354CAA55D4B0327,$98EC6654714CC697
    Data.q $188F097E05C8EBD5,$000203C8F3F9BCBE,$000000080904F921,$1F001F000000002C,$1C080100C2080700
    Data.q $2A130883C1A0B048,$20A65543A1B0C85C,$18534261CA643A2A,$8445996CA633194D,$C99F2E865B99D2E8
    Data.q $1CCE874C8A43078F,$52C74CB5D106943A,$67CB2A652582CC26,$5486792E7CC0E6F3,$165F219A4EA073E6
    Data.q $874B74CCA652A005,$3D935025951A4526,$9BD658D347CD267D,$D42792673329F2E9,$2D14474B9A6B39A2
    Data.q $F2E734F2615FA456,$8B3C9AB956A2D2A9,$46027D77B257A436,$1A4B3AB5D32975CA,$F942A762EB135976
    Data.q $4B8F3E6CAC7934FA,$CC2A956A6CDB1D8D,$E190DA443688CD4B,$2100080C1F53A8D3,$2C000000080904F9
    Data.q $001F001F00000000,$481C080100FE0807,$5C2A130883C1A0B0,$9914864343A1B0C8,$23088729954A655A
    Data.q $C66329D54CA6321E,$63C5954AB82C622E,$40E46E895BA1CCE6,$2633174471F2F943,$2E974B99F3029748
    Data.q $A9C4AE62E694BA5F,$74B668E99FD0A793,$1A7A8A92A1D0CE89,$4CC763A1A9B38A4D,$8A95CF2994AA54A9
    Data.q $A64F596E89FBA1F2,$592C52B653A6B52B,$9D35B964B10D30A6,$D34B1A1DD08A74CB,$BAFDCAF34C98D267
    Data.q $F5CAE4F99739AFF2,$D29B8991D0EDD3A9,$D110975898F42954,$E891E5F0B3E96299,$535C2C793C2E0E24
    Data.q $646C768B6DB6FF9B,$26962BCD72AB7DB2,$135C6D066B309C4F,$E63EAAFB1D8E8027,$CB1A6B5843AAA2BB
    Data.q $1BA2CB6346801BE7,$20A64340B9ACA553,$0191F7BBBDCEB442,$00080904F9210001,$1F000000002C0000
    Data.q $0100FF0807001F00,$0883C1A0B0481C08,$654361B0C85C2A13,$2190C8B4331996CA,$54CA743459970887
    Data.q $71853A9954AA53BE,$18848E46C75331A0,$34B1D0F900496591,$7A312D993A18D025,$D2E881BE59531744
    Data.q $31A231A31447CB2D,$8731A6537A2411D1,$D594D216532D0D37,$9D13274C3A9337A1,$53CA649D8EC6AFB1
    Data.q $2654F66CF9734369,$3571D2E6733A1974,$12F177A6B2A6F0BB,$B2C7B7C36DCE663D,$1E745FE9965BC51E
    Data.q $B962AB1419B509F3,$D7AF3729B399D367,$682E66560E1B4DA6,$15DB3CFE839F7CDE,$3875DEEF8CB9B1AD
    Data.q $6D72E7A7B2C42595,$73388A55606ACF98,$9353962AB0F98C65,$03D1DC2930CAD662,$826766FC5E464A91
    Data.q $C0EF3AF8C5A2898C,$9955FB051B038CBB,$797B231EBF937CC0,$7D3FC569952AD4D2,$D50C663319D94009
    Data.q $26CA9AFB22F2155E,$01FFFFBFBFCFBFDA,$00080904F9210001,$1F000000002C0000,$0100FF0807001F00
    Data.q $0883C1A0B0481C08,$7CC321B0C85C2A13,$439D0E974C48CCE6,$224868D21914E984,$4E881C5D0C877480
    Data.q $67CC124486532A95,$34C994E886CA9548,$1A1CA64329DD1079,$173453BE6133B9DB,$AA533E61515654C6
    Data.q $7432996E985A9D4E,$CAE38F974299D0C6,$AA0E88AB2E172763,$D24552AD4D105339,$CAEB99970AA02994
    Data.q $52AA0748635769F6,$C9F2F963452154E6,$8D318159ACD6E74C,$00634F2F35BBB31D,$BB4F1CD39A429EBA
    Data.q $DBF253B7CDE18EE9,$B0D466553A3F7053,$6CB98E726515C7E1,$8534F22AC6C15199,$75A739A5ADD3AF97
    Data.q $A5D0C763B2EF560A,$F37B63D1B4DA4C3B,$3255EA6654DA9D9E,$96551F327DCBE67D,$6CA4CE963B2B8B15
    Data.q $79C86B35539D8E84,$DDC449E514AB553E,$FB1DCD0AE4E8A133,$2D573184DD7450BB,$E34783E232B9485D
    Data.q $64B341A73E0BF436,$08A8148A29D4745D,$292C409234A0E941,$4A4E84486A1A86B2,$A855795E55D4160B
    Data.q $00405068761C86E1,$000000080904F921,$1F001F000000002C,$1C080100FF080700,$2A130883C1A0B048
    Data.q $0110863A5D10985C,$138B1A8CC66743A0,$8AC763A867441A23,$3A2051A7CBA08D15,$9CC4684219168A45
    Data.q $D1D88BA219288E46,$A532ADD10B924454,$53A61533844E208A,$9A46664521A1D364,$273D9E42696F9839
    Data.q $049FBA4012B43BA2,$9347627455353E1F,$C990F1D84CBA0D4D,$EAAF982D2A074774,$571B6B9A048A8EC1
    Data.q $553532B503A73A6D,$6D66C356B75B5F35,$8EDD688959914AA8,$E9728F4228304A1C,$E6BEC9E158DB6E36
    Data.q $4550B2B1C9357DCC,$6033867BBBA61D2B,$EBD71BBD990D06BD,$D85B65E20946A4DD,$E91E8DF34B89D4AC
    Data.q $3C2EAD25BE21E119,$D650F9846A22336A,$9306C061B9309E0D,$222341A2A86BFC6A,$AC7622F17EAC7399
    Data.q $B99E091B0AA747DA,$21000407D3E8F3F9,$2C000000080904F9,$001F001F00000000,$481C080100FF0807
    Data.q $5C2A130883C1A0B0,$A2190C7CC39F3098,$0C6735198CC4674B,$1674BA60D11743A1,$8EC7235244319A07
    Data.q $C9D1523434262600,$63B309721A572F88,$CE97CCBE5F0B8849,$333429CC865521A0,$2C0A70E98BC6E4D0
    Data.q $027B1AA5D120D319,$950A9FD1684E8998,$4565BA2A12A35002,$8249A6305AD2194D,$5A29AA65340E3F33
    Data.q $94D2F7CD42D486B4,$11B33568CD094322,$BA9426F133A94BAD,$229A6727A0D99CD4,$2D0D2F653A6D14EC
    Data.q $2971AD42EEF53BEA,$563342E4B3DA0D4F,$7332B2B7C743A6B7,$602054F8429AD942,$D55944399AE31074
    Data.q $57C904108D04B221,$381DB954AAD8C6E7,$0C1F8B09C15DE15C,$910E86866EA0DB8C,$53284574A57CF8EC
    Data.q $AEECCD0D5D2826B6,$736F9DED9C1254CD,$BDBE0E568F471394,$F921000203F0F7FB,$002C000000080904
    Data.q $07001F001F000000,$B0481C080100FF08,$A85C2A130883C1A0,$343218E6743A5D10,$290C8633199D0E84
    Data.q $04E843C660D127CA,$028EC854D1943C62,$97A9A0AE955A990D,$B294CA7894725EAA,$554AA653198D2E93
    Data.q $3449D41671406547,$A65BA156CA9D42E2,$9BE58D4493C0A5AC,$A274C76353281099,$B1528E29914E97CB
    Data.q $5BA8BA2CACB83D0A,$AA399CD407CCDE5F,$B1AB0A674D015708,$D8F53ADAAAACE974,$340B2B2A6F40854D
    Data.q $58453ADF7C63545F,$3CEB0D85A6002756,$A2EF93855CDD1156,$30C6CAC419783B65,$59A254F337B6329F
    Data.q $B2C87210B63BE6F9,$5E6DCC77465AA4CB,$DF33AC932A610B87,$D3D84E2ED915BB59,$2655E77D41CAE664
    Data.q $34594F15DE4A9571,$02B2C79770EF1157,$33BE55219D2868C8,$A3D298DB9C973E06,$DA3312BDCF31CD58
    Data.q $A3B3DA05554D3589,$0A7534C205634546,$80C8A77104AFC4EE,$94606A45D19449F9,$0D6A9534112875D1
    Data.q $1014761484E12846,$0000080904F92100,$001F000000002C00,$080100FF0807001F,$130883C1A0B0481C
    Data.q $0C63B190D0B85C2A,$65B194EAA53A2A17,$B1A0D1165A190C8A,$A34A67432994C687,$AE891C0E3ACA55A2
    Data.q $6532A996006332A5,$339A472A94AA98CA,$B65540914ADD2E97,$D2F96340E78E996C,$3D7450E1938A4BA1
    Data.q $AAD55CCF90054597,$CDE1EE8A94B69F1D,$AA4E87350EB34A9E,$70BA6BE69123A439,$99E5825CF9B4D929
    Data.q $1D0E974AA1C26D8E,$A2B51153D163EF99,$A18196D228783BE3,$89745C70CC6BA61A,$6564D8F679EDC71F
    Data.q $D3EC18FCDBE63B3D,$DD3567462732C674,$F11C8636F3839E32,$AD25D6472EABEBA3,$15D6A4CA65E36692
    Data.q $0F370B883A196CB9,$0CC663B1E6EAAE16,$03D66129D3096CD5,$825235D488ED8327,$4AE7D4A91607459D
    Data.q $1B89BC2A779B75DF,$6D76B6ED2FDE40B3,$24AA42ABE2F1400A,$291487454D7E0A68,$05FDD746A0BF3F12
    Data.q $0010142A0480E028,$000000080904F921,$1F001F000000002C,$1C080100ED080700,$2A130883C1A0B048
    Data.q $4D0986A1A050C85C,$8B652A956A653319,$653A195058843D14,$29D54867CB19F320,$A5AE87CCA9F3058E
    Data.q $2E974C12513063B9,$28DB1DD12D973A5F,$53A23D2A96B99D33,$AE73349640A64E99,$9F2A9A3A26F46954
    Data.q $1E74CB68D4F453A6,$9CD35F31AA931DF3,$D0E9F5696D4E893E,$A9D659BA1E58E6A1,$EF9B2D910D516539
    Data.q $C0051A6C86964DA7,$ADF6AD6C4355E952,$16CF52BDBA2E54E9,$F787C04AEFB74AAE,$91CBA19CD3F74546
    Data.q $6332CCC46BED0251,$5A70D4FCA5A6CB98,$A738895D0E812BC9,$16991B1A5199B3E2,$EAB802F7A063B1A9
    Data.q $5AAA2800DD44D0FA,$5E09C0CBB2D97165,$030BE7F3B9BC9E5E,$00080904F9210002,$1F000000002C0000
    Data.q $0100C40807001F00,$0883C1A0B0481C08,$5343A1B0C85C2A13,$C394CA689B1956AA,$1D0CA633E5F26684
    Data.q $F1E6341E2EE87CBA,$692C1A451E74BA23,$F49E0B2A74C95CCE,$D2690498B1A3D288,$5CF992C0E70F9904
    Data.q $2097C0A7CE674B1A,$903A5F33AA34F65D,$52E4F2E973A29930,$4014692CD650E99F,$F53A25764F20934B
    Data.q $8ABCCE9D28B1D863,$CD1A4325A0B9A893,$7AD266AECA24F5AA,$A726231199546B3C,$5D8DC6D9727A9516
    Data.q $C54FAA35AA253DCD,$5670B1D9F60E4F81,$6399B6346AF0C763,$A860057741A08AD7,$6D5EAB53A3D2E9B4
    Data.q $080904F921002030,$000000002C000000,$00FF0807001F001F,$83C1A0B0481C0801,$2994D0985C2A1308
    Data.q $94E67332AA071086,$CA6834454F178731,$B6548A42CA534790,$53A1D1235532E091,$E40125733A596E96
    Data.q $D1337329A6AC699B,$C79FB9A77319DBA5,$92CF1F2E8953A400,$CE9CCE8A1CAA7345,$1F2A68B39A6F257C
    Data.q $35699C6E87339551,$B74516AD4FA32A9D,$64FEAEA7952AA551,$EACF4353D0E2330A,$973BA1C6EAD56A24
    Data.q $55AB50E4B58A7512,$5350D5548A2E0AC5,$BA6CF6EA3D2E993A,$9D110C662B10E9B4,$D2AAC5C9F3699C2A
    Data.q $663D16C10E742AEF,$A57AA70EA459196E,$9E1D3A98B198EE6B,$F92A2319996CB63A,$73ACC0A9B49B2BA6
    Data.q $95EE6B538A9446B5,$EEA97AFBDDFA82E8,$58FD49AF498F3598,$BAE633280131D7BE,$F4127401D9D7756A
    Data.q $8FC5E187F9A1CA78,$03EDF7FBBDBE9437,$00080904F9210002,$1F000000002C0000,$0100FF0807001F00
    Data.q $0883C1A0B0481C08,$433E5950A85C2A13,$118CC8674002230C,$A1F05894690D0F33,$D24633E6351A5329
    Data.q $6552AD55028E2AD8,$3C95CCF98149D4CC,$1196AA65CD9951C6,$D112654D9D0F97CC,$3198C1A84E97CBA1
    Data.q $65B2A84CB74C49CD,$BA5D0E69E4FA2710,$954A77CD0E851174,$50B9A3E5D342ADD6,$CAFCF2853F7CD6D9
    Data.q $231E793D63431F33,$A2C50CB6DB6B5449,$D16AB3D5A6D57655,$5AC25598F5773431,$C5399D379BB5B5CD
    Data.q $E0A7B70A159ACD6A,$F273CB5606BF4385,$D3DCD55D97448565,$691E118EE9ACCF33,$1E1A870CA04FF239
    Data.q $1AEB4192496D595A,$24AA6329A9F8BA9A,$8A9F21D14CA9F5C2,$85D0F5E8A55229D0,$D658DB7A3D2B4770
    Data.q $6A911DBF5264C6C7,$1F032F2E7F05EB4F,$54A760C69B2A9951,$314D1F7CC7383EC5,$6128E65CD8D0253F
    Data.q $F98DC7E428A4546A,$E068160143DC340D,$F9210010141E0881,$002C000000080904,$07001F001F000000
    Data.q $B0481C080100FF08,$A85C2A130883C1A0,$CC3218E874BA1F30,$A48C66452290CF97,$2C86533A20F128AB
    Data.q $1F81C750D0E81C62,$96C7E0B26552AD4D,$39A1334532A9D312,$A690B6331A531290,$3029AB1994CA862A
    Data.q $7533E678C77340A2,$400278CBA0BA616A,$CDD0C79DC6E1F217,$4F37A6CEE930A534,$2B8FA99973B8A4D1
    Data.q $9BD4D8EC7A4BA613,$3A67EAA653A2A74C,$5954165BA212CBB1,$3359954EE94C74BA,$B74B9AA17B845725
    Data.q $3CEDCD5CC339A793,$CA6729745798D07C,$1B06CA31E3F879A5,$0255D070793B231B,$BEE62779684EA269
    Data.q $E82C576635ADF353,$AEB5AC8D79F35ED0,$949CC506E70BC240,$1B1219CC00ADE626,$8600CC86CC5F195C
    Data.q $2A608A43BA58D418,$15D0334861ECABEC,$A14176F8096D4251,$50D4D0DDB4499543,$554A6BAC33CB06F3
    Data.q $169555D63BD9BD5E,$7FD332290CED21E1,$14894549DF94B88A,$7F4BA0847119199D,$E168561483D4662D
    Data.q $04F9210004050985,$00002C0000000809,$0807001F001F0000,$A0B0481C080100F9,$30B85C2A130883C1
    Data.q $974C3218E8743A5F,$8198D46A331990CE,$9A2D16333A20D128,$D0008EC462F17001,$1D9341E468A453A5
    Data.q $8FC4A370C4321A21,$C7A692B85BA66B2E,$A2EF984CECCD0493,$F3981C3E77387CC1,$087CE691058B3A20
    Data.q $5D362105A7C288D4,$9A0933ACD008D03A,$154F8455ABF598FB,$66B1D35D2E67CC0D,$94D361F038D3A213
    Data.q $3E5D1029F5CA535F,$EDB03BDD65F37DBE,$174B459E092AB5D0,$D82DE6F32A825480,$AC72232EA2BE6053
    Data.q $F6846774DE2C30DB,$EA6A43412EF40C3D,$93A65FAED02C1442,$D340A508B453A207,$CD73D579B6DB5105
    Data.q $F790AB5219151ED8,$F29DB4C299BE99CD,$08A4C7811A92C6A2,$4F6BB3D8EBF335F1
    Data.b $18,$10,$00,$3B
  mail00008_gif_end:
EndDataSection

electrochrisso · Post by **electrochrisso** » Sun Mar 11, 2012 10:44 pm

Good examples guys, you answered my question I was going to ask RASHAD, if right click popup window on gif can be disabled.

PureBasic Forums - English

Animated GIF Gadget - Another approach [Windows]

Animated GIF Gadget - Another approach [Windows]

Re: Animated GIF Gadget - Another approach [Windows]

Re: Animated GIF Gadget - Another approach [Windows]

Re: Animated GIF Gadget - Another approach [Windows]