TElXTree scrollbar bug

Yuriy Schulga

I found that the horizontal scrollbar is not
displayed correctly in the ElXTree components and its derivatives when using
some VCL styles.

I also use the HighlightAlphaLevel=100 property.
And with light VLC Styles it looks like this:

That is,
the text disappears from the second and third columns.

Dark styles
seem to display everything correctly.

In addition, the plus/minus is not drawn from the VCL style.

And one more remark, if I may. In ElXTree.pas in lines 6899-6909, when you change the code to the one below, the appearance looks better:

      if HasFocus then

      begin

        if UseVCLStyles then

          LFill := VclStyleServices.GetSystemColor(clHighlight)

        else

          LFill := FOwner.FocusedSelectColor;

      end

      else if not FOwner.HideSelection then

      begin

        if UseVCLStyles then

          LFill := VclStyleServices.GetSystemColor(clHighlight)

        else

          LFill := FOwner.HideSelectColor;

      end;

Yuriy Schulga

I also noticed that when using VCL Styles and such code:

Item.Cells[0].UseOwnStyle := True;

Item.Cells[0].Style.Bold := True;

Item.Cells[0].Style.ParentColors := False;

Item.Cells[0].Style.TextColor := clYellow;

the text color does not change, but is taken from style

Eugene Balabuev (LMD)

> I found that the horizontal scrollbar is not displayed correctly in the ElXTree components and its derivatives when using VCL Styles.

Fixed.

> I also use the HighlightAlphaLevel=100 property.

Fixed.

> And one more remark, if I may. In ElXTree.pas in lines 6899-6909, when you change the code to the one below, the appearance looks better

Incorporated into our code-base.

> I also noticed that when using VCL Styles and such code

This is not simple to handle, because initial idea for all controls is to ignore color properties and use colors from style instead. So, it actually work as it should.

Yuriy Schulga

Great, thanks.