![]() |
|
جعل الادوات في منتصف الفورم بدقة - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=26831) |
جعل الادوات في منتصف الفورم بدقة - ابراهيم ايبو - 07-10-18 السلام عليكم اخوتي الكرام
اولا لم اعرف في اي قسم اضع هذا الموضوع .. لكم حرية اختيار القسم المناسب (الاخوة المشرفون)
انشأت فورم ووضعت فيه Panel وفيه بعض الادوات لا على التعيين ثم قمت بتوسيط هذا الـ panel في الفورم في حدث تغيير الحجم وفق المعادلة المعروفة التالية :كود : Dim x As Integer = (Me.Width - panel1.Width) / 2واردت ان تكون هذه المعلومة بين ايديكم لتستفيدوا منها وتكون صدقة جارية والكود المعدل على النحو التالي: كود : Dim x As Integer = (Me.Width - 16 - panel1.Width) / 2RE: جعل الادوات في منتصف الفورم بدقة - rnmr - 07-10-18 جرب هذا بدون كود حدد أداة Panel من القائمة Format ومنه Center in Form وتنفيذ كل من Horizontally وVertically من الخاصية Anchor ألغي كل الإتجاهات الأربعة RE: جعل الادوات في منتصف الفورم بدقة - ابراهيم ايبو - 07-10-18 السلام عليكم اخي rnmr كم يسعدني النقاش
في الحالة التي تذكرها سيكون البانل يحتل كامل الفورم والادوات ستبقى في مكانها المحدد حتى لو كبر الفورم
أما في حالتنا نحن لانريد تغيير حجم البانل الذي يحوي الادوات التي نريدها دائما في منتصف الفورم
والبانل هو فقط لكي لانكتب اكواد لكل اداة
دمت بخير ومحبا للخير
RE: جعل الادوات في منتصف الفورم بدقة - rnmr - 07-10-18 (07-10-18, 08:50 PM)ابراهيم ايبو كتب : يبدو أنك في الخطوة الأخير بخصوص Anchor حددت الإتجاهاة الأربع، في حين أنني ذكرت ألغي (07-10-18, 08:31 PM)rnmr كتب : من الخاصية Anchor ألغي كل الإتجاهات الأربعة دمت بصحة وسلامة RE: جعل الادوات في منتصف الفورم بدقة - ابراهيم ايبو - 07-10-18 اخي rnmr
صحيح انا لم اقم بالغاء الاتجاهات الاربعة وبعد الغاءها اصبحت مثل الكود الاول
فعند التكبير قد لاتلحظ اختلاف المسافة اليمين واليسار والاعلى والاسفل
لكن قم بالتصغير حتى يلامس حد الفورم حد البانل ولاحظ المسافات واعطني رايك
انا استحدم نسخة 2008
بالمناسبة البانل موضوع في وسط الفورم تماما باستخدام ازرار التوسيط
RE: جعل الادوات في منتصف الفورم بدقة - rnmr - 07-10-18 (07-10-18, 08:23 PM)ابراهيم ايبو كتب : (07-10-18, 09:07 PM)ابراهيم ايبو كتب : جربت المرفق الذي من حضرتك فلم أجد الفرق، أو قد لم أفهم قولك (حتى يلامس حد الفورم حد البانل) RE: جعل الادوات في منتصف الفورم بدقة - ابراهيم ايبو - 07-10-18 اخي عندما تقوم بتكبير الفورم قد لاتلاحظ الفرق بين الفراغ اليمين واليسار والاعلى والاسفل
وكن عندما تصغر الفورم الى حد البانل من الاسفل واليمين لاحظ انه ليس في الوسط
RE: جعل الادوات في منتصف الفورم بدقة - rnmr - 07-10-18 (07-10-18, 09:21 PM)ابراهيم ايبو كتب : اتضح أن طريقتك ليست في منتصف الفورم تماما بسبب أنك تستخدم Me.Height وهذه بتحسب حتى ارتفاع إطار الفورم في حين انه ينبغي استخدام ClientSize مثل Me.ClientSize.Height سعيد بالنقاش والتحاور الجميل مع حضرتك RE: جعل الادوات في منتصف الفورم بدقة - ابراهيم ايبو - 07-10-18 سأجرب ذلك تسلم ياعالي
نعم ياغالي بهذا الكود سيكون كامل الفورم مع شريط العنوان وكونتور الفورم داخل في الحساب
وهكذا سيكون الكود لوضع اي كونترول في وسط الفورم على النحو التالي
كود : Dim x As Integer = (Me.ClientSize.Width - panel1.Width) / 2وكوني لم اعرف الخاصية ClientSize اجتهدت انطلاقا الخاصية size
تقبل حبي واحترامي لك ولعلمك ... زادك الله علما ونفع بك عباده
|