jpam Posted May 7, 2006 Share Posted May 7, 2006 Work in progress Its a 2 player mediaplayer with double playlist album art display (throw a *.jpg cover in the album dir and proplayer picks it up) visualisatie on players sort on artist album genre song or playlist simple add your mp3's via folders manual crossfade between players (auto crossfade i am working on) adjustible timefade what do ya think? many don many todo jpam Link to comment Share on other sites More sharing options...
marfdaman Posted May 7, 2006 Share Posted May 7, 2006 Work in progressIts a 2 player mediaplayerwith double playlist album art display (throw a *.jpg cover in the album dir and proplayer picks it up) visualisatie on playerssort on artist album genre song or playlistsimple add your mp3's via foldersmanual crossfade between players (auto crossfade i am working on)adjustible timefadewhat do ya think?many donmany todojpam CAN'T BELIEVE WHAT I SEE...Here I was, thinking my mediaplayer was a huge improvement....wait a minute, let me get my jaw from the ground...VERY NICE...if you're willing, please give me some info about the visualization, man, that rocks!Regards Don't take my pic to serious...~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~You Looked, but you did not see!~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Link to comment Share on other sites More sharing options...
Daniel W. Posted May 7, 2006 Share Posted May 7, 2006 I am speechless about this Thats just amazing .... If it dies everything as good as it looks then WTF!!!!! --------------------------------------------------------------------------------------------------------------------------------Scripts : _Encrypt UDF_UniquePCCode UDF MS like calculatorInstall programm *UPDATED* --------------------------------------------------------------------------------------------------------------------------------[quote name='Helge' post='213117' date='Jul 26 2006, 10:22 AM']Have you ever tried surfing the internet with a milk-carton ?This is similar to what you're trying to do.[/quote] Link to comment Share on other sites More sharing options...
Lakes Posted May 7, 2006 Share Posted May 7, 2006 I am speechless about this Thats just amazing ....If it dies everything as good as it looks then WTF!!!!!Very, very impressive from the screen shot!And I`d like to how to do the visualisation thingy too... 2015 - Still no flying cars, instead blankets with sleeves. Link to comment Share on other sites More sharing options...
jpam Posted May 8, 2006 Author Share Posted May 8, 2006 $WMP=ObjCreate("WMPlayer.OCX") GUICtrlCreateObj($WMP,20,40,300,80) for visualisation you have to add "Guictrlcreateobj($WMP,20,40,300,80)" jpam Link to comment Share on other sites More sharing options...
marfdaman Posted May 20, 2006 Share Posted May 20, 2006 $WMP=ObjCreate("WMPlayer.OCX")GUICtrlCreateObj($WMP,20,40,300,80)for visualisation you have to add "Guictrlcreateobj($WMP,20,40,300,80)"jpamThanks for the info, but I still can't get it implemented. All I get when copy-pasting your code is a black rectangle Pleas give me some info about this!Regards Don't take my pic to serious...~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~You Looked, but you did not see!~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Link to comment Share on other sites More sharing options...
jpam Posted May 20, 2006 Author Share Posted May 20, 2006 The black window you see is the player play a mp3 musicfile and you see the visualisation in the black window if you see nothing ,then you must first select a preset in windows media player the wmplayer.ocx gets the last choosen preset from windows mediaplayer jpam Link to comment Share on other sites More sharing options...
marfdaman Posted May 20, 2006 Share Posted May 20, 2006 Well I still can't get it to work, perhaps because I use winmm.dll to play music? The visualization I'm using is Bars And Waves-> Bars, but when I play a song all stays black (but when I right click the area I DO get a context menu with things like "Play", "Stop" etc). Regards Don't take my pic to serious...~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~You Looked, but you did not see!~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Link to comment Share on other sites More sharing options...
jpam Posted May 20, 2006 Author Share Posted May 20, 2006 its not working with winmm.dll wmplayer.ocx has different parameters like this with $wmp .controls.stop .controls.pause .controls.play endwith you can find all the controls and settings commands at msdn i spent days at looking and trying all these commands hopes this helps you Link to comment Share on other sites More sharing options...
marfdaman Posted May 20, 2006 Share Posted May 20, 2006 Aha, ok I'm going to try that! Tnx again for your help! Regards Don't take my pic to serious...~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~You Looked, but you did not see!~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Link to comment Share on other sites More sharing options...
marfdaman Posted May 20, 2006 Share Posted May 20, 2006 I have antoher question: from microsoft's site I'm learning a great deal about WMP's com features, but I can't get a song to play without opening WMP itself. Can you tell me how to do that? Regards Don't take my pic to serious...~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~You Looked, but you did not see!~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Link to comment Share on other sites More sharing options...
slightly_abnormal Posted May 20, 2006 Share Posted May 20, 2006 Are you going to release it anytime soon.. maybe with source code? Link to comment Share on other sites More sharing options...
marfdaman Posted May 20, 2006 Share Posted May 20, 2006 Are you going to release it anytime soon.. maybe with source code?Yes it would be nice to see how something like this works, even if it's not finished yet. Don't take my pic to serious...~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~You Looked, but you did not see!~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Link to comment Share on other sites More sharing options...
Lakes Posted May 20, 2006 Share Posted May 20, 2006 I agree, some example code would be nice to look at. 2015 - Still no flying cars, instead blankets with sleeves. Link to comment Share on other sites More sharing options...
jpam Posted May 20, 2006 Author Share Posted May 20, 2006 soon the program has some issues with doubleclick its a bug in GUIRegisterMsg i have to wait for holger cleans the bug its working now but not good ,sometimes you must click 3 times I have to make a installer because its not just one .Exe file it has a lot of images and a font who dont want to install itself with the func 'fileinstall' just some bugs that i have to cleanup jpam Link to comment Share on other sites More sharing options...
jpam Posted May 20, 2006 Author Share Posted May 20, 2006 to marfdaman i'll make a example gui for you with a working player then you can see how it works butt it will be tomorrow (sunday) wife is waiting ,want to see a movie jpam Link to comment Share on other sites More sharing options...
marfdaman Posted May 20, 2006 Share Posted May 20, 2006 to marfdamani'll make a example gui for you with a working playerthen you can see how it worksbutt it will be tomorrow (sunday) wife is waiting ,want to see a movie jpamTnx een hele boel man! I can really use that to see just how you do the visualization (still no succes). Don't take my pic to serious...~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~You Looked, but you did not see!~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Link to comment Share on other sites More sharing options...
jpam Posted May 20, 2006 Author Share Posted May 20, 2006 i was lying marfdaman ! about tomorro here you are; #include <GUIConstants.au3> Opt("GUIOnEventMode", 1) $main = GUICreate("wmplayer.ocx Example",340,300,-1,-1) $WMP = ObjCreate("wmplayer.ocx") GUICtrlCreateObj($WMP,20,40,300,100) GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSE") $btn1 = GUICtrlCreateButton("Load mp3",40,200,60,30) GUICtrlSetOnEvent($btn1,"open") $btn_stop = GUICtrlCreateButton("Stop",110,200,60,30) GUICtrlSetOnEvent($btn_stop,"stop") With $WMP .windowlessVideo = True .fullscreen = False .stretchToFit = False .uiMode = 'None'; None, mini, full .enableContextMenu = False EndWith GUISetState(@SW_show) while 1 sleep(1000) WEnd Func open() $get_mp3 = FileOpenDialog("open .mp3 file","c:\","(*.mp3)",1) $WMP.url = $get_mp3 EndFunc Func stop() $WMP.controls.stop EndFunc Func CLOSE() Exit EndFunc Link to comment Share on other sites More sharing options...
marfdaman Posted May 20, 2006 Share Posted May 20, 2006 i was lying marfdaman !about tomorro here you are;#include <GUIConstants.au3>Opt("GUIOnEventMode", 1)$main = GUICreate("wmplayer.ocx Example",340,300,-1,-1)$WMP = ObjCreate("wmplayer.ocx")GUICtrlCreateObj($WMP,20,40,300,100)GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSE")$btn1 = GUICtrlCreateButton("Load mp3",40,200,60,30)GUICtrlSetOnEvent($btn1,"open")$btn_stop = GUICtrlCreateButton("Stop",110,200,60,30)GUICtrlSetOnEvent($btn_stop,"stop")With $WMP .windowlessVideo = True .fullscreen = False .stretchToFit = False .uiMode = 'None'; None, mini, full .enableContextMenu = FalseEndWith GUISetState(@SW_show)while 1 sleep(1000)WEndFunc open() $get_mp3 = FileOpenDialog("open .mp3 file","c:\","(*.mp3)",1) $WMP.url = $get_mp3EndFuncFunc stop() $WMP.controls.stopEndFuncFunc CLOSE() ExitEndFuncTNX it's working just great for me ! This will really look nice! Thumbs up! Don't take my pic to serious...~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~You Looked, but you did not see!~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Link to comment Share on other sites More sharing options...
jpam Posted May 20, 2006 Author Share Posted May 20, 2006 PezoFaSho you must have windows mediaplayer 9 installed on your system better install version 10 then its working jpam 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