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

[aliman12]

درودی دگر بار خدمت توسعه دهندگان گرامی و گرانقدر
آیا راهی موجود است که بتوان یک فایل mp3 را بدون استفاده از کنترل مدیا پلیر و بدون استفاده از کامپوننت پخش کرد؟
قبلا از راهنمایی شما گرانسنگان تشکر می جویم

[MohammadGh2011]

سلام عليکم
بله توسط API امکان پذيره.
کد زير رو قبلا در يه تاپيک ديگه اي جناب آقاي واژدي قرار دادن که آدرس اون رو پيدا نکردم براتون بزارم.
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
Private Sub Command1_Click()
Dim FileName$
FileName = "C:\test.mp3" 'آدرس فايل Mp3
mciSendString "close my_alias_nam", 0, 0, 0
If mciSendString("open " & FileName & " type MPEGVideo alias my_alias_nam", 0, 0, 0) = 0 Then
mciSendString "play my_alias_nam from 0", 0, 0, 0
End If
End Sub
Private Sub Command2_Click()
mciSendString "stop my_alias_nam", 0, 0, 0
mciSendString "close my_alias_nam", 0, 0, 0
End Sub
Private Sub Command3_Click()
mciSendString "pause my_alias_nam", 0, 0, 0
End Sub
Private Sub Command4_Click()
mciSendString "play my_alias_nam", 0, 0, 0
End Sub



موفق باشيد

[SlowCode]

بدون استفاده از کنترل مدیا پلیر و بدون استفاده از کامپوننت
اگه نمیخوایین بدون استفاده از کامپوننت باشه نباید از تابع هم استفاده کنی چون فایل dll اون حدود 10 مگ هست.

[just4froum]

اگه نمیخوایین بدون استفاده از کامپوننت باشه نباید از تابع هم استفاده کنی چون فایل dll اون حدود 10 مگ هست.

خوب کامپوننت رو که کامپیوتر کاربر ندراه ولی dll مربوطه را همه ویندوز ها دارند.

[SlowCode]

بله به طور پیشفرض تو همه سیستم ها هست، ولی اینو در نظر بگیر که ممکنه این dll با حذف ویندوز مدیا پلیر حذف بشه بنابراین جهت محکم کاری باید این dll رو به ستاپت اضافه کنی، البته ریسک هم میشه کرد.

[محسن واژدی]

سلام علیکم

کد زير رو قبلا در يه تاپيک ديگه اي جناب آقاي واژدي قرار دادن که آدرس اون رو پيدا نکردم براتون بزارم. تاپیک زیر:
http://barnamenevis.org/showthread.php?313186-%D9%BE%D8%AE%D8%B4-%D9%81%D8%A7%DB%8C%D9%84-%D8%B5%D9%88%D8%AA%DB%8C-%D8%AF%D8%B1-%D8%A8%D8%B1%D9%86%D8%A7%D9%85%D9%87&p=1374976&viewfull=1#post1374976
موفق باشید

[m2011kh]

ببخشید فقط یه سوال اگه ما با همین API صدا رو پخش کردیم اون وقت چجوری صداشو کم و زیاد کنیم؟؟؟؟
MMD

[M.T.P]

یه کلاس نسبتا کامل در همین خصوص همراه با پروژه نمونه تو تاپیک زیر گذاشتم ببینید بد نیست.

پخش صوتی و تصویری (http://barnamenevis.org/showthread.php?331651-%D9%BE%D8%AE%D8%B4-%D8%B5%D9%88%D8%AA%DB%8C-%D9%88-%D8%AA%D8%B5%D9%88%DB%8C%D8%B1%DB%8C)