PDA

View Full Version : نحوه قرار دادن ویدئو یا فیلم؟؟



beigi1366
شنبه 31 فروردین 1392, 09:32 صبح
سلام دوستان.

راستش می خواهم یه فیلم را در ویژوال بیسیک (ویژوال استودیو) بگذارم. اما با عناصر و دستوراتش اشنا نیستم در صورت امکان راهنمایی کنید.
چه عناصری استفاده کنم.؟؟
چه دستوراتی استفاده کنم؟؟

منتظر شما عزیزان هستم.
با تشکر

beigi1366
شنبه 31 فروردین 1392, 10:53 صبح
دوستان کمکککککککککککک:گریه:

xxnagin
شنبه 31 فروردین 1392, 12:16 عصر
سلام
از کنترل مدیا پلیر استفاده کنید

beigi1366
شنبه 31 فروردین 1392, 13:49 عصر
کجا هست ؟؟
یخورده بیشتر توضیح بدین.
مرسی به خاطر پاسختون

xxnagin
شنبه 31 فروردین 1392, 16:23 عصر
این کنترل باید اول به toolbox اضافه بشه
در تولباکس کلیک راست کنید و گزینه choose items را بزنید و در تب com components گزینه windows media player را تیک بزنید بعد در فرم قرار برده

beigi1366
شنبه 31 فروردین 1392, 16:34 عصر
دوستان کمک کنید.
چطوری می تونم یک ویدئو به فرم اضافه کنم؟؟؟؟؟؟؟؟؟؟؟؟؟//
با چه عناصری این عناصر کجا هستن؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ؟؟؟؟؟؟؟؟؟؟؟/

بیایید اینجا منتظرم خواهشن

xxnagin
شنبه 31 فروردین 1392, 16:43 عصر
اینم کدش

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim ofd As New OpenFileDialog
ofd.ShowDialog()
Label1.Text = ofd.FileName
AxWindowsMediaPlayer1.URL = Label1.Text
End Sub

beigi1366
شنبه 31 فروردین 1392, 16:45 عصر
سلام مرسی به خاطر راهنمایت.
تونستم windows media را اضافه کنم. یه سوال دیگه حالا چطوری فیلم رو بذارم تو کدوم خاصیت؟؟؟

مرسی به خاطر راهنمایت ممنون.

xxnagin
شنبه 31 فروردین 1392, 16:47 عصر
یه دکمه رو همراه کنترل مدیا پلیر روی فرمت قرار بده و کد بالا رو قرار بده دیگه تمومه

beigi1366
شنبه 31 فروردین 1392, 16:48 عصر
در مورد سوال بعدیم که فیلم چه طوری بذارم هم راهنمایی کنی ممنون میشم.

beigi1366
شنبه 31 فروردین 1392, 16:48 عصر
اخه فیلممو چطوری انتخاب کنم؟؟

xxnagin
شنبه 31 فروردین 1392, 16:54 عصر
شما وقتی روی دکمه کلیک میکنی
با استفاده از open file dialog یه پنجره باز میشه که فیلمت یا اهنگ رو میتونی انتخاب کنی

Dim ofd As New OpenFileDialog
ofd.ShowDialog()

بعد با استفاده از خاصیت url در media player میتونی فیلم رو بخش کنی
AxWindowsMediaPlayer1.URL = ofd.filename

beigi1366
شنبه 31 فروردین 1392, 17:06 عصر
مرسی.
ببینید من یه button گذاشتم بعدش روش کلیک کردم که کد هایی که گفتن بنویسم اما به جای ofd. show که مینویسم تغییر می کنه به time0fday.show . چیکار کنم؟؟
من یاد به استادم توضیح بدم که این کدها چی هستن؟؟ یخورده توضیح بدین.

xxnagin
شنبه 31 فروردین 1392, 17:11 عصر
بزار راحتت کنم
یه دکمه یه کنترل مدیا پلیر و یه openfiledialog روی فرمت قرار بده
کنترل ofd همون openfiledialog هستش منتها من دیگه به فرم اضافه نکردم
بعد روی دکمه دوبار کلیک کن
کد بالا رو درون دکمه قرار بده
اینم کل پروژه

beigi1366
شنبه 31 فروردین 1392, 18:06 عصر
بازم ممنون ولی من کد بالا رو می نویسم از label1 ایراد می گیره و برنامه اجرا نمیشه.
تو رو خدا کمک کنید.
من متوجه نشدم کجا فیلمو انتخاب کنم.

xxnagin
شنبه 31 فروردین 1392, 18:19 عصر
یه label1 هم روی فرم قرار بده برای رفع خطا
ببینید وقتی از کنترل open file dialog استفاده میشه یعنی میخواهیم فایلی رو انتخاب کنیم
با استفاده از showdialog در خاصیت open file dialog میتونی فایلی رو انتخاب کنید
بعد که فایل انتخاب شد با استفاده از خاصیت filename مسیر فایل رو به ما میده
و ما میتونیم مسیر فایل رو در برچسپ نشون بدیم
dim ofd as new openfiledialog
ofd.showdialog
AxWindowsMediaPlayer1.URL= ofd.filename

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

beigi1366
شنبه 31 فروردین 1392, 18:22 عصر
فهمیدم به جای label باید button بذارم.:تشویق:

beigi1366
شنبه 31 فروردین 1392, 18:25 عصر
یه سوال دیگه خسته که نشدید؟؟
اگه بخوام یه فیلمی باز بشه نه به انتخاب کاربر خودم این فیلمو بذارم و بعدش کاربر فقط کلیک کنه و فیلم رو ببینه این بار چیکار باید بکنم؟؟
به خاطر کمک هاتون ممنون.

xxnagin
شنبه 31 فروردین 1392, 18:32 عصر
فهمیدم به جای label باید button بذارم

عزیز من
من دارم میگم label شما میگی دکمه ؟


یه سوال دیگه خسته که نشدید؟؟

چی بگم یعنی چیزی نمیتونم بگم


اگه بخوام یه فیلمی باز بشه نه به انتخاب کاربر خودم این فیلمو بذارم و بعدش کاربر فقط کلیک کنه و فیلم رو ببینه این بار چیکار باید بکنم؟؟
به خاطر کمک هاتون ممنون.

کا کدهای دکمه رو پاک کن و این کد رو قرار بده

AxWindowsMediaPlayer1.URL = "مسیر فایل"

beigi1366
شنبه 31 فروردین 1392, 18:54 عصر
واقعا ممنون. نه منظورم از برچسب کدی است که نوشتید button میذارم کار میکنه.

AliRezaBeytari
شنبه 31 فروردین 1392, 19:52 عصر
یه نمونه گذاشتم.
امیدوارم به دردت بخوره :

دانلود سورس (http://www.irfreeup.com/uploads/136645890444471.rar)

beigi1366
شنبه 31 فروردین 1392, 20:07 عصر
ببخشید
من ادرس فایل رو اینطوری می ذارم :
AxWindowsMediaPlayer1.URL = "libraries/videos/sample videos/wildlife
داخل همون دابل کتیشن. اما برنامه اجرا نمیشه.چیکار کنم؟؟

xxnagin
شنبه 31 فروردین 1392, 20:13 عصر
اون اشتباهه
شما اصلا نام درایو رو وارد نکردین
یه فایل از داخل خود هارد غیر از c همراه پسوندش باید قرار بدی
"f:\filename.avi"

ادرس دهی هم باید درست باشه
ادرس شما به این صورت میشه

C:\Users\username\Videos
به جای username اسم یوزر خودتون رو بزارید

beigi1366
شنبه 31 فروردین 1392, 20:25 عصر
واقعا ممنون اقای xxnagin

کارم درست شد خیلی کمک کردین . فقط اگه دعوام نکنین یه دو سه تا سوال دیگه هم داشتم :
فیلم نمایش داده میشه تصویرش کوچیکه چیکار کنم تصویر بزرگتر بشه؟؟
بعد فایلمو ذخیره کردم پروژمو . برای تحویل به استاد کدوم فایا ها رو باید روی سی دی بریزم. منظورم پسوردشونه.
یک دنیا ممنون
این سورس ها رو که شما و دوستان دادن چطوری باز کنم در ویژوال کپی شون کنم در پروژه؟؟

beigi1366
شنبه 31 فروردین 1392, 20:40 عصر
سایزشم فهمیدم چطوری عوض کنم.
اما خواهش به این سوالم پاسخ بدین : من اگه فیلمی بذارم داخل فرمم . بعد فایل پروژه مو همراه فایل فیلم به استادم بدم . ایشون باز کنن پروژمو . فیلم که چون ادرسش تغییر می کنه نشون داده نمیشه.
برای اینکه این اتفاق نیفته چکار کنم؟؟؟؟؟

beigi1366
شنبه 31 فروردین 1392, 20:55 عصر
مهندسین محترم به سوال اخری من جواب بدین ممنون میشم : من اگه فیلمی بذارم داخل فرمم . بعد فایل پروژه مو همراه فایل فیلم به استادم بدم . ایشون باز کنن پروژمو . فیلم که چون ادرسش تغییر می کنه نشون داده نمیشه.
برای اینکه این اتفاق نیفته چکار کنم؟؟؟؟؟

xxnagin
شنبه 31 فروردین 1392, 21:04 عصر
ادرس دهی شما کاملا اشتباهه
اگه میخوای به مشکل نخوری فیلمت رو در این پوشه کپی کن
C:\Users\Mohammad\Documents\Visual Studio 2012\Projects\WindowsApplication1\WindowsApplicati on1\bin\Debug

بعد کدت رو به اینصورت تغییر بده
Dim s As String = Application.StartupPath & "\filename.avi"
AxWindowsMediaPlayer1.URL = s

beigi1366
شنبه 31 فروردین 1392, 21:26 عصر
من همه این کارها رو کردم حالا فایلمو از کامپیوترم به لپ تاپم می برم فیلمو نشون نمیده دارم دیونه میشم.
تمام کارها رو کردم.
چی می فرمایید؟؟؟

AliRezaBeytari
یک شنبه 01 اردیبهشت 1392, 18:58 عصر
مثلا نام فیلم شما mov.mp4 هست.
این کد هارو درون یه button قرار بده :


AxWindowsMediaPlayer1.URL = Application.StartupPath + "/mov.pm4"

حالا این فیلم رو کنار برنامتون قرار بدین و برنامه رو اجرا کنید.

...::: موفق باشید :::...