تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] تحريك الفورم بدون اطار
#1
ارغب بتحريك الفورم بدون اطار

بحثت فوجدت مثال الاخ سعود
http://vb4arb.com/vb/thread-4117.html

مثال ممتاز ولكن لا يعمل في حال كان الفورم من نوع ( اب) وابن

حاولت ومانجحت معي

ارجوا المساعدة
الرد }}}
تم الشكر بواسطة:
#2
(21-12-14, 11:33 AM)led كتب : ارغب بتحريك الفورم بدون اطار

بحثت فوجدت مثال الاخ سعود
http://vb4arb.com/vb/thread-4117.html

مثال ممتاز ولكن لا يعمل في حال كان الفورم من نوع ( اب) وابن

حاولت ومانجحت معي

ارجوا المساعدة
 تفضل ان شاء الله يكون طلبك
اضف عارض الصور واجعل الفور بدون ادوات التحكم  


كود :
Public Class Form1
    Dim NewPoint As New System.Drawing.Point()
    Dim X, Y As Integer
    Private Sub PictureBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseDown
        X = Control.MousePosition.X - Me.Location.X
        Y = Control.MousePosition.Y - Me.Location.Y
    End Sub

    Private Sub PictureBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseMove
        If e.Button = MouseButtons.Left Then
            NewPoint = Control.MousePosition
            NewPoint.X -= (X)
            NewPoint.Y -= (Y)
            Me.Location = NewPoint
        End If
    End Sub
End Class

Heart  Heart
لقد اكتشفت مع الأيام أنه ما من فعلٍ مغايرٍ للأخلاق, وما من جريمة بحق المجتمع إلا ولليهود والنصارى يداً فيها  Idea

الرد }}}
تم الشكر بواسطة: led , الوليد ☺
#3
(21-12-14, 01:58 PM)mudz كتب :
(21-12-14, 11:33 AM)led كتب : ارغب بتحريك الفورم بدون اطار

بحثت فوجدت مثال الاخ سعود
http://vb4arb.com/vb/thread-4117.html

مثال ممتاز ولكن لا يعمل في حال كان الفورم من نوع ( اب) وابن

حاولت ومانجحت معي

ارجوا المساعدة
 تفضل ان شاء الله يكون طلبك
اضف عارض الصور واجعل الفور  بدون ادوات التحكم   



كود :
Public Class Form1
   Dim NewPoint As New System.Drawing.Point()
   Dim X, Y As Integer
   Private Sub PictureBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseDown
       X = Control.MousePosition.X - Me.Location.X
       Y = Control.MousePosition.Y - Me.Location.Y
   End Sub

   Private Sub PictureBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseMove
       If e.Button = MouseButtons.Left Then
           NewPoint = Control.MousePosition
           NewPoint.X -= (X)
           NewPoint.Y -= (Y)
           Me.Location = NewPoint
       End If
   End Sub
End Class

Heart  Heart

يعجز اللسان عن الشكر , فعلا هذا المطلوب

اكرر شكري لك , بارك الله فيك
الرد }}}
تم الشكر بواسطة:
#4
ولو اخوي نحنا هنا نساعد بعض Heart
لقد اكتشفت مع الأيام أنه ما من فعلٍ مغايرٍ للأخلاق, وما من جريمة بحق المجتمع إلا ولليهود والنصارى يداً فيها  Idea

الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Photo [VB.NET] مشكلة في شكل الفورم abuyazan 5 293 27-02-24, 09:38 PM
آخر رد: aljzazy
  فلترة datagridview بدون قاعدة بيانات صالح عبدالله 3 295 02-02-24, 04:07 PM
آخر رد: صالح عبدالله
  [VB.NET] مشكلة ظهور textbox بعد حذفه من الفورم مبرمج صغير 1 1 219 27-01-24, 02:04 AM
آخر رد: مبرمج صغير 1
  [VB.NET] مساعدة في استدعاء البيانات معينه من form الأول إلى form 2 بدون التعديل loay775 2 272 18-01-24, 05:04 PM
آخر رد: loay775
  [VB.NET] تحويل التاريخ بين أداتين تايم بيكر في نفس الفورم محمد العموري 1 265 29-12-23, 10:44 PM
آخر رد: Kamil
  كيف يتم تعبئة قريد فيو بدون قاعدة بيانات بشكل مباشر؟ nowiglah 1 375 01-12-23, 10:57 PM
آخر رد: Taha Okla
  سؤال في تحريك التحديد في datagrideview maher_haddaf 3 434 23-10-23, 08:27 AM
آخر رد: أبو خالد الشكري
  كيفية التحكم فى حجم الفورم من خلال الكود Ahmed.vb 4 510 11-10-23, 07:17 PM
آخر رد: bidaya
  [VB.NET] حفظ الفورم (Form) (البرنامج) بعد التغيير visualist2015 6 6,357 29-09-23, 03:09 AM
آخر رد: Taha Okla
Photo [سؤال] كيف أقوم بإجبار التطبيق (الفورم) على حفظ الملف المستعاد من قاعدة البيانات SQL server salam82 3 455 20-09-23, 01:42 PM
آخر رد: salam82

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


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