Задание 1

Теперь посмотрим, как можно добавлять панели динамически. Добавьте на форму кнопку, в обработчике которой напишите следующий код:

void__fastcall TForm1::Button1Click(TObject *Sender){ // Добавляем панель StatusBar1->Panels->Add(); // Подсчитываем число панелей int count = StatusBar1->Panels->Count; // Изменяем текст у последней панели StatusBar1->Panels->Items[count - 1]->Text = "Panel " + IntToStr(count - 1); }

Иногда нет необходимости разбивать строку состояния на панели. В этом случае мы не используем коллекцию Panels. Вот так, например, можно вывести некоторый текст в строку состояния:

void__fastcall TForm1::Button1Click(TObject *Sender){ StatusBar1->SimpleText = "Some Text";