Как переименовать панель состояния панели в Delphi 2010

Question

Я только что добавил новую панель в StatusBar1, и она называется 5 - TStatusPanel .Я хочу дать ему другое имя, но не могу вспомнить, как это сделать.

Я хочу переименовать 5 - TStatusPanel в 5 - GripArea .Как видно из рисунка, я делал это раньше (см. Num, Caps, AM / PM), но я не могу вспомнить, как я это сделал.Это отстой, чтобы стареть.

Answer 1

Вот подсказка, которая спасла бы охоту: щелкните правой кнопкой мыши на форме, View As Text.Теперь вы увидите форму, расположенную как свойства, и вы могли бы найти элемент управления, увидеть, как были названы другие панели, и исправить последнюю.Alt + F12 для включения / выключения просмотра текста.

Answer 2

Просто измените Text свойство TStatusPanel.Это то, что отображается в редакторе панели состояния.Конечно, это сделает текст видимым на панели!Обычно в коде вы получаете доступ к панелям состояния с помощью массива StatusBar1.Panels[PanelIndex].PanelIndex - индекс панели, начинающийся с нуля.Я всегда объявляю константы, такие как

STATUS_FILE_POSITION = 0;
STATUS_FILE_SAVED = 1;
STATUS_LONG_TEXT = 2;
STATUS_ZOOM_CONTROL = 3;

, и использую их для запоминания панелей.(Код выше взят из моего текстового редактора.)

Так что я могу сделать, например,

StatusBar.Panels[STATUS_FILE_SAVED].Text := 'Modified';