+- Delphi Can (https://www.delphican.com)
+-- Forum: Delphi (https://www.delphican.com/forumdisplay.php?fid=3)
+--- Forum: Mobil Platform - FireMonkey (FMX) (https://www.delphican.com/forumdisplay.php?fid=7)
+--- Konu Başlığı: Sıralı mp3 çalma (/showthread.php?tid=593)
Sıralı mp3 çalma - dnzmobile - 26-01-2017
Merhaba arkadaşlar;
Uzun süre araştırmama rağmen bulamadığım bir soruyu sormak istiyorum..
MediaPlayer bileşeni ile android de iki adet şarkı çalmasını istiyorum önce müzik1 çalacak ve müzik1 bittiğinde müzik2 çalacak.
Bunu nasıl yapabileceğim hakkında bir fikri olan var mı?
Sıralı mp3 çalma - masteryoda - 26-01-2017
Buradaki örneği inceleyebilirsiniz:
http://delphifmandroid.blogspot.com.tr/2013/11/fmxmediatmediaplayer-mp3-android.html
Sıralı mp3 çalma - dnzmobile - 27-01-2017
teşekkür ederim masteryoda.
Sıralı mp3 çalma - dnzmobile - 27-01-2017
Yaptığım araştırmalardan sonra kendimce şöyle bir çözüm buldum. Belki ihtiyacı olan olur..
Amacım bir mp3 bittiğinde başka bir mp3 ün otomatik olarak çalmaya başlaması. Bunun için Forma 1 adet Button, MediaPlayer ve Timer ekledim.
procedure TForm1.Button1Click(Sender: TObject);
begin
mediaplayer1.FileName:=TPath.Combine(TPath.GetDocumentsPath,'muzik1.mp3');
mediaplayer1.play;
timer1.enabled:=true;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if MediaPlayer1.Media <> nil then
begin
if (MediaPlayer1.State = TMediaState.Stopped) then
begin
mediaplayer1.FileName:=TPath.Combine(TPath.GetDocumentsPath,'muzik2.mp3');
mediaplayer1.play;
timer1.Enabled:=false;
exit;
end;
end;
end;
Cvp: Sıralı mp3 çalma - Tuğrul HELVACI - 27-01-2017
(27-01-2017, Saat: 14:32)dnzmobile Adlı Kullanıcıdan Alıntı: teşekkür ederim masteryoda.
Beğendiğiniz paylaşımlara teşekkür etmek elbette bir incelik; lâkin beğendiğiniz paylaşımların yazarlarına "Puan Ver" düğmesi vasıtası ile puan da verebilirseniz yerinde olacaktır. Sistemde puanın önemi bulunmaktadır.
Teşekkür ederim.
Sıralı mp3 çalma - dnzmobile - 27-01-2017
Bunu bilmiyordum, öğrendiğim iyi oldu.
Sıralı mp3 çalma - baloglurecep - 19-11-2022
Dostlar bilgiler için teşekkür ederim. Yeni konu açmama adına buradan sormanın uygun olacağını düşünüyorum. Delphi 7 kullanarak okulumuzda kullandığım zil programını yazmıştım. Birkaç eklenti güncellme yaptım. Nasip olursa da teknofeste götürmek istiyorum. Hatasız olmasına çalışıyorum. Normal mediaplayer nesnesi kullandığımda onNotify olayında mediaplayer nesnesinin stop durumunu (stop durumu) anlamam gerekiyor. Ne yaptımsa olmadı. Stop durumunu anlamam seri porta bilgi gönderecek ve amfiyi kapatacak. yalnız activex nesnesi mediaplayer kurup kullandığımda stop durumumu anlıyorum fakat onda da tenefüslerde iseğe bağlı çalan şarkı listesini sıralı çaldıramıyorum. normal mediaplayer nesnesinin stoped durumunu nasıl anlayabilirim? Bununla ilgili tecrübelerinizden faydalanmak isterim. Teşekkürler
Sıralı mp3 çalma - cemakkus - 19-11-2022
(19-11-2022, Saat: 02:09)baloglurecep Adlı Kullanıcıdan Alıntı: Dostlar bilgiler için teşekkür ederim. Yeni konu açmama adına buradan sormanın uygun olacağını düşünüyorum. Delphi 7 kullanarak okulumuzda kullandığım zil programını yazmıştım. Birkaç eklenti güncellme yaptım. Nasip olursa da teknofeste götürmek istiyorum. Hatasız olmasına çalışıyorum. Normal mediaplayer nesnesi kullandığımda onNotify olayında mediaplayer nesnesinin stop durumunu (stop durumu) anlamam gerekiyor. Ne yaptımsa olmadı. Stop durumunu anlamam seri porta bilgi gönderecek ve amfiyi kapatacak. yalnız activex nesnesi mediaplayer kurup kullandığımda stop durumumu anlıyorum fakat onda da tenefüslerde iseğe bağlı çalan şarkı listesini sıralı çaldıramıyorum. normal mediaplayer nesnesinin stoped durumunu nasıl anlayabilirim? Bununla ilgili tecrübelerinizden faydalanmak isterim. Teşekkürler
Şurada konu ile ilgili örnek bir kod var :
https://stackoverflow.com/questions/46640579/delphi-mediaplayer-notification-on-song-stopped
Cvp: Sıralı mp3 çalma - baloglurecep - 20-11-2022
(19-11-2022, Saat: 07:23)cemakkus Adlı Kullanıcıdan Alıntı:(19-11-2022, Saat: 02:09)baloglurecep Adlı Kullanıcıdan Alıntı: Dostlar bilgiler için teşekkür ederim. Yeni konu açmama adına buradan sormanın uygun olacağını düşünüyorum. Delphi 7 kullanarak okulumuzda kullandığım zil programını yazmıştım. Birkaç eklenti güncellme yaptım. Nasip olursa da teknofeste götürmek istiyorum. Hatasız olmasına çalışıyorum. Normal mediaplayer nesnesi kullandığımda onNotify olayında mediaplayer nesnesinin stop durumunu (stop durumu) anlamam gerekiyor. Ne yaptımsa olmadı. Stop durumunu anlamam seri porta bilgi gönderecek ve amfiyi kapatacak. yalnız activex nesnesi mediaplayer kurup kullandığımda stop durumumu anlıyorum fakat onda da tenefüslerde iseğe bağlı çalan şarkı listesini sıralı çaldıramıyorum. normal mediaplayer nesnesinin stoped durumunu nasıl anlayabilirim? Bununla ilgili tecrübelerinizden faydalanmak isterim. Teşekkürler
Şurada konu ile ilgili örnek bir kod var :
https://stackoverflow.com/questions/46640579/delphi-mediaplayer-notification-on-song-stopped
Cemal bey kardeşim öncelikle cevabınız için teşekkür ederim. Buradaki kod tam olrak istediğimi karşılamıyor. Şöyleki zil programında şarkının tamamını çaldır ya da ..... saniyesini çaldır seçeneği var. Genelde de okulda belirli bir süre çalışıyor. Yani seçim yapılan belirlenen bir şarkının uzunluğunu hesaplayıp sona gelince bitti demek problemimi çözmüyor.
normal mediaplayer nesnes içine
procedure Tform1.Player1Notify(Sender: TObject);
if (ANFI_CHECK_ONN.Checked=true) and (ComPort1.Connected)and(KNTRL_EDIT.Checked=false) then
begin
if (Player1.Mode = mpStopped) then
Begin
if TENEFUS_DURUMU.Caption<>'4' Then
Begin
zaman_al:=Now;
zaman_al:=IncSecond(zaman_al,Trunc(ANFI_SPIN2.Value));
LABEL_ANFIKAPAT.caption:=FormatDateTime('hh:nn:ss',zaman_al);
End;
End
else if (Player1.Mode = mpPlaying) then
Begin
LABEL_ANFIKAPAT.caption:='0';
End;
end;
Yukarıdaki kod ile şarkıtının bitiğini/stop ettiğini/durdurulduğunu anlayamıyorken activex nesesinden olan media player ile stop durumunu anlayabiliyorum.
Araştırmaya devam bir sonuç çıkarırsam çözümü paylaşırım. Teşekkürler