تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مساعدة في picture drag and drop
#1
السلام عليكم و رحمة الله و بركاته
انا مبتدئ في Vb 2008
اريد عمل برنامج مسابقة للأطفال
و أريد أن اقوم بتحريك(draganddrop) صورة من مكان الى مكان فيه اسم الصورة في نفس الفورم اذا وضعت في المكان الصحيح تظهر رسالة قبول .ورسالة الرفض في حال و ضعها في مكان اخر الصورة في المرفقات
المرجو المساعدة جزاكم الله خيرا


الملفات المرفقة صورة/صور
   
الرد }}}}
تم الشكر بواسطة:
#2
كود :
Public Class Form1
    Dim ax, ay As Integer
    Dim dr As Boolean
  
    Private Sub PictureBox1_MouseDown(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseDown
        If e.Button = Windows.Forms.MouseButtons.Left Then
            dr = True
            ax = Windows.Forms.Cursor.Position.X - PictureBox1.Left
            ay = Windows.Forms.Cursor.Position.Y - PictureBox1.Top
        End If
    End Sub

    Private Sub PictureBox1_MouseMove(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseMove
        If dr Then
            PictureBox1.Left = Windows.Forms.Cursor.Position.X - ax
            PictureBox1.Top = Windows.Forms.Cursor.Position.Y - ay
        End If
    End Sub

    Private Sub PictureBox1_MouseUp(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseUp
        dr = False
    End Sub
End Class

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

يعني عند حدث اطلاق الزر الايسر PictureBox1_MouseUp
ممكن تكتب اي كود لفحص نتيجة المكان الصحيح

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


الملفات المرفقة صورة/صور
   

.zip   WindowsApplication1.zip (الحجم : 37.45 ك ب / التحميلات : 387)
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
#3
بارك الله فيك
شكرا جزيلا لك يأخي الكريم
لقد وضعت الكود و عمل بشكل جيد.

ممكن تكتب لي كود لفحص نتيجة المكان الصحيح.
المثال المرفق لم يعمل معي
شكرا جزيلا
الرد }}}}
تم الشكر بواسطة:
#4
فحص المكان الصحيح الظاهر طار من راسي بسبب انشغالي بعدة امور الفترة الماضية لكن
ممكن اي واحد يساعدنا بكود فحص اسم البارنت فان اكن الاسم الصحيح اذا ...
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة: @@أبورائد@@ , khalid0577
#5
شكرا جزيلا مجهود رائع
جزاك الله خيرا
الرد }}}}
تم الشكر بواسطة:
#6
السلام عليكم ورحمة الله وبركاته


أنظر هذا الموضوع (@@@ لعبة تعليمية بسحب الصور واسقاطها على اسمها @@@)

السلام عليكم ورحمة الله وبركاته
 
 
@@@ سامحوني، منقطع نهائياً @@@

 
الرد }}}}
تم الشكر بواسطة: سعود , hoob computer , khalid0577
#7
شكرا جزيلا
هذا ما كنت أبحث عنه
جزاكم الله خيرا
الرد }}}}
تم الشكر بواسطة: @@أبورائد@@


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Star [VB.NET] السلام عليكم اخوتي ف المنتدى احتاج الي مساعدة انا اصمم منظومة لشؤون العاملين بعد اض fatma anari 0 15 منذ 1 ساعه مضت
آخر رد: fatma anari
  ممكن مساعدة توفي العراقي 1 35 منذ 5 ساعة مضت
آخر رد: ali.alfoly
  طلب مساعدة ناتج طرح عددين قيمة سالبه khalaroy 2 43 01-12-16, 03:09 AM
آخر رد: khalaroy
  [سؤال] مساعدة في الفيجوال بيسك عبدالرحمن المكاوي 1 59 28-11-16, 02:11 PM
آخر رد: عبدالرحمن المكاوي
  مساعدة في عمل برنامج rabeh.ram 4 169 27-11-16, 12:29 AM
آخر رد: rabeh.ram
  مساعدة في انشاء ثيم عبدالرحمن المكاوي 11 280 25-11-16, 11:57 AM
آخر رد: العزابي
  مساعدة في عرض البيانات في التقرير haiderkh 1 70 21-11-16, 11:24 PM
آخر رد: السرور
  مساعدة بخصوص Listbox CLARO 3 78 16-11-16, 06:15 PM
آخر رد: silverlight
  [VB.NET] مساعدة بسيطة في الكمبوبكس . أبووسم 3 83 16-11-16, 11:58 AM
آخر رد: أبووسم
  مساعدة فى برنامج ارسال رسائل sms للموبايل nabil.1710 2 74 13-11-16, 12:00 PM
آخر رد: أبوبكر سويدان

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم