inverse a treeview canvase

Posted on 2005-04-24
Last Modified: 2010-04-05
i want to developpe a new treeview  componant ( inherited from TTreeview ) so i want to be able to inverse the Treeview canvas with all its nodes and other things ( an RTL treeview )
right-to-left (RTL) layout for the tree :
for the first time i used this option to inverse the Original treeview : // the componant name  is Faimo

FSortType: TSortType;
procedure SetAbout(const Value: string);
procedure SetRightToLeftReading( b:Boolean);
property RightToLeftReading:Boolean read FRightToLeftReading write SetRightToLeftReading default false;
procedure Tfaimo.SetRightToLeftReading( b:Boolean);
oldParam: LongInt;
if FRightToLeftReading=b then
oldParam := GetWindowLong(handle, GWL_EXSTYLE);
SetWindowLong(handle, GWL_EXSTYLE, oldParam or $400000 or WS_EX_RIGHT);

but i made some problems in design Time when we move the control over the Form , and the tooltips no more appear .
could any one help me in :

01- be able to inverse the whole treeview from right to left
so instead of  
i would have
i appreciate all your help
Question by:frize
    LVL 2

    Accepted Solution

    This component may already do what you need:

    There is an example project included that does RTL reading.  It also supports unicode.  It is a very high quality component.  It is actually used in delphi 2005.  I am not sure if it can layout the nodes how you would like, but it may be a good starting point.  The control is built from the ground up, without using the windows API treeview.  The component is free and includes source code, so you should be able to modify it to suit your needs.  good luck.

    LVL 7

    Author Comment

    thank you but all what i want is to developpe one by my self , above is the code that i use to developpe it , but what about the problems that i faced with this developped treeview

    LVL 7

    Author Comment

    now i what to know how to align all the nodes ( and sub-nodes ) to the right side of this tree because i found how to redraw all the treeview but i 'm looking on how to align its nodes to the right side
    LVL 7

    Author Comment

    please is there any reply

    Write Comment

    Please enter a first name

    Please enter a last name

    We will never share this with anyone.

    Featured Post

    IT, Stop Being Called Into Every Meeting

    Highfive is so simple that setting up every meeting room takes just minutes and every employee will be able to start or join a call from any room with ease. Never be called into a meeting just to get it started again. This is how video conferencing should work!

    Introduction I have seen many questions in this Delphi topic area where queries in threads are needed or suggested. I know bumped into a similar need. This article will address some of the concepts when dealing with a multithreaded delphi database…
    Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview.  I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…
    Migrating to Microsoft Office 365 is becoming increasingly popular for organizations both large and small. If you have made the leap to Microsoft’s cloud platform, you know that you will need to create a corporate email signature for your Office 365…
    Internet Business Fax to Email Made Easy - With eFax Corporate (, you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, fr…

    759 members asked questions and received personalized solutions in the past 7 days.

    Join the community of 500,000 technology professionals and ask your questions.

    Join & Ask a Question

    Need Help in Real-Time?

    Connect with top rated Experts

    10 Experts available now in Live!

    Get 1:1 Help Now