[ popmilan76 @ 24.05.2019. 22:23 ] @
Napravio sam da mi se prikaze glavna forme,i kada pritisnem neki f,da mi se pojavi neki mp3 file,tj muzika.Ono što meni treba,jeste da kada ponovo pritisnem taj f,da mi krene ispocetka.Kako to da izvedem,pokušao sam sa zadržavanjem fokusa na formi,ali nisam uspeo?


Muziku pokrecem pomocu shell execute...

[ Milan Milosevic @ 25.05.2019. 14:43 ] @
Stavi neku promenjivu koja ce ti pamtiti da li je taj mp3 fajl pokrenut.
Ako jeste onda pusti ispocetka, ako nije pokreni fajl sa diska.
Kako to uraditi zavisi od plejera koji koristiš.
[ popmilan76 @ 25.05.2019. 21:23 ] @
Player je ovaj defaultni windowsov,ali ja neću da sačekam da se on zavrsi,vec hocu kad kliknem neki f,da se samo ponovo pusti....
[ savkic @ 25.05.2019. 21:57 ] @
> Player je ovaj defaultni windowsov,ali ja neću da sačekam da se on zavrsi,vec hocu kad kliknem neki f,da se samo ponovo pusti

Sta se desava kad sad posaljes ShellExecute sa istim fajlom? Ide na pocetak ili nastavi, ako nastavi onda vidim dve mogucnosti:
a) trazis da li mediaplayer ima neki command line argument kojim se to moze postici
b) odbacis pristup sa ShellExecute (startovanje eksterne aplikacije) vec embedujes mediaplayer ActiveX kontrolu kod sebe i onda koristis API gde imas mogucnost da radis sta zelis.
[ popmilan76 @ 25.05.2019. 22:05 ] @
Ovo je kod,koji koristim,tj deo koda...

If (Key = VK_F5) then begin

adotable1.Close;
adotable1.Open;
adotable1.First;
frmreklama.pesma := adotable1muzika.Value;

ShellExecute(Handle, 'play', Pchar(frmreklama.pesma), nil, nil , SW_minimize);

I ona se startuje,samo prvi put....A cini mi se da je islo svaki put kada kliknem na f5...Kada prvi put uradim f5,pokrene se ,cak nece da se ni minimizuje.A kada kliknem na formu,s tim sto to ne smem,jer taj klik mi radi nesto,onda dozvoli ispocetka pesmu.Znam za media player,ali sam krenuo ovako,posto mi se ucinilo jednostavnim.
[ tkaranovic @ 26.05.2019. 09:22 ] @
Morao bi to ozbilnije uraditi, ako mozes.
Sa createprocess kao sto je opisano na linku:

https://www.youtube.com/watch?v=KKYU5baDjI4

pre sledeceg startovanja bi trebao koristiti:

http://msdn.microsoft.com/en-us/library/ms686714%28VS.85%29.aspx
[ popmilan76 @ 26.05.2019. 13:35 ] @
Da li pomocu shell execute,mogu da ugasim windows media player?
[ Milan Milosevic @ 26.05.2019. 17:32 ] @
Sa shell execute koliko ja znam ne može da se ugasi program.
Možeš da mu pošaljes poruku sa sendmessage, ali prvo treba da ga pronades medu akivnim programima, da mu nađes Handle.

Bolje ti je da koristiš neki APi za pustanje muzike, tako ćeš imati veću kontrolu.
Recimo MMsystem.PlaySound


[Ovu poruku je menjao Milan Milosevic dana 26.05.2019. u 18:50 GMT+1]
[ tkaranovic @ 26.05.2019. 19:20 ] @
Ako iz Win explorera play pusta iz pocetka muziku onda je nesto u kodu za pustanje pogresno.
[ popmilan76 @ 27.05.2019. 16:36 ] @
Evo šta se dešava,sasvim slučajno sam provalio.Ponovo puštanje je moguće u Winampu,ali ne i u media playeru.Naravno,preko shell execute.Tako da je tu bio problem,mada ne znam zašto.I kod mene,neće ni ono hide,showna i ostale opcije za prikazivanje...
[ tkaranovic @ 28.05.2019. 03:38 ] @
Mozes da napravis wmp.bat fajl u kojem ce bitit:

start wmplayer /play "putanja\mXY.mp3"

I onda statujes uvek isto:

ShellExecute(0, PAnsiChar('open'), PAnsiChar('...\wmp.bat'), nil, nil, SW_SHOWNORMAL);

Fajl wmp.bat treba uvek da napravis kad hoces da pustis meki mp3 i uvek upises mp3 koji pustas.
Fajl wmp.bat je tekstualni fajl.

Ako treba mozes "/play" da promenis za nesto drugo.
[ ravni @ 28.05.2019. 08:45 ] @
🤣