[المبرمج الطموح]

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

[boudyonline]

أخي الفاضل :

قم بإضافة الكود التالي على Form في الحدث Resize

PHP كود :

Dim g as Graphics = Me.CreateGraphics()
Dim startingPoint as Double = (Me.Width / 2) - (g.MeasureString(Me.Text.Trim, Me.Font).Width / 2)
Dim widthOfASpace As Double = g.MeasureString(" ", Me.Font).Width
Dim tmp As String = " "
Dim tmpWidth As Double = 0
 
Do  
  tmp += " "
  tmpWidth += widthOfASpace
Loop While (tmpWidth + widthOfASpace) < startingPoint
        
Me.Text = tmp & Me.Text.Trim & tmp 


[المبرمج الطموح]

(16-05-16, 05:22 PM)boudyonline كتب : أخي الفاضل :

قم بإضافة الكود التالي على Form في الحدث Resize

PHP كود :

Dim g as Graphics = Me.CreateGraphics()
Dim startingPoint as Double = (Me.Width / 2) - (g.MeasureString(Me.Text.Trim, Me.Font).Width / 2)
Dim widthOfASpace As Double = g.MeasureString(" ", Me.Font).Width
Dim tmp As String = " "
Dim tmpWidth As Double = 0
 
Do  
  tmp += " "
  tmpWidth += widthOfASpace
Loop While (tmpWidth + widthOfASpace) < startingPoint
        
Me.Text = tmp & Me.Text.Trim & tmp 


شكرا لك اخي الكريم وبارك الله فيك .... في مشاهدتي لاحد الدروس في اليوتيوب لاحظت انه بمجرد انشاء فورم يكون العنوان في منتصف شريط العنوان هل هذا الكود يقوم بذلك ام ان هناك خيار في خصائص المشروع ؟

[سعود]

إقتباس :في مشاهدتي لاحد الدروس في اليوتيوب لاحظت انه بمجرد انشاء فورم يكون العنوان في منتصف شريط العنوان

لدي ويندوز 8.1 والعنوان بشكل افتراضي  وسط الشريط.

[myalsailamy]

اعتقد هذي الميزه موجوده في الاصدارات المتقدمه من الويندوز 8 و 10

اما في ويندوز 7 ما لك الا الطريقة التي ذكرها الاخ boudyonline