کنترل tree

[akbar_2020]

سلام

از دوستان کسی هست که راهی برای راست به چپ کردن محتوای کنترل tree بدونه؟(یعنی نوشته ها و علامتهای + از راست به چپ باشه)
از اینکه تجربیاتتون رو در اختیارمون قرار میدید ممنونم.

[sara_traveler]

tree view انتخاب کنید بهد خاصیت right to left layot=true کنید

[akbar_2020]

مرسی ازجوابت ولی با این کار خود tree به سمت راست می آید نه محتوای اون.

[sara_traveler]

چرا محتویاتشم میره
من امتحان کردم
right to left =true کردین؟

[binyaz2003]

شما باید همینطور که یک پنجره رو راست به چپ میکنید (غیر از قرار دادن Righttoleft=.t.) ،کنترل درخت رو هم راست به چپ کنید. در واقع این کنترل یک هندل به اسم hWnd دارد که باید اون رو پاس بدید، کد زیر رو امتحان کنید در init کنترل tree:


#DEFINE GWL_EXSTYLE -20
#DEFINE WS_EX_LAYOUTRTL 0x400000
#DEFINE WS_EX_NOINHERITLAYOUT 0x100000
*-- Define the Get window long API
DECLARE INTEGER GetWindowLong IN user32;
INTEGER hWnd, INTEGER nIndex
*-- Define the Set window long API
DECLARE INTEGER SetWindowLong IN user32;
INTEGER hWnd, INTEGER nIndex, INTEGER dwNewLong
*-- Get this form's current style.
OldLong = GetWindowLong(ThisForm.HWnd, GWL_EXSTYLE)
*-- Set the window extended style RTL non-inheritable.
SetWindowLong(This.hWnd,GWL_EXSTYLE,;
BITOR(OldLong,WS_EX_LAYOUTRTL,WS_EX_NOINHERITLAYOU T))