تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيف يتم تحريك الصور Image على سطح الفورم عن طريق الماوس ؟؟
#1
السادة الكرام
السلام عليكم ورحمة وبركاته
كيف يتم تحريك الصور Image على سطح الفورم عن طريق الماوس ؟؟
نامل الله ثم من الجميع المساعدة
ولكم مني فائق الاحترام
الرد }}}
تم الشكر بواسطة:
#2
ضع أداة Image وفيها صورة

كود :
Dim mouseX As Integer, mouseY As Integer

Private Sub Image1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    mouseX = X
    mouseY = Y
End Sub

Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button = vbLeftButton Then
         Image1.Left = Image1.Left + X - mouseX
         Image1.Top = Image1.Top + Y - mouseY
    End If
End Sub
الرد }}}
تم الشكر بواسطة:
#3
استاذي العزيز : ابو رائد
السلام عليكم ورحمة وبركاته
لكم مني الف شكر وتقدير على تقدم الدعم الفني لنا والله يحفظكم ويرعاكم ويجعل الجنة داركم الاخير
ولكم مني فائق الاحترام
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة في تغيير حجم الفورم حسب دقة عرض الشاشة amazonette 3 588 30-03-23, 02:47 PM
آخر رد: amazonette
  عرض الصور من قاعدة بيانات اكسس داخل الداتا ريبورت mohammed_atallah 0 522 04-09-22, 09:17 AM
آخر رد: mohammed_atallah
  استفسار عن طريقة الربط بين قاعدة بيانات اكسيس 2003 عن طريق الانترنت jordaniancopy 1 1,850 29-08-20, 11:46 PM
آخر رد: diggitalk2017@gmail.com
  طباعة الفورم بأكملها على الورقة مهما كانت أبعادها اسلام الكبابى 6 5,975 09-06-20, 06:14 PM
آخر رد: شوشه
  تغيير اللغة في الفورم حامد محمد 7 4,059 22-01-19, 06:19 PM
آخر رد: elgokr
  [vb6.0] مساعدة في الفورم الثاني بالمشروع سمير الجبالي 3 2,431 17-07-18, 12:04 AM
آخر رد: سمير الجبالي
  إصدار صوت للأزرار عند تمرير الماوس عبد الرحمن على 12 5,052 21-04-17, 01:19 AM
آخر رد: عبد الرحمن على
  كود تحريك الكلام الحلوانى 2 2,633 30-11-16, 08:05 PM
آخر رد: الحلوانى
  [vb6.0] سؤال عن طريق ربط الفيجوال بقاعدة عمور2016 2 2,128 02-07-16, 07:24 PM
آخر رد: عمور2016
  سوال هل يمكن فتح متصفح بالفيجوال عن طريق جوجل كروم بدلا من انترنت اكسبلور ahmedhhh2 5 3,634 05-06-16, 03:10 PM
آخر رد: ahmedhhh2

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


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