الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف اجعل عنوان tabcontrol من اليمين

مغلق
بدأه samishark في 11 يونيو 2006 · 2 رد · 519 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله الرحمن الرحيم

كيف اجعل عنوان tabcontrol من اليمين حيث ان عناوين جداولي بالعربي واريدها من اليمين

#2

اخي samishark انشئ كلاس وضع فيه هذا الكود الذي اخذته من الاخوان في هذا المنتدى الرائع حيث كنت اعاني من نفس مشكلتك :lol:

Imports System.ComponentModel
Public Class tabcontrol
	Inherits System.Windows.Forms.TabControl
	Const WS_EX_LAYOUTRTL As Integer = &H400000

	Private _RTL As Boolean = True
	Public Property Mirrored() As Boolean
		Get
			Return _RTL
		End Get
		Set(ByVal Value As Boolean)
			If _RTL <> Value Then
				_RTL = Value
				MyBase.OnRightToLeftChanged(EventArgs.Empty)
			End If
		End Set
	End Property

	Protected Overrides ReadOnly Property CreateParams() As _
System.Windows.Forms.CreateParams
		Get
			Const WS_EX_LAYOUTRTL As Integer = &H400000
			Const WS_EX_NOINHERITLAYOUT As Integer = &H100000
			Dim MirrorExStyle As System.Windows.Forms.CreateParams
			MirrorExStyle = MyBase.CreateParams

			MirrorExStyle.ExStyle = MirrorExStyle.ExStyle Or WS_EX_LAYOUTRTL Or WS_EX_NOINHERITLAYOUT
			Return MirrorExStyle
		End Get
	End Property

End Class

بالتوفيق ان شاء الله

هذا الموضوع مغلق.

مواضيع مشابهة