بسم الله الرحمن الرحيم
إخوتي الأحبة:
كيف أستطيع جعل صندوق ال RichTextBox يتحول من اليمين إلى اليسار؟
كنت قد وجدت هذا الكود، لكنه يشوه الصندوق ولا يعمل بصورة صحيحة:
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long 'TreeView1 RightToLeft True Private Const WS_EX_LAYOUTRTL = 4194304 Private Const GWL_EXSTYLE = -20
ثم اكتب هذا الكود في حدث Load للنموذج
SetWindowLong RichText.hwnd, GWL_EXSTYLE, WS_EX_LAYOUTRTL RichText.Refresh
أرجو أن تعطوني طريقة أخرى، مجربة وموثوقة لأنني بحاجة ماسة إلى هذا...