يا إخواني الكرام كيف افعل اذا قام المستخدم بتكبير برنامجي بإستخدام مربع التكبير MaxButton ان اغير اماكن الكائنات الى اماكن اخري حتى تتوسط النموذج وايضا كل حاجة ترجع مكانها كما هي اذا حب المستخدم ان يصغر برنامجي ليس لتصغيره خالص ووضعه في التاسك بار لالالالا ونما تصغيره بعد تكبيره
ياريت تبلغوني اذا ما حدش فهم حاجة
وشكرا
Mohamed Ali Salim
0.1..0...4....7.....6......2.......7........4.........8
خالاص يا جماعة ما تعبوش نفسكوا انا عرفت الحل اللي عايز يعرف يقرء
قوم بالضغط على النموذج مرتين واختر الحدث resize
ثم اكتب فيه الكود التالي
If Form1.WindowState = 0 Then
Command1.Top = 2760
Command1.Left = 0
End If
الرقم 0 معناه ان البرنامج في وضعه العادي صغير يعني
وبعد ذلك قوم بتكبير النموذج وهو في وضع التصميم بالضغط على الأداه MaxButton الموجودة اعلى اليمين
سوف يكبر النموذج ثم قم بتحريك الكائنات بتاعتك وشوف ال Top و Left بقى كام واكتب الكود التالي
If Form1.WindowState = 2 Then
Command1.Top = 0
Command1.Left = 13920
End If
exit sub
Mohamed Ali Salim
0.1..0...4....7.....6......2.......7........4.........8
هذا الموضوع مغلق.