هل يمكنني في الفيجوال بيسك 6 أن أدمج مثلا أغنية في البرنامج الذي أريد أن أصممه
مثلا بعثت هذه الأغنية لصديق و كمبيوتره لا يحوي على هذه الأغنية ,
أريد أن تكون الأغنية من صميم البرنامج وليس ان يقوم البرنامج بتشيغل وصلة للاغنية في الكمبيوتر
إذا لم يكن سؤالي واضح أرجو إبلاغي
أخوكم a.h
نسخة كاملة: كيف يمكن دمج ملف مع البرنامج؟؟؟؟
برمجة - شبكات - كمبيوتر - منتديات الفريق العربي للبرمجة > منتديات لغات البرمجة العام > منتدى مبرمجي لغة Microsoft Visual Basic 6 وما قبلها من إصدارات > قسم الدروس والمواضيع الهامة
لإضافة الملف إلى البرنامج يجب تحميل التالي:
Add-InAdd-In Manager...VB6 Resource Editor
أو شيئ مماثل في الفجول بيسيك 5
ثم استخدامه لإضافة ملف الصوت تحت اسم WAVE وبرقم ما خاص لكل ملف صوت مثلا 101 - 102 - 103 ...
ثم يتم حفظ الملف كملف REC والذي سيتم إضافته أوتاميتكيا إلى الملف التنفيذي
ولقراءة (عزف) هذا الملف المضاف فعليك إضافة الكود التالي إلى module:
ثم يتم استدعاؤه ببساطة بالشكل:
حيث 101 هو رقم الصوت الذي تريد عزفه والذي تمت إضافته مسبقا.
Add-InAdd-In Manager...VB6 Resource Editor
أو شيئ مماثل في الفجول بيسيك 5
ثم استخدامه لإضافة ملف الصوت تحت اسم WAVE وبرقم ما خاص لكل ملف صوت مثلا 101 - 102 - 103 ...
ثم يتم حفظ الملف كملف REC والذي سيتم إضافته أوتاميتكيا إلى الملف التنفيذي
ولقراءة (عزف) هذا الملف المضاف فعليك إضافة الكود التالي إلى module:
كود
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (hpvDest As Any, hpvSource As Any, ByVal cbCopy As Long)
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Const SND_ASYNC = &H1 ' play asynchronously
Private Const SND_MEMORY = &H4 ' lpszSoundName points to a memory file
Public Sub PlaySoundResource(ResID As Integer)
Dim bSound() As Byte
bSound = LoadResData(ResID, "WAVE")
Dim aSound As String
aSound = Space$(UBound(bSound) + 1)
CopyMemory ByVal aSound, bSound(0), Len(aSound)
sndPlaySound aSound, SND_ASYNC Or SND_MEMORY
End Sub
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Const SND_ASYNC = &H1 ' play asynchronously
Private Const SND_MEMORY = &H4 ' lpszSoundName points to a memory file
Public Sub PlaySoundResource(ResID As Integer)
Dim bSound() As Byte
bSound = LoadResData(ResID, "WAVE")
Dim aSound As String
aSound = Space$(UBound(bSound) + 1)
CopyMemory ByVal aSound, bSound(0), Len(aSound)
sndPlaySound aSound, SND_ASYNC Or SND_MEMORY
End Sub
ثم يتم استدعاؤه ببساطة بالشكل:
كود
PlaySoundResource 101
حيث 101 هو رقم الصوت الذي تريد عزفه والذي تمت إضافته مسبقا.
أعتقد أن السابق يفي بالغرض.
ارجو المساعدة في هذا الاستفسار؟؟؟؟
عندي برنامج Visual Basic وهو جاهز اريد ان اعمل من برنامج بحث يصبح ملف Setup لليقام بتنزيله كما في البرامج العادية
عندي برنامج Visual Basic وهو جاهز اريد ان اعمل من برنامج بحث يصبح ملف Setup لليقام بتنزيله كما في البرامج العادية
من القائمة Add-Ins اختر .. Add-In Manager ثم اشر على Package and Deployment Wizard ثم حاول ....
ibn7@hotmail.com
ibn7@hotmail.com
إذا لم يظهر لديك هذا الخيار في قائمة Add-In Manager أذهب إلى قائمة أبدا Start ومن ثم إلى كافة البرامج ثم اختر Microsoft Visual Studio 6.0 ومن ثم اختر Microsoft Visual Studio Tools ومن ثم Package and Deployment Wizard قم بتشغيل هذا البرنامج وسوف يقوم بعمل اللازم
للمزيد ادخل على هذا الرابط http://204.157.36.16/index.php?showtopic=53834
السلام عليكم اولا
بالنسبه للسؤال الاول وهو دمج ملف صوت للبرنامج
اولا :- انا عملت اللى الاخ مصعب قال عليه بالضبط ولكن عند التشغيل تظهر رساله
resorce file "101" not found
مع العلم ان الى دى للملف الصوتى 101 فعلا وحتى انى عملته "دوبليكييت" وكان الرقم 102 وغيرت فى الكود الاخير من 101 الى 102 وبرضه نفس النتيجه , وكمان شكيت انى اكون كاتب الكود غلط اخدته نسخ ولصق وبرضه مفيش فايده ,, برجاء المساعده
ثانيا :- هل انفذ نفس الطريقه لو الملف الراد اضافته عباره عن ملف صورة او اى ملف اخر ايا كان نوعه؟؟؟
وشكرا مقدما
السلام عليكم
بالنسبه للسؤال الاول وهو دمج ملف صوت للبرنامج
اولا :- انا عملت اللى الاخ مصعب قال عليه بالضبط ولكن عند التشغيل تظهر رساله
resorce file "101" not found
مع العلم ان الى دى للملف الصوتى 101 فعلا وحتى انى عملته "دوبليكييت" وكان الرقم 102 وغيرت فى الكود الاخير من 101 الى 102 وبرضه نفس النتيجه , وكمان شكيت انى اكون كاتب الكود غلط اخدته نسخ ولصق وبرضه مفيش فايده ,, برجاء المساعده
ثانيا :- هل انفذ نفس الطريقه لو الملف الراد اضافته عباره عن ملف صورة او اى ملف اخر ايا كان نوعه؟؟؟
وشكرا مقدما
السلام عليكم
السلام عليكم
أخى الكريم حلواني أنا لم أفهم جيدا هذه النقطة
استخدامه لإضافة ملف الصوت تحت اسم WAVE وبرقم ما خاص لكل ملف صوت مثلا 101 - 102 - 103 ...ً
PlaySoundResource 101
حيث 101 هو رقم الصوت الذي تريد عزفه والذي تمت إضافته مسبقا
من فضلك ممكن توضيح؟ ما المقصود بالرقم الخاص لكل ملف ،، ممكن تشرحلى مثال على ملف واحد للتسهيل؟
بانتظارك
أخى الكريم حلواني أنا لم أفهم جيدا هذه النقطة
استخدامه لإضافة ملف الصوت تحت اسم WAVE وبرقم ما خاص لكل ملف صوت مثلا 101 - 102 - 103 ...ً
PlaySoundResource 101
حيث 101 هو رقم الصوت الذي تريد عزفه والذي تمت إضافته مسبقا
من فضلك ممكن توضيح؟ ما المقصود بالرقم الخاص لكل ملف ،، ممكن تشرحلى مثال على ملف واحد للتسهيل؟
بانتظارك
يـــا إخـــوان
انا مو قـــادر أضيــف موضوع اقول مشكلتي
مدري يقلي ليس لديكـ صلاحيــات وكذا مع اني فعلت العضوية وكل شي تمام
، يمكن بسبب الردود مدريييي
بس إن شاء الله تحلولي هالمشكــلة
ابي
بســرعة طريقة عمل وكود الســاعة عالفيجوال
للعلم انو هناك طرق عدة وانا
اعرف البعض منها
لكن الطريقة الي اشتغل عليهــا "" استعرض الشــغل لكن
الســاعة ما تظهـر الا بكليكـ بالماوس وما تعد الا بكليك بالماوس""
وش الحـــــــــــــــل ..............
اريد ان اصمم قوائم بالفيجول بيسك
إقتباس(العاصف12 @ Apr 18 2007, 12:31 PM) [snapback]624296[/snapback]
[/color]
يـــا إخـــوان
انا مو قـــادر أضيــف موضوع اقول مشكلتي
مدري يقلي ليس لديكـ صلاحيــات وكذا مع اني فعلت العضوية وكل شي تمام
، يمكن بسبب الردود مدريييي
بس إن شاء الله تحلولي هالمشكــلة
ابي
بســرعة طريقة عمل وكود الســاعة عالفيجوال
للعلم انو هناك طرق عدة وانا
اعرف البعض منها
لكن الطريقة الي اشتغل عليهــا "" استعرض الشــغل لكن
الســاعة ما تظهـر الا بكليكـ بالماوس وما تعد الا بكليك بالماوس""
وش الحـــــــــــــــل ..............
[color="#ff0000"]
يـــا إخـــوان
انا مو قـــادر أضيــف موضوع اقول مشكلتي
مدري يقلي ليس لديكـ صلاحيــات وكذا مع اني فعلت العضوية وكل شي تمام
، يمكن بسبب الردود مدريييي
بس إن شاء الله تحلولي هالمشكــلة
ابي
بســرعة طريقة عمل وكود الســاعة عالفيجوال
للعلم انو هناك طرق عدة وانا
اعرف البعض منها
لكن الطريقة الي اشتغل عليهــا "" استعرض الشــغل لكن
الســاعة ما تظهـر الا بكليكـ بالماوس وما تعد الا بكليك بالماوس""
وش الحـــــــــــــــل ..............
[color="#ff0000"]
إقتباس(wissam alhakimi @ Apr 30 2007, 04:54 PM) [snapback]631203[/snapback]
اريد ان اصمم قوائم بالفيجول بيسك
ياريت كل واحد فيكم يعمل موضوع مستقل لما يبقى عنده طلب , راجعم قواعد المنتدى.
مشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكور
مشكورمشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور مشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكورمشكور
مشكورمشكورمشكورمشكورمشكور مشكور
مشكورمشكورمشكورمشكورمشكور
هذه "نسخة - خفيفة" من محتويات الرئيسية للإستعراض الكامل مع المزيد من الصور والخيارات الرجاء إضغط هنا.