mesale0077 Posted August 23, 2010 Share Posted August 23, 2010 (edited) #AutoIt3Wrapper_Res_File_Add=test_1.htm, rt_html, TEST_HTML_1 #AutoIt3Wrapper_Res_File_Add=test_1.gif, rt_html, TEST_GIF_1 $oIE = ObjCreate("Shell.Explorer.2") $gui = GUICreate("HTML from resources example",500,400) $ie_ctrl = GUICtrlCreateObj ($oIE, 0, 0 , 500, 400) GUISetState(@SW_SHOW) ; image from resource (all HTML supported types) $oIE.navigate("res://" & @AutoItExe & "/test_gif_1") Sleep(3000) ; html from resource (with embeded image from resources) $oIE.navigate("res://" & @AutoItExe & "/test_html_1") While 1 If GUIGetMsg() = -3 Then Exit WEndexpandcollapse popup#Region #AutoIt3Wrapper_icon=D:\programlar\iconlar\alim.ico #AutoIt3Wrapper_Compression=4 #AutoIt3Wrapper_UseUpx=n ;#AutoIt3Wrapper_Res_File_Add=C:\slide.swf, rt_rcdata, TEST_BIN_1 #AutoIt3Wrapper_Res_File_Add=C:\test_1.dat, rt_rcdata, TEST_BIN_1 ;#AutoIt3Wrapper_run_after=ResHacker.exe -add %out%, %out%, C:\slide.swf, rcdata, TEST_BIN_1, 0 #AutoIt3Wrapper_Run_After=upx.exe --best --compress-resources=0 "%out%" #include <GUIConstants.au3> Global $oRP = ObjCreate("ShockwaveFlash.ShockwaveFlash.1") GUICreate ("Flash", 820, 600, -1, -1) $GUIActiveX = GUICtrlCreateObj( $oRP, 10, 10 , 800 , 580) With $oRP .bgcolor = "#000000" ;.Movie = 'C:\slide.dat'; .Movie = "res://" & @AutoItExe & "/test_bin_1" .ScaleMode = 2 .Loop = True .wmode = "Opaque" .FlashVars = "" EndWith GUISetState () While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop EndSelect WEnd $oRP = 0 GUIDelete () Exithello file read in @AutoItExe dont install res://" & @AutoItExe & "/test_bin_1 <=== dont work dont read swf file why thank you help me now this like it code Edited August 23, 2010 by mesale0077 Link to comment Share on other sites More sharing options...
doudou Posted August 23, 2010 Share Posted August 23, 2010 res: protocol is IE specific and Flash obviously doesn't support it. Use FileInstall to extract your movie at runtime: FileInstall("C:\slide.swf", @ScriptDir & "\slide.swf", 1) If @compiled Then $oRP.Movie = @ScriptDir & "\slide.swf" Else $oRP.Movie = "C:\slide.swf" EndIf UDFS & Apps: Spoiler DDEML.au3 - DDE Client + ServerLocalization.au3 - localize your scriptsTLI.au3 - type information on COM objects (TLBINF emulation)TLBAutoEnum.au3 - auto-import of COM constants (enums)AU3Automation - export AU3 scripts via COM interfacesTypeLibInspector - OleView was yesterday Coder's last words before final release: WE APOLOGIZE FOR INCONVENIENCEĀ Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now