TStatusBar.Color OK in Objects' Inspector but doesn't work at runtime

[jipété]

Hello,

As shown in attached image, Color of the StatusBar is OK on left side (designtime) but not on right side, runtime on top and designtime on bottom, below the ShellTreeView.

I check "ParentColor = True" for both components, handled by a yellow TPanel.

And...

Code: Pascal  [Select][+][-]

1. procedure TForm1.FormCreate(Sender: TObject);
2. begin
3.   stb.Color := clYellow; // ... does not work
4. end;

Regards,
Linux Debian 11.9 GTK 2.8 FPC 3.2.2 Laz 3.4

[phidel]

try this component

TeroSubtitler/TeroSubtitler/controls/UWStatusBar.pas

It has an own paint procedure