تقييم الموضوع :
  • 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 ك ب / التحميلات : 413)
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
#3
بارك الله فيك
شكرا جزيلا لك يأخي الكريم
لقد وضعت الكود و عمل بشكل جيد.

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


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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مساعدة في مشروع باقي شغلة واحدة فقط 0theghost0 2 100 منذ 10 ساعة مضت
آخر رد: 0theghost0
  مساعدة في كود البحث وكود مفاتيح التنقل بين السجلات khaled12345 4 69 18-11-17, 08:10 PM
آخر رد: khaled12345
Exclamation [Acces2007] مساعدة من الاخوة الخبراء من فضلكم على جناح السرعة Derradji22 0 101 18-11-17, 01:25 AM
آخر رد: Derradji22
Star [سؤال] اريد مساعدة في التعديل على مشروع ابو اياد@ 4 161 13-11-17, 12:31 AM
آخر رد: Amir_alzubidy
  مساعدة في تكبير صورة في picture box بدون فقدان جودتها salahmax12 4 88 11-11-17, 04:36 PM
آخر رد: silverlight
Photo [مشروع] مساعدة في مشروع برنامج يفك تشفير الفيديو المسجل من رسيفر لتشغيلها على الحاسب mohammedvego 12 195 07-11-17, 09:47 AM
آخر رد: mohammedvego
  مساعدة في الكود او تصحيح كود hikmat 1 86 05-11-17, 12:02 PM
آخر رد: a.ahmed
  [سؤال] طلب مساعدة في التاريخ hikmat 2 80 03-11-17, 06:20 PM
آخر رد: Amir_alzubidy
  مساعدة في عرض ما في الداتا جريد فيو ليظهر في التكست بوكس khaled12345 2 109 28-10-17, 08:40 PM
آخر رد: khaled12345
  مساعدة مع WEBCLIENT لتحديد حجم المحتوى تيمور 2 59 28-10-17, 08:27 PM
آخر رد: تيمور

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


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