TStatusBar добавление панелий

[Tango]

Добавлял панели на TStatusBar в Delphi так

Код: Выделить всё

  DBStatus.Panels.Insert(0);


а в Лазаре такое не прокатывает, статус бар остаётся пустой, хотя DBStatus.Panels.Count возвращает актуальное значение.

[SeZuka]

Установите:

Код: Выделить всё

  DBStatus.SimplePanel := False

[Tango]

Помогло! Спасибо.