البحث في الموقع
Showing results for tags 'move'.
تم العثور علي 3 نتائج
-
السلام عليكم ورحمة الله وبركاته نقول لمن اعتمر تقبل الله منا ومنكم صالح الاعمال ونقول لمن ترقى الف مبروك وعفوا انها جاءت متاخرة وبعد هل تعلم كيف تحرك كائن ( ليبل - صورة الخ ) في فورم ليس اثناء التصميم وانما بعد فتحه نستخدم حدثين لزر الماوس الاول : اثناء الضغط عليه لتخزين موقع الضغط طولا وعرضا Private Sub LabelStart_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) Xd = X Yd = Y End Sub الثاني : حدث حركة الماوس بشرط اثناء الضغط على الزر اليسار Button = 1 الزر اليمين ياخذ القيمة 2 Private Sub LabelStart_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) If Button = 1 Then With Me.LabelStart .Move .Left + (X - Xd), .Top + (Y - Yd) End With End If End Sub شاهد المرفق 2003 move.rar- 21 replies
-
- 2
-
-
- تحريك كائن
- فورم
- (و2 أكثر)
-
السلام عليكم لعبة ترتيب اجزاء الصورة هدية للاخ مجدي يونس بامكانية تغيير اجزاء الصورة في فولدر الملف بالنسبة للجزء الفارغ من الصورة اختياري وممكن حذفه او ابقائه باي اسم في فولدر الملف المرفق 2003 kh_imgemove.rar
-
السلام عليكم هذا مثال عملي لموضوع هل تعلم ---------سلسلة تعليمية 2 سبورة احرف متحركة مماثلا لاحد الاعمال المعمولة بغير الاكسل قمت بتحميله سابقا من المنتدى شاهد المرفق 2003 الاحرف المتحركة.rar