سلام
چطور میشه اهنگ به برنامه اضافه کرد
سلام
چطور میشه اهنگ به برنامه اضافه کرد
دوست عزیز یه جستجو اگه بکنید قبلا این سوال مطرح شده
با این حال
با استفاده از تابع PlaySound یا کامپوننت TMediaPlayer
البته راههای دیگه هم شاید داشته باشه ولی این دوتا بی دردسر تره
You never know what you can do until you try
با تابع MessageBeep هم می تونی صداهای پیشفرض ویندوز رو اجرا کنی ، مثلا :
MessageBeep(Mb_ICONQUESTION);
کد بالا صدایی رو پخش می کنه که ویندوز هنگام پرسیدن سئوال پخشش می کنه.
من نتونستم
چی رو نتونستی؟؟؟؟؟؟من نتونستم
You never know what you can do until you try
آهنگو دیگه
نتونستم اهنگ بزارم
MMsystem رو به Uses اضافه کردید( البته برای PlaySound)
You never know what you can do until you try
MediaPlayer1.Close;
Dir := ExtractFilePath(Application.ExeName);
MediaPlayer1.FileName := Dir+'warning.wav';
MediaPlayer1.Open;
MediaPlayer1.Play;
این کدو استفاده کن ببین می شه یا نه .
warning.wav اسم یه فایل صوتی هستش.
و Dir هم یه متغیر از نوع String
یه تیکه برنامه هم ضمیمه می کنم ببینش
آخرین ویرایش به وسیله unique1984 : سه شنبه 09 اسفند 1384 در 15:54 عصر
از playsound استفاده کن.MMsystem رو به Uses اضافه کنید.
مثال:( PlaySound('tada',0,SND_ASYNC