پخش آهنگ [بایگانی] - برنامه نویس

morika

یک شنبه 13 مرداد 1387, 17:22 عصر

با سلام
در مورد اين سوال جستوجو كردم ولي چيزهايي كه پيدا شد به درد من نخورد
من مي خواستم وقتي برنامه اجرا ميشه آهنگ شروع بشه و با اتمام آهنگ تموم بشه
ولي اشكال كار اينجاست كه وقتي فايل رو exe‌ كني روي كامپيوتر ديگه جواب نميده چون آدرس آهنگ رو كامپيوتر شما است نه كس ديگه
اگه ممكنه اين مشكل رو به طور كامل براي من حل كنيد
خيلي ممنون

scarce

یک شنبه 13 مرداد 1387, 18:40 عصر

morika

یک شنبه 13 مرداد 1387, 19:26 عصر

سلام دوست من
برای این کار فایل آهنگ رو در کنار فایل exe قرار دهید و آدرس فایل رو به این شکل تغییر دهید
App.Path & "\File name.mp3"
شما باید به جای File Name.Mp3 نام فایل آهنگ با پسوند مورد نظرشو وارد کنید موفق باشید
دوست عزيز من كه گفتم به طور كامل توضيح بديد
اگه ميشه بگيد با چه كدي ميشه اين كارو كرد
يعني از چه جوري ميشه كاري كرد كه وقتي فروم لود مي شه آهنگ شروع به خوندن كنه
ممنون

norsmor

یک شنبه 13 مرداد 1387, 20:02 عصر

می تونید با استفاده از تابع sndPlaySound می تونید یک فایل wav را پخش کنید
ابتدا تابع زیر را تعریف کنید

کد:
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
بعد در رویداد form load
کد:
p = sndPlaySound("آدرس فایل با پسوند wav", 1)

و همونطور که دوستمون گفتن
App.Path & "\File name.mp3"