Arnold
Arnold

Reputation: 4840

TToolBar: how to get rid of vertical bars?

When I have a TToolbar and I put non-toolbutton controls on it, there is a superfluous vertical bar through the control. How can I get rid of the bar?

In the image below, the toolbar contains only two toolbuttons and a TLabel and no separators. Notice the vertical bar through the letter V.

enter image description here

Upvotes: 2

Views: 1822

Answers (3)

Albert
Albert

Reputation: 39

Delphi XE2 Hot Update 4, Still got this bug, i work around this bug by :

  1. Setting TLabel.Autosize := False;
  2. TLabel.width := 50; --> just make sure its more than its caption, at least by 10 pixels
  3. TLabel.Alignment := taRightJustify

Thanks.

Upvotes: 1

Hendra
Hendra

Reputation: 755

you may want to try JVCL component suites (free) Delphi Jedi. It has a lot of visual components, including all sorts of panels & buttons. They also have panel with gradient colors, and image buttton for examples.

Upvotes: 1

jfoliveira
jfoliveira

Reputation: 2168

If I recall correctly, this is due to the handle of transparency of other non TToolButton controls that are placed in the TToolBar and, for this reason, if you set "Transparent" property of your TLabel to false, the vertical bar will disappear.

Upvotes: 4

Related Questions