منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
تغيير المسار ملف صوتي - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : تغيير المسار ملف صوتي (/showthread.php?tid=22692)

الصفحات: 1 2

تغيير المسار ملف صوتي - العيدروس - 25-11-17

السلام عليكم.اخواني من فضلكم عندي ملف صوتي تبع المشروع موجود بالقرص c و يشتغل تمام
حبيت اغيرو من القرص c الى الريسورس تبع المشروع.حاولت بكذا وسيلة لكن ما ضبطت
كيف لو سمحتم اغير بالكود يلي موضوع بالفورم load
كود :
      Dim sp As New System.Media.SoundPlayer
       'sp.SoundLocation = "c:\Nachide.wav"
       sp.SoundLocation = "my.Resource:\Nachide.wav"
       sp.PlayLooping()


RE: تغيير المسار ملف صوتي - ﻣﺒﺘﺪﺉ - 25-11-17

وعليكم السلام

بدل ما تستخدم SoundLocation استخدم Stream مثل
sp.Stream = My.Resources.Nachide

RE: تغيير المسار ملف صوتي - العيدروس - 25-11-17

تسلم  يا غالي .. ما ضبطت لا location تبعي ولا stream تبعك.هل ممكن التعديل على الكود تبعي الله يرضى عليكم

RE: تغيير المسار ملف صوتي - ﻣﺒﺘﺪﺉ - 25-11-17

اصلا انا اعطيتك الكود الخاص بك بعد التعديل

وانا مجرب الكود اللي اعطيك واشتغل

هل انت وضعت الملف الصوتي في الريسورس اكيد

ما فيه علامة تنصيص " " اذا كان الملف في الريسورس ولا تضيف نوع الملف wav.

Dim sp As New System.Media.SoundPlayer
sp.Stream = My.Resources.Nachide
sp.PlayLooping

RE: تغيير المسار ملف صوتي - العيدروس - 25-11-17

اخي الطيب .و الله حطيت الملف الصوتي بصيغة mp3 و wav لازيل الشكوك بالريسورس

و حطيت الكود تبعك بالفورم لود لكن شوف المشكل و الله ماني فاهم حاجة ايش الغلط


RE: تغيير المسار ملف صوتي - ﻣﺒﺘﺪﺉ - 25-11-17

احذفهم من الريسورس لان اسمائهم متشابهة
وارجع للريسورس وضع فقط ملف صيغة wav
لان SoundPlayer يشغل فقط ملفات صيغة wav

RE: تغيير المسار ملف صوتي - العيدروس - 25-11-17

اخي و الله صار عندي شك لاني جربت العملية بمشروع جديد خالص لازالة الشكوك مع الاكواد الاخرى وما ضبطت للاسف
انت تقصد الريسورس يلي مجلدها مكتوب عليه resources بالصورة


RE: تغيير المسار ملف صوتي - ﻣﺒﺘﺪﺉ - 25-11-17

لا يا أخي

أقصد الريسورس اللي داخل المشروع
لو فتحت المشروع تلاقي قائمة باسماء ملفات المشروع على اليمين ومن ضمنها My Project اضغط عليها مرتين
وراح يفتح خصائص المشروع وعندها حتشوف على اليسار تاب اسمه Resources هذا اللي اقصده
تسحب الملف من من مستكشف الويندوز وتسقطه داخل هذا الريسورس

RE: تغيير المسار ملف صوتي - العيدروس - 25-11-17

اخي الملف كان يشتغل عادي جدا جدا بالقرص c ما في طريقة اغير المسار فقط لو سمحت

كود :
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Dim sp As New System.Media.SoundPlayer
       'sp.SoundLocation = "c:\Hymne.wav"
       sp.SoundLocation = "My.Resources:\Hymne"
       sp.PlayLooping()
   End Sub


RE: تغيير المسار ملف صوتي - ﻣﺒﺘﺪﺉ - 25-11-17

أخي اذا تريد تشغيل الملف من الريسورس فليس له مسار لأنه سيدخل ضمن ذاكرة البرنامج يعني سيكون مدمج مع ملف التشغيل الخاص بالبرنامج
وطريقتها ذكرتها لك


عموما انا مبتدئ، وانتظر أحد المحترفين ليفيدك


تحياتي