[DUG] TToolBar

[Robert martin]

Thanks Myles

I never even considered that !!! 

Tool focused on moving items by index

Works great
Rob


Myles Penlington wrote:
> 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.
>
> _______________________________________________
> 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
>
>