Borland C++ Builder: развернуть форму на весь экран

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

Решение:

Размещаем на форме кнопку. В примере ниже она имеет имя Button2. Вешаем на нее следующий обработчик:

int full_screen = 0;

void __fastcall TForm1::Button2Click(TObject *Sender)
{
  if (full_screen == 0) {
    Button2 -> Caption = "Свернуть";
    Form1 -> BorderStyle = bsNone;
    Form1 -> WindowState = wsMaximized;
  }
  else {
    Form1 -> WindowState = wsNormal;
    Form1 -> BorderStyle = bsSizeable;
    Button2 -> Caption = "На весь экран";
  }
  full_screen = 1 - full_screen;
}

Теперь при нажатии на кнопку форма будет разворачиваться на весь экран. При повторном нажатии на кнопку будет происходить обратный переход к оконному виду.

• Теги:
• borland
• cpp
• windows