كيف امنع تمدد وتقلص الفورم

تفضل أخي الكريم

form size.zip

اظن ان الامير قام بالواجب لكن لى توضيح بسيط فى الكود الموجود داخل المثال لتلافى حدوث الخطأ بطريقة غير On Error Resume Next وهى تعديل كود الحدث Resize ليكون كالتالى

Private Sub Form_Resize()
If Me.WindowState = vbMaximized Then Exit Sub
Me.Height = h
Me.Width = w
End Sub

والطريقتان صحيحتان وتؤديان نفس الغرض :rolleyes:

شكرا لك أخي GHOST2010 على التوضح

بارك الله فيك

أشكرك علي فكرتك و هي قد أفادتني ولكن أتمني اذاكنت تستطيع جعل المستخدم لا يستطيع مده او تقلصها من خلال السحب من حرف النافذة بالماوس أي انه عند وقوف الماوس علي حرف النافذة لا يسحبها بالماوس و اكون شاكر لك و جزاك الله خير عن ذلك

السلام عليكم ورحمة الله وبركاته

لمنع الحدث Resize يجب عليك تغيير الخاصية BorderStyle للفورم الى FixedSingle واذا اردت تنشيط زر التكبير غير الخاصية MaxButton الى True وبالمثل بالنسبة لزر التصغير وبهذه الطريقة تكون لديك النافذة بالثلاثة ازرار (اغلاق - تكبير - تصغير) ولن يتمكن المستخدم من سحب الفورم من احد حوافه واتمنى ان يكون هذا هو ماتريد :rolleyes:

أشكرك يا صديقي فأنت قد أصبت الهدف تماما و هذا هو ما كنت أريدة من البداية

شــــــــــــــــــكــــــــــــرا لــــــــــــــــــــــك

الحمد لله انك حصلت على ماتريد :rolleyes: