Снова разбираюсь почему глючит TTBToolbar в Delphi11. И появилось ощущение,

Question

Снова разбираюсь почему глючит TTBToolbar в Delphi11. И появилось ощущение,

что дело не в нем, а что-то поменялось в окружении. В Delphi7 работает.
Возможно какое-то событие ему не отправляется.
Тут про StatusBar, но может что-то похожее. А @rouse_79 ?

https://stackoverflow.com/questions/5325137/in-windows-7-x64-statusbar-does-not-show-text-for-the-panels-starting-from-the
"Я обнаружил похожую проблему для панелей ownerdraw. Событие DrawPanel не вызывается на панелях с индексом > 6 в Win 7/64bit. Я обнаружил, что Windows не отправляет сообщение WM_DRAWITEM этим панелям. Решение, которое сработало в моем случае, — установить стиль WS_EX_COMPOSITED для statusbar."
procedure TForm1.FormCreate(Sender: TObject);
var
SBHandle: THandle;
begin
...
if CheckWin32Version(5, 1) then
begin
SBHandle:= StatusBar.Handle;
SetWindowLong(SBHandle, GWL_EXSTYLE, GetWindowLong(SBHandle, GWL_EXSTYLE) or WS_EX_COMPOSITED);
end;
...
end;