TElXTree header style="Image only"

Helmut Vaupotitsch

Hello, i have some problems when i use the "Image only" style for a merged header cell in the TElXTree.

When i have a header with two rows and i use the "Image only" style everything works as expected, see Image1.png

When i merge the cells, than the image is compressed, see Image2.png

Years ago i had an version, where this worked without any problems see Image3.png, which is a screenshot from the old software.

On the last image you can see the settings of my header section cell (image4.png).

Thanks in advance

Used software:

LMD VCL Complete 2022.1

Delphi 11 Alexandria

Eugene Balabuev (LMD)

Need some time to look...

Helmut Vaupotitsch

UPDATE: I searched my old sources and re-applied a forgotten historical fix from 2015 - and it worked again.

The fix is fine for 2-row merged header cells (Style=elhsImageIndex). I didn't test 3 rows or against other settings, but probably it's also useful for the LMD team.

ElXHeader.pas, ~line 2711

{$IFNDEF TElXHeaderCell_Fix_DistortedImage}

          // 2-row header bug -- distorted image!

              R1.Top + LHeader.Images.Height);

{$ELSE}

              0);

          // correct bottom

          R2.Bottom := R2.Top + LHeader.Images.Height;

{$ENDIF}