السلام عليكم ورحمة الله وبركاته
أخوانى الأعزاء . انا عايز اشغل الميديا بلاير فى loop انا مشغلها وملخيها تقرا من path بس عايز الملف الصوتى اللى انا مشغله لما يخلص يشتغل تانى اوتوماتيك لحد اما ابقى اقفله بتايم انا هحدده بعدين بس ازاى اقدر اخليها تشتغل فى loop
خيركم من تعلم العلم وعلمه
السلام عليكم ورحمة الله وبركاته
توجد خاصية لاداة الميديا بلايير تسمى PlayCount تحدد فيها عدد مرات التكرار كالاتى
Private Sub Command1_Click() Wmp.Settings.PlayCount = 5 Wmp.Url = "C:\Test.wav" End Sub
سيتم تكرار الصوت 5 مرات
إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال
شكرا على معلومة الكود بس ممكن من custom من شريط الخواص تحديد لووب نهائي أو لا نهائي
من قال لا إله إلا الله صادقا دخل الجنة
موقعي للتعارف و تبادل الأخبار http://www.xybond.com
اقتباسشكرا على معلومة الكود بس ممكن من custom من شريط الخواص تحديد لووب نهائي أو لا نهائي
عادي أيضاً غير الخاصية PlayCount إلى
99999999999999
مثلا
المحلة الكبري - كلية الطب جامعة الأزهر بدمياط
من مواضيعي
برنامج تحويل mp3,wav,wma إلى exe والكود موجود
أداة تصميم الفورم على شكل صورة مع الكود
واحدة من أحدث الشفرات بمناسبة إنتهاء الإمتحانات
أفضل الإختصارات لكود برنامج خفي السواقات(الدرايفات
مؤثر عرض على مجموعة من الجمل تشبة المنتديات
إليكم أداة شاشة العرض مع الكود
برنامج تحويل exe,dll إلى Ico مع الكود
من المواضيع التي شاركت فيها
كيف يتم تصدير محتويات الفورم على شكل صورة؟
كيفية إعادة تسمية المجلدات Folders
Colored List Box Control with Horizontal Scroll
وهناك الجديد إن شاء الله
Private Sub Computer_Think()
On Error Tray Again
If You = "Real Computer" Then
DoIt("By Your Self")
Else
Kick("Your Self")
End If
End Subاقتباسشكرا على معلومة الكود بس ممكن من custom من شريط الخواص تحديد لووب نهائي أو لا نهائي
الاداة اللى عندى مالهاش الخاصية Custom
إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال
اقتباسالاداة اللى عندى مالهاش الخاصية Custom
اذا ملف الميديا بلير ذو الامتداد ocx نازل كامل في الجهاز فلا بد ان يظهر في الخواص custom
و الا استعمل طريقة الكود المذكورة اعلاه و بصراحة هي طريقة جديدة علي :o
من قال لا إله إلا الله صادقا دخل الجنة
موقعي للتعارف و تبادل الأخبار http://www.xybond.com
هذا الموضوع مغلق.