Seek Bar در مدیاپلیر

[فاطمه وطن دوست]

سلام
در مورد Seek Bar مدیا پلیر اطلاعاتی میخواستم تا بتونم با کمک اون موسیقی یافیلم درحال پخش رو به جلو یا عقب ببرم .

در واقع اگر یه Seek Bar رو برای جلو و عقب بردن موسیقی یا فیلم در نظر بگیریم مقدار ماکزیمم Seek Bar باید برابر باشه با کل زمان (فیلم - موسیقی ) مون .

و با Scroll کردن Seek Bar باید بتونیم اون فیلم یا موسیقی رو به جلو و عقب ببریم .

حالا سوال اینکه با اسکرول کردنSeek Bar چطوری باید تنظیمات لازم رو انجام داد ، یا به اصطلاح با هر بار اسکرول کردن چقدر باید به جلو و عقب رفت تا وقتی به انتهای Seek Bar رسیدی فیلم یا موسیقی هم به اتمام برسه ؟

[فاطمه وطن دوست]

سلام
دوستان پاسخگو نیستند ؟

[mpmsoft]

دوست عزیز شما از Scroll استفاده می کنید ؟


اگر اینطور باشه اول شما بگید که به چه صورت فایل رو پخش می کنید بوسیله MediaPlayer با بصورت MciSendstring API تا بدونم طول فایل به چه صورت بدست میاد.

جهت تعیین طول اسکرول از Scrroll.Max می تونیم استفاده کنیم

بعد از تغییر مقدار اسکرول از رویدا Changed یا Scroll هم می تونی استفاده کنی به این شکل

MediaPlayer1.Position = VScroll1.Value

[فاطمه وطن دوست]

سلام

بله من از مدیا پلیر و اسکرول بار که این قسمت http://barnamenevis.org/forum/showthread.php?t=78376

استفاده میکنم و اینکه من میخوام زمانی که موسیقی یا فیلم در حال پخش هست این اسکرول هم حرکت کنه و اینکه کاربر با حرکت دادن میله ی seek bar (یا به اصطلاح همون srool bar ) بتونه فیلم رو جلو و عقب ببره (من برای جلو و عقب بردن فیلم یا موسیقی مشکلی ندارم )فقط میزان این x در واقع همون زمان کل فیلم هست ؟ scrool.max=x
و اینکه در واقع زمانی که فیلم یا موسیقی در حاله پخشه ، این میله اسکرول بار حرکت کنه ؟
و اینکه این کدو هم میدونم فقط نمیدونم در هر بار اسکرول
ScrollBar1.Max = WindowsMediaPlayer1.currentMediaduration


زمان کل فیلم -موسیقی رو چطوری باید به دست اوورد ؟




Private Sub ScrollBar1_Change()
WindowsMediaPlayer1.Controls.currentPosition = ScrollBar1.Value
End Sub

[vahidm]

با سلام
خب این که کاری نداره
سعی میکنم نمونه براتون بزارم

[فاطمه وطن دوست]

سلام
راهنمائی هم کنید ممنون میشم .
دوستان duration مدت زمان فیلم - موسیقی هست که من وقتی برنامه رو trace میکنم برابر با مدت زمان کل فیلم-موسیقی نیست مثلا کل زمان موسیقی = 5:12 ولی مینویسه ، 314 حالا اگه دوستان لطف کنن بگن
کل زمان فیلم با کدوم خصوصیت مشخص میشه ، ممنون میشم

[vahidm]

سلام ای کاش همه مشکلاتمون مثل این مشکل شما بود برای بدست آوردن زمان کل فیلم از این دستور می توانید استفاده کنید
Text2.Text = WindowsMediaPlayer1.Controls.currentPositionString

[فاطمه وطن دوست]

سلام
ممنون دوستان فقط یه مشکل اولا اینکه کد درست اینه



ScrollBar.Max = VAL(WindowsMediaPlayer1.Controls.currentPositionSt ring


و بعد اینکه بازم خطا میده میگه : THIS VALUE IS NOT CORRECT
بازم ممنون از دوستان.

[فاطمه وطن دوست]

سلام
دوستان پاسخ صحیح اینه :




ScrollBar1.Max = Val(WindowsMediaPlayer1.Controls.currentItem.durat ionString)

[فاطمه وطن دوست]

سلام
اگه میشه این برنامه رو ببینید چیز خاصی نداره ولی توش اشکال زیاد هست ؟

[Mbt925]

این نمونه رو ببینید کمکتون می کنه:

[shahpari]

سلام

من این برنامه ای که جناب مدیر گذاشتن رو دانلود کردم ولی متاسفانه موقع اجرا بهم خطا میده

فکر کردم شاید بهتر باشه سئوالم رو ادامه همین تاپیک مطرح کنم

در مورد خطاها باید بگم که به جای شی mediaplayer که توی فرم گذاشتید یه picture box
نمایش میده قبلا یکی از دوستان فرموده بودن این خاصبت وی بی هست که وقتی شی ای
رو پیدا نمی کنه به جای اون picture box میزاره ولی من وی بیم مشکلی نداره (چون این شی رو راحت برام پیدا میکنه)

راهنمایی کنید لطفا

چون چند مورد دیگه هم به این مشکل برخورده بودم

[vahidm]

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

[shahpari]

یعنی شما هم نمی تونید برنامه رو اجرا کنید؟

[shahpari]

کسی نمیتونه راهنمایی کنه؟

من همچنان نتونستم برنامه رو اجرا کنم

[Mbt925]

توی پوشه ی Need که همراه نمونه هست ، ابزارهایی که برنامه بهش نیاز داره هست.
قبل از باز کردن پروژه اونا رو رجیستر کنید.

[shahpari]

این کارو انجام دادم جناب مدیر

ولی mediaplayer1 رو پیدا نمی کنه

دقیقا جای اون picture box میذاره و موقع اجرا روی خط هایی که از این کنترل استفاده کردید خطا میده

[Mbt925]

پس سر فرصت خود کنترل مدیا پلیر رو هم میذارم . (الان به ویبی دسترسی ندارم)

[فاطمه وطن دوست]

سلام
این خطا رو ببینید .
این ocx همراه برنامه نیست در ضمن من تو کد برنامه دیدم که خصوصیاتی که برای مدیا پلیرتون
وجود داره با اونیکه ماله خوده ویبی اه فرق داره .
شایدم من اشتباه میکنم .

[فاطمه وطن دوست]

سلام
مشکل حل شد ، این بود که shahpari برو از تو ی سیستم 32 msdx.ocx رو به پروژت اضافه کن.

[shahpari]

ممنون فاطمه جان

ولی مشکل این نیست
خطایی که روی سیستمم میده رو تو این تصویر میتونی ببینی

قبلا هم گفتم مدیا پلیر رو تشخیص نمیده در صورتی که ویبی مشکلی نداره.

یه بار دیگه هم این مشکل پیش اومده بود اگه به این تاپیک نگاه کنید متوجه منظورم خواهید شد

http://barnamenevis.org/forum/showthread.php?t=99292&highlight=%D9%85%D8%B4%DA%A9%D9%84%D8%A7%D8%AA+%D8 %AF%DB%8C%D8%AA%D8%A7%D8%A8%DB%8C%D8%B3%DB%8C+%D8% A8%D8%B1%D8%A7%DB%8C+vb
بازهم تشکر

[فاطمه وطن دوست]

سلام
منم همچین مشکلی داشتم ، وقتی برنامه رو RUN میکردم دیدم همین پیغام رو نشون میده و در واقع وقتی رو دکمه open کلیک میکردم همین پیغام رو میداد و میگفت

همین پیغامی که تو نشون دادی . (تصویر ضمیمه )

و بعد تو قسمت کد برنامه این خط رو به عنوان debug نشون میداد .


ProgressDuration.Max = MediaPlayer1.Duration * 100

خب با این خطا باید فهمید که همچین کنترلی تو فرمت نداری پس باید بری اضافش کنی .
خب این MediaPlayer1 که فکر میکنم ورژنش قدیمی تره رو باید به پروژت اضافه کنی .
منم مشکلمو همین طوری حل کردم . و یه چیزه دیگه اینکه برو تو قسمت refrenc ها ببین

windows media player اضافه شده یا نه ؟
ماله منم همین برنامه بود و من همین کارو انجام دادم و الان هم درست شده مشکلی هم ندارم.

[H4i0 ACP]

سلام
اگه میشه این برنامه رو ببینید چیز خاصی نداره ولی توش اشکال زیاد هست ؟

خوبه
ولی بهتره که از direct sound , direct draw,directx render استفاده کنید تا برنامتون بتونه از طریق یه picture فایل تصویری و visualizer پخش کنه و نیاز به نصب A\V code نداشته باشه و بتونه تمامی فرمت های صوتی و تصویری رو پخش کنه .همون کاری که mediaplayer نمی تونه بکنه.
نوشتن اینجور برنامه ای خیلی آسون و شیرینه .
من هم همین روش بالا رو به کار بردم و به زودی اگر یوزر sf من هنوز سر جاش باشه براتون برنامه رو میفرستم .....
فعلا به این آدرس برید :
این برنامه به مقدار کمی از direct sound , direct draw,directx render استفاده می کنه ....
mpc(media plyer classic by gabest
www.sf.net (http://sourceforge.net/project/showfiles.php?group_id=82303&package_id=144472)

[H4i0 ACP]

فعلا این dll را داشته باشید تا مجبور نباشید زیادی کد نویسی کنید.
روش کلی کار و توابع کار با dll به زودی ....
اگر صبر کنید براتون یه چیزی تو مایه های همین dll به صورت Activex می نویسم تا بتونید هر تغییری تو کدش بدید .

[فاطمه وطن دوست]

سلام
تشکر
فقط اینکه من ، این dll رو رجیستر کردم ولی وقتی میخوام ازش استفاده کنم .
خطا میده / مرسی.

[H4i0 ACP]

dll رو با Notepad باز کنید تا توابع درون اون رو ببینید .طریقه استفاده از این توابع درست مثل API هستش.....
مثل :
Declare Function BASS_StreamPlay Lib "bass.dll" (ByVal handle As Long, ByVal flush As Long, ByVal flags As Long) As Long

[H4i0 ACP]

اگر این برنامه به درد شما خورد احتمالا کد کامل رو تا 1-2 روز دیگه می فرستم ،که فایل تصویری هم پخش می کنه .

[H4i0 ACP]

سلام
این برنامه برنامه اصلی نیست و بازم مشکلاتی داری ، مثل Skin,full screen bug,...
ماژول کار با bass.dll به زودی:عصبانی: .....
:خجالت:

[فاطمه وطن دوست]

سلام
این برنامه برنامه اصلی نیست و بازم مشکلاتی داری ، مثل Skin,full screen bug,...
ماژول کار با bass.dll به زودی:عصبانی: .....
:خجالت:

سلام
با اجازه
البته با رمز اه :123