tstatusbarpro taCentered issue

[daSpeedy]

The name and version of the product that the bug occurs on: tstatusbarpro - doesn't seem to have changed since 2010.
The name and version of the operating system that the bug occurs on: windows 7, Delphi 2007.
Summary of problem: when My statusbar and panel has different font, the calculation for taCentered panel text position isn't correct.
Full description of the problem:
Add statusbar to form.
Add 3 panels to statusbar.
For middle panel:
Set the panel alignment to taCenter.
Set the panel font style to bold.
Set the panel text to some value so you can see it. (6 letters should just nearly fill default size with enough space left so you can see that it isn't properly centered)
Note the panel text is too far to right. (assuming English, left to right, no images).
Also note toggling the statusbar font style to bold will correct it.

Hack Fix:
In TStatusBarPro.DrawPanel, Move FCanvas.Font.Assign(Panel.Font); to before it determines X position.

[Kambiz]

Hi,

Thank you for the bugfix!