كيف اشغل اغنية عن طريق القائها فى بى 2005

أخ hisham2007 طول بالك مابدها كل هالانفعال كلنا نخطئ وكلنا إخوة هنا

بس لاحظ النقطة التي أشار إليها الأخ code hunter

أنت بموضوعك السابق عم تسأل سؤالين كل واحد بعتقد بيحتاج موضوع مستقل لمناقشته

1 - السحب والإفلات - موضوع كبير بحد ذاته إن أردت تغطية كافة جوانبه

2 - ربط امتداد معين ببرنامجك - متعلق ببرمجة الريجستري -

حصل خير يا جماعه , القواعد ليست الا للتنظيم لتسهيل البحث والفهرسة بعد ذلك , يعني برضه لمصلحتكم :D

وبالنسبه لأسئلتك:

1- الـ Drag Drop :

سنقوم بعمل مثال يقوم فيه المستخدم بسحب ملف ما والقاؤه مثلا علي ListBox ,

أولا: فتأتي في حدث الـ DragOver للـ List Box ونعطي تأثير السحب عليه كالآتي :

 If e.Data.GetDataPresent(DataFormats.FileDrop) Then
			e.Effect = DragDropEffects.Link
		End If

ثانيا: في حدث الـ DragDrop نقوم بعمل جلب لمسار الملف في صورة مصفوفه نصية كالتالي:

  Dim strFiles() As String = e.Data.GetData(DataFormats.FileDrop)
		For i As Integer = 0 To strFiles.Length
			MessageBox.Show(strFiles(i))
		Next

أما بالنسبه لتشغيل ملف صوتي (وبلاش أغنية دي) فيوجد موضوع للأخ محمد سامر: الأصوات في برنامجك

أما بالنسبه لعمل Extention Assoctiation فابحث عنه وستجده الاجابة ان شاء الله ,,,

الف شكر على الرد

واسف لما صدر منى

انا عارف ان انا سألت عن حاجات موضوعها يطول شرحه

بس كل الحكاية ان انا مش عايز الشرح الطويل

انا جبت فيجوال بيسك 2005 وكنت مفكر ان ميكروسوفت عملت فيه اللى ميتعملش

وانه هو ثورة حيحل كل المشاكل اللى فاتت ويسهل حاجات زى اللى انا سألت عليه

ففكرت ان ميكروسوفت اخترعت دوال جديدة تسهل عليا وهو ده اللى كنت بسأل عليه بس

اما بالنسبة لسؤالى عن السحب والالقاء

فأنا بعرف اعمله من جوه نافذة البرنامج

لكن انا كنت عايز مثال لملف صوتى يلقى على النافذة فى برنامجى فأستطيع التعامل معاه

ارجو الرد على هذا السؤال

وعدم الرد على السؤال الثانى لكى لا يكون فى المشاركة غير سؤال واحد

وشكرا لسعة صدركم

واسف مرة تانية عن اى تجاوز حصل منى

اقتباس

اما بالنسبة لسؤالى عن السحب والالقاء

فأنا بعرف اعمله من جوه نافذة البرنامج

لكن انا كنت عايز مثال لملف صوتى يلقى على النافذة فى برنامجى فأستطيع التعامل معاه

يعني ايه من جوه نافذة البرنامج ؟ ثانيا لا يوجد فرق بين ملف صوتي وآخر غير صوتي لأنه يمكنك عمل Check لفحص نوع الملف ! وبعدها يمكنك تشغيله !

انا اسف لو مكنتش واضح فى السؤال

انا اللى اقصده كمثال

عايز احط

picturebox1

على الفورمة

ولما المستخدم يشغل البرنامج

وعايز يعرض صورة فى الكمبيوتر

فيفتح

my pictures

مثلا

ويسحب صورة ويرميها على

picturebox1

فتظهر الصورة

يارب اكون واضح المره دى

وشكرا

تفضل في المرفقات مثال - إن كنت فهمت قصدك صح - باستخدام vb2005 Express مع Windows Media Player 10 SDK

فقط اسحب أي ملف صوتي وأفلته على الصورة فيتم تشغيله وهذا سرد للكود كاملا

Public Class Form1

	Private WMP As New WMPLib.WindowsMediaPlayer

	Private Sub PictureBox1_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles PictureBox1.DragDrop
		Dim strFiles() As String = e.Data.GetData(DataFormats.FileDrop)
		WMP.URL = strFiles(0)
		WMP.controls.play()
	End Sub

	Private Sub PictureBox1_DragOver(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles PictureBox1.DragOver
		If e.Data.GetDataPresent(DataFormats.FileDrop) Then
			e.Effect = DragDropEffects.Link
		End If
	End Sub

	Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
		Me.PictureBox1.AllowDrop = True
	End Sub

	Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
		WMP.controls.stop()
	End Sub

End Class

WindowsApplication4.zip

الف الف شكر

ايوه ده اللى انا عايزه

واسف لو كنت تعبتكم معايا