الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

قراءة آية أو مقطع من السورة

بدأه booknet في 18 أكتوبر 2009 · 4 رد · 639 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بســم الله الـرحمــن الرحيــم

السلام عليكــم ورحمـة الله وبركاتــه ،،

كيف يمكن قراءة آية أو مقطع من السورة؟

علما بأنني أستخدم الكود التالي لقراءة السورة كاملة

AxWindowsMediaPlayer1.URL = "c:\001.mp3"

جزاكم الله خيرا

تم تعديل هذه المشاركة بواسطة booknet في 18 أكتوبر 2009 في 11:51

#2

أظن أن عليك وضع لائحة بالمقاطع أو بالأحرى الأيات :

الآية 1 : تبدأ عند الثانية كذا و تنتهي عند الثانية كذا

زد أداة Timer إلى الفورم و حدد خاصية Interval على 1000

زد اشتراكا في الحدث Tick و على الدالة المشتركة :

	Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
		Text = AxWindowsMediaPlayer1.Ctlcontrols.currentPosition.ToString()
		' تحقق من نهاية المقطع المخصص للآية الكريمة
		If AxWindowsMediaPlayer1.Ctlcontrols.currentPosition >= durationLimit Then
			' وقف القراءة
			AxWindowsMediaPlayer1.Ctlcontrols.stop()
		End If
	End Sub

كائن Timer ننشطه عند بدء القراءة و نوقفه عند إيقافها

	' يحدث في كل مرة تغير وضع القراءة
	Private Sub AxWindowsMediaPlayer1_PlayStateChange(ByVal sender As System.Object, ByVal e As AxWMPLib._WMPOCXEvents_PlayStateChangeEvent) Handles AxWindowsMediaPlayer1.PlayStateChange
		Select Case e.newState
			Case 1, 2 ' Stop and Pause
				Timer1.Enabled = False
			Case 3 ' Play
				Timer1.Enabled = True
		End Select
	End Sub

بالطبع تحتاج لبعض التغييرات ليتلاءم الكود و مشروعك...

تحياتي...

#3

شكرا لك أخي العزيز وبارك الله فيك

#4

السلام عليكم ورحمة الله وبركاته

يا إخوانى أنا مش لاقى الأداة أصلا فى الدوت نت

ممكن حد يرفع مشروع مبسط فيه الأداة على فورمة ؟

عندما تضيق بك الدنيا فلا تقل يارب عندى هم كبير ولكن قل يا هم عندى رب كبيييير

اللهم إنى أتيت بابك مستغفراً فإن غفرت لى وأدخلتنى فأنت أهلٌ لذلك

وإن لم تغفر لى وطردتنى فأنا أهلٌ لذلك

#5

قم بزيادة Reference للمكتبة wmp.dll كما هو مبين على الصورة و ستجد الأداة AxWindowsMediaPlayer موجودة على نافذة الأدوات.

تحياتي...

post-207152-1256285185_thumb.jpg

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…