كيف يتم تحويل النصوص إلى اليمين في TreeView

[chehrour]

السلام عليكم اخي الكريم
لحل المشكلة هذا الكود في FromCreate

PHP كود :

var Oldlong:integer;
begin
OldLong := GetWindowLong(TreeView1.Handle,GWL_EXSTYLE);
SetWindowLong(TreeView1.Handle, GWL_EXSTYLE,OldLong or WS_EX_LAYOUTRTL);
InvalidateRect(TreeView1.Handle,nil,True);
///
end; 


بالتوفيق