[DUG] TToolBar

[Myles Penlington]

tb.Left := <Your at end position>

Myles.


-----Original Message-----
From: delphi-bounces at delphi.org.nz [mailto:delphi-bounces at delphi.org.nz]
On Behalf Of Robert martin
Sent: Tuesday, 16 September 2008 9:36 a.m.
To: NZ Borland Developers Group - Delphi List
Subject: [DUG] TToolBar

Hi All

I am writing some code to add buttons to an existing toolbar.  I have 
the following which works but inserts the buttons at the front of the 
existing items. 

                    Tb := TToolButton.Create(ButtonToolBar);
                    tb.Style := tbsButton;
                    tb.Action := ActionClientItem.Action;
                    tb.ImageIndex := ActionClientItem.ImageIndex;
                    Tb.ShowHint := True;
                    Tb.Hint := ActionClientItem.Caption;
                    ButtonToolBar.InsertControl(TB);



What I really want to do is insert at the end.  This must be possible 
(the customise tool does it) but all the properties to set or move an 
item seem to be private.  Any suggestions?

Thanks
Rob
_______________________________________________
NZ Borland Developers Group - Delphi mailing list
Post: delphi at delphi.org.nz
Admin: http://delphi.org.nz/mailman/listinfo/delphi
Unsubscribe: send an email to delphi-request at delphi.org.nz with Subject:
unsubscribe

Attention:
This communication is confidential and may be legally privileged.  If you are not the intended recipient, please do not use, disclose, copy or distribute it, other than to return it to us with your confirmation that it has been deleted from your system.