Kajoe Posted February 11, 2021 Author Share Posted February 11, 2021 Yes realy strange Link to comment Share on other sites More sharing options...
Belini Posted February 11, 2021 Share Posted February 11, 2021 I use K-Lite_800_Mega https://mega.nz/file/tQlyWLIB#ewxAL6yeCiPvnyfKPHApqxE4_llr1oCJyDSoeVnuKG4 My Codes: Virtual Key Code UDF: http://www.autoitscript.com/forum/topic/138246-virtual-key-code-udf/ GuiSplashTextOn.au3: http://www.autoitscript.com/forum/topic/143542-guisplashtexton-udf/ Menu versions of Autoit: http://www.autoitscript.com/forum/topic/137435-menu-versions-of-autoit/#entry962011 Selects first folder of letters: ]http://www.autoitscript.com/forum/topic/144780-select-folders-by-letter/#entry1021708/spoiler] List files and folders with long addresses.: http://www.autoitscript.com/forum/topic/144910-list-files-and-folders-with-long-addresses/#entry102 2926 Program JUKEBOX made in Autoit:some functions:http://www.youtube.com/watch?v=WJ2tC2fD5Qs Navigation to search:http://www.youtube.com/watch?v=lblwOFIbgtQ Link to comment Share on other sites More sharing options...
Kajoe Posted February 11, 2021 Author Share Posted February 11, 2021 I found a script what is working with repeating video. And it plays mp4. The only problem is, that it works with fileopen command. Is it possible to modify it, so it plays a video from " Local $sfldr1 "? Link to comment Share on other sites More sharing options...
Kajoe Posted February 11, 2021 Author Share Posted February 11, 2021 (edited) This is a little modified script with correct size for $hstatus and correct size for video I want and I had attached before as test. Working but with file select ActiveX WMPLayer.OCX GUI with total script.au3 Edited February 11, 2021 by Kajoe Link to comment Share on other sites More sharing options...
Belini Posted February 11, 2021 Share Posted February 11, 2021 @Kajoe worked with the first example you posted https://mega.nz/file/xUtg1TwT#DCjMdDRrLrK9uV7fZYD3LPJrDzHAz7jURW25VYz5EPQ My Codes: Virtual Key Code UDF: http://www.autoitscript.com/forum/topic/138246-virtual-key-code-udf/ GuiSplashTextOn.au3: http://www.autoitscript.com/forum/topic/143542-guisplashtexton-udf/ Menu versions of Autoit: http://www.autoitscript.com/forum/topic/137435-menu-versions-of-autoit/#entry962011 Selects first folder of letters: ]http://www.autoitscript.com/forum/topic/144780-select-folders-by-letter/#entry1021708/spoiler] List files and folders with long addresses.: http://www.autoitscript.com/forum/topic/144910-list-files-and-folders-with-long-addresses/#entry102 2926 Program JUKEBOX made in Autoit:some functions:http://www.youtube.com/watch?v=WJ2tC2fD5Qs Navigation to search:http://www.youtube.com/watch?v=lblwOFIbgtQ Link to comment Share on other sites More sharing options...
Kajoe Posted February 11, 2021 Author Share Posted February 11, 2021 @Belini You did it. This one is working with video on my Windows 10 computer. Thank you very much. Please take a look at de final script i would like to use. It is for installing installations. But I am going to play with your latest script now and will let you know tomorow if I could manage it to make a complete good script that I want to use Thank you very much. You are super. Link to comment Share on other sites More sharing options...
CYCho Posted February 12, 2021 Share Posted February 12, 2021 (edited) Please refer to my zPlayer for full implementation of a media player. expandcollapse popup#include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <IE.au3> HotKeySet("{esc}", "quit") Global $videoWidth = 600, $videoHeight = 200 Global $videoGUI = GUICreate("Example", $videoWidth, $videoHeight, -1, -1, $WS_CLIPCHILDREN) Global $oIE = CreateWMPlayer() GUISetState (@SW_SHOW, $videoGUI) Global $oPlayer = _IEGetObjById($oIE, "objWMPlayer") Global $videoFile = "Put the full path of your video file here" $oPlayer.URL = $videoFile While 1 If $oPlayer.playState <> 3 Then $oPlayer.Controls.Play EndIf Sleep(5) WEnd Func quit() $oPlayer.Controls.Stop Exit EndFunc Func CreateWMPlayer() Local $myIE_Obj = _IECreateEmbedded () $IEControl = GUICtrlCreateObj($myIE_Obj, 0, 0, $videoWidth, $videoHeight) GUICtrlSetResizing($IEControl, 1) _IENavigate($myIE_Obj, "about:blank") Local $htmlWMP = '' _ & @CR & '<body style="margin:0; padding:0">' _ & @CR & '<OBJECT' _ & @CR & 'ID="objWMPlayer"' _ & @CR & 'WIDTH="' & $videoWidth & '"' _ & @CR & 'HEIGHT="' & $videoHeight & '"' _ & @CR & 'CLASSID="clsid:6BF52A52-394A-11D3-B153-00C04F79FAA6"' _ & @CR & 'TYPE="application/x-ms-wmp">' _ & @CR & '<PARAM NAME="enableContextMenu" VALUE="true">' _ & @CR & '<PARAM NAME="enableFullScreenControls" VALUE="true">' _ & @CR & '<PARAM NAME="stretchToFit" VALUE="true">' _ & @CR & '<PARAM NAME="uiMode" VALUE="none">' _ & @CR & '</OBJECT>' _ & @CR & '</body>' _IEDocWriteHTML ($myIE_Obj, $htmlWMP) ; Change uiMode value to "full" if you want to show contorls in video window _IEAction ($myIE_Obj, "refresh") $myIE_Obj.document.body.scroll = "no" $myIE_Obj.document.body.style.borderColor = "#000000" Return $myIE_Obj EndFunc Edited February 12, 2021 by CYCho zPlayer - A Small Audio and Video Player Time Sync + SystemTimeAdjustment Link to comment Share on other sites More sharing options...
Kajoe Posted February 12, 2021 Author Share Posted February 12, 2021 @Cycho. Thanks for your advice. I am going to take a look at your player too. @Belini did a great job for me already. Now I need to build the final script I needed. Link to comment Share on other sites More sharing options...
Kajoe Posted February 12, 2021 Author Share Posted February 12, 2021 (edited) @Belini and @NineI have compiled a working script. I learned a lot from your script and with some strugling and comparing with other scripts, I finaly fixed it to make a good working script. It is exactly as I wanted it, with repeating in it. It only need the "wmp.au3" attached in same scriptdirectory. See my attachment. Thank you very much for your help. I really apreciate it. You can test my files with the mp4 file that I had attached in my first post. No need to install extra codecs for it. Works with Windows 10. wmp.au3 Total working script mp4 Forum.au3 Edited February 12, 2021 by Kajoe Link to comment Share on other sites More sharing options...
Belini Posted February 12, 2021 Share Posted February 12, 2021 @Kajoe it's good to know it worked out as you wanted My Codes: Virtual Key Code UDF: http://www.autoitscript.com/forum/topic/138246-virtual-key-code-udf/ GuiSplashTextOn.au3: http://www.autoitscript.com/forum/topic/143542-guisplashtexton-udf/ Menu versions of Autoit: http://www.autoitscript.com/forum/topic/137435-menu-versions-of-autoit/#entry962011 Selects first folder of letters: ]http://www.autoitscript.com/forum/topic/144780-select-folders-by-letter/#entry1021708/spoiler] List files and folders with long addresses.: http://www.autoitscript.com/forum/topic/144910-list-files-and-folders-with-long-addresses/#entry102 2926 Program JUKEBOX made in Autoit:some functions:http://www.youtube.com/watch?v=WJ2tC2fD5Qs Navigation to search:http://www.youtube.com/watch?v=lblwOFIbgtQ Link to comment Share on other sites More sharing options...
Nine Posted February 12, 2021 Share Posted February 12, 2021 (edited) @Kajoe Glad you found a solution. Edited February 12, 2021 by Nine “They did not know it was impossible, so they did it” ― Mark Twain Spoiler Block all input without UAC Save/Retrieve Images to/from Text Monitor Management (VCP commands) Tool to search in text (au3) files Date Range Picker Virtual Desktop Manager Sudoku Game 2020 Overlapped Named Pipe IPC HotString 2.0 - Hot keys with string x64 Bitwise Operations Multi-keyboards HotKeySet Recursive Array Display Fast and simple WCD IPC Multiple Folders Selector Printer Manager GIF Animation (cached) Screen Scraping Multi-Threading Made Easy Link to comment Share on other sites More sharing options...
Kajoe Posted February 12, 2021 Author Share Posted February 12, 2021 Thank you. Did you test it too? Link to comment Share on other sites More sharing options...
Nine Posted February 12, 2021 Share Posted February 12, 2021 Yep, working on Win7 too. I made a few changes because there was a few errors, but nothing major.... “They did not know it was impossible, so they did it” ― Mark Twain Spoiler Block all input without UAC Save/Retrieve Images to/from Text Monitor Management (VCP commands) Tool to search in text (au3) files Date Range Picker Virtual Desktop Manager Sudoku Game 2020 Overlapped Named Pipe IPC HotString 2.0 - Hot keys with string x64 Bitwise Operations Multi-keyboards HotKeySet Recursive Array Display Fast and simple WCD IPC Multiple Folders Selector Printer Manager GIF Animation (cached) Screen Scraping Multi-Threading Made Easy Link to comment Share on other sites More sharing options...
Kajoe Posted February 13, 2021 Author Share Posted February 13, 2021 Hi Nine. Thanks. What did you changed? What lines had errors? 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