منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
التحكم فى حجم الفورم - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : التحكم فى حجم الفورم (/showthread.php?tid=137)

التحكم فى حجم الفورم - ali.alfoly - 16-09-13

السلام عليكم ورحمة الله
عند جعل الخاصية 
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None
اثناء تشغيل الفورم يفقد خاصية التكم فى الحجم اى اننى لا استطيع التكبير والتصغير بالسحب بالموس اقصد

RE: التحكم فى حجم الفورم - سعود - 16-09-13

لان الخاصية التي اخترتها حلت محل الخاصية المرنة Sizable

RE: التحكم فى حجم الفورم - ali.alfoly - 16-09-13

طيب كيف اجعل التحكم فى حجم الفورم متاح
انظر الصورة انا جعلت شكله مثل فيجوال 2012
واريد ان اتحكم فى حجم الفورم

ا
ن

RE: التحكم فى حجم الفورم - سعود - 17-09-13

http://www.codeproject.com/Questions/89533/Resizing-a-form-with-no-border
ياسلام هذا هو
Assuming that what you really want is a sizable form without a title bar, you can get this by setting ControlBox, MaximizeBox and MinimizeBox all to False and Text to an empty string. With nothing to display in the title bar, the Framework won't draw one. Just remember to give your users some way to close the form Poke tongue | ;-P

RE: التحكم فى حجم الفورم - ali.alfoly - 17-09-13

طيب انا حاولت معرفش شوف حدرتك كده والله ياريت ينحل الموضوع ده
كود :
   Private Sub Panel1_MouseMove(sender As Object, e As MouseEventArgs) Handles Panel1.MouseMove
       If (e.X <= 2 AndAlso e.Y <= 2) OrElse (e.X + 2 >= Me.Width AndAlso e.Y + 2 >= Me.Height) Then
           Me.Cursor = Cursors.SizeNWSE
       ElseIf (e.X + 2 >= Me.Width AndAlso e.Y <= 2) OrElse (e.X <= 2 AndAlso e.Y + 2 >= Me.Height) Then
           Me.Cursor = Cursors.SizeNESW
       ElseIf e.X <= 2 OrElse e.X + 2 >= Me.Width Then
           Me.Cursor = Cursors.SizeWE
       ElseIf e.Y <= 2 OrElse e.Y + 2 >= Me.Height Then
           Me.Cursor = Cursors.SizeNS
       Else
           Me.Cursor = Cursors.[Default]
       End If
   End Sub


RE: التحكم فى حجم الفورم - الشاكي لله - 17-09-13

السلام عليكم


لااتوقع وجود طريقة مباشرة


عليك بتصميم بوردر بنفسك


لتصميم البوردر ، قم بإنشاء 4 لوحات (panel)


وضع كل بانل على جانب


وقم بتضبيط خاصية Anchor و Cursor لكل بانل لكي يتناسب مع جانبه و وظيفته


ثم قم بتطبيق مبدأ تحريك الفورم الذي طرحته انت في احد مواضيعك


كيف اجعل الفورم قابل للتحريك عند الضغط عليه والسحب


شخصيا قمت بتطبيق الفكرة ونجحت 100%


عموما يمكن ان توجد فكرة اخرى بهذا الخصوص فانا لم اقم بالبحث إنما فكرة خطرت على بالي فقمت بتنفيذها




التطبيق :








السورس والتطبيق في المرفقات



موفقين ..


[attachment=52]


RE: التحكم فى حجم الفورم - ali.alfoly - 07-10-13

جزاك الله خيرا اخى الحبيب الشاكى لله
وجعلها الله فى موازين حسناتك يوم تلقاه
واسف على التاخير فى الرد كنت شغال فى مشروع اخر ولما رجعت للمشروع ده تانى افتكرت السؤال
والفضل والمنه لله ثم بمساعدتك لى جيت الان لقيت الحل جاهز
والوقت ليل وما اظنك موجود
بس سبحان الله نزلت المرفق وانهيت المشروع وجزاك الله خيرا
ونفعك بعلمك فى الدنيا والاخرة

استفسار بيسط لو امكن ذلك
هل ممكن تزيد على المشروع 4 بنل اخريت للزواية
لو هتتعبك او هتاخد وقت بلاش منها فالموجود يكفى ويفيض هههه
جزاك الله خيرا

RE: التحكم فى حجم الفورم - T.ALKATHIRI - 07-10-13

أخي الكريم
السلام عليكم ورحمة الله وبركاته
تفضل هذا الرابط يمكن يفيدك في شي
تقبل تحياتي
http://vb4arb.com/vb/showthread.php?tid=73