افزودن آهنگ به برنامه

[yamne_h]

سلام

چطور میشه اهنگ به برنامه اضافه کرد

[mzjahromi]

دوست عزیز یه جستجو اگه بکنید قبلا این سوال مطرح شده
با این حال
با استفاده از تابع PlaySound یا کامپوننت TMediaPlayer
البته راههای دیگه هم شاید داشته باشه ولی این دوتا بی دردسر تره

[Mahmood_M]

با تابع MessageBeep هم می تونی صداهای پیشفرض ویندوز رو اجرا کنی ، مثلا :

MessageBeep(Mb_ICONQUESTION);
کد بالا صدایی رو پخش می کنه که ویندوز هنگام پرسیدن سئوال پخشش می کنه.

[yamne_h]

من نتونستم

[mzjahromi]

من نتونستم
چی رو نتونستی؟؟؟؟؟؟

[yamne_h]

آهنگو دیگه

نتونستم اهنگ بزارم

[mzjahromi]

MMsystem رو به Uses اضافه کردید( البته برای PlaySound)

[unique1984]

MediaPlayer1.Close;
Dir := ExtractFilePath(Application.ExeName);
MediaPlayer1.FileName := Dir+'warning.wav';
MediaPlayer1.Open;
MediaPlayer1.Play;
این کدو استفاده کن ببین می شه یا نه .

warning.wav اسم یه فایل صوتی هستش.
و ‌Dir هم یه متغیر از نوع String


یه تیکه برنامه هم ضمیمه می کنم ببینش

[DAMAVAND]

از playsound استفاده کن.MMsystem رو به Uses اضافه کنید.
مثال:( PlaySound('tada',0,SND_ASYNC