Главная / DELPHI / Часто задаваемые вопросы и ответы на них / Пользовательский интерфейс / Как отключить системное меню формы и кнопки Minimize, Maximize, and Close во время выполнения(Runtime)?

Как отключить системное меню формы и кнопки Minimize, Maximize, and Close во время выполнения(Runtime)?

В приведенном примере показано как это сделать

Пример:

procedure TForm1.Button1Click(Sender: TObject);
begin
    {Disable}
    Form1.BorderIcons := Form1.BorderIcons - 
            [biSystemMenu, biMinimize, biMaximize];
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
    {Enable}
    Form1.BorderIcons := Form1.BorderIcons + 
            [biSystemMenu, biMinimize, biMaximize];
end;

Copyright ©   "Мастера DELPHI"   E-mail:   delphi@mastak.com  http://www.delphimaster.ru

Источник получения информации: http://www.delphimaster.ru