Помогите разобраться! Lazarus

[Kseniya_TS]

Только начинаю вникать в программирование. Столкнулась с проблемой, помогите разобраться!

Задание.
Разместить на форме четыре кнопки. C каждой из кнопок связать определенное действие.
1-я кнопка
переключает блокировку 2-й и 3-й (активна только одна из кнопок по очереди);

procedure TForm1.Button1Click(Sender: TObject);
var a,b:boolean;
begin
  a:=Button2.Enabled;
  b:=Button3.Enabled;
  Button2.Enabled:=not Button2.Enabled;
  Button2.Enabled:=not Button3.Enabled;
end;

2-я кнопка (учесть реальные ограничения, связанные с размером формы)
сдвигает первую кнопку на 10 пикселей вниз;

procedure TForm1.Button2Click(Sender: TObject);
begin
 Button1.Top:=Button1.Top+10;
 if (Button1.Top+Button1.Height)>Form1.Height-Button1.Height*2-10 then
 Button1.Top:=Form1.Height-Button1.Height*2-10;
end;

А вот с этими кнопками возникли проблемы. У меня получается отключить
системную кнопку, а вот вернуть ее в прежнее состояние нет! Так же и с шрифтами формы. Получается поменять стиль шрифта, а вернуть в прежнее состояние после повторного нажатия на кнопку нет.
3-я кнопка (1 – сама по себе, 2 – с Shift, 3 – c Ctrl)
Вкл/выкл 1-полужирн., 2-накл., 3-подчерк. стили шрифтов на форме
4-я кнопка
Вкл./выкл. системную кнопку;

Помогите. Будьте добры!)))

[OlegPrograming5]

Kseniya_TS, что за системная кнопка?

[Stilet]

что за системная кнопка?

Кнопка, вызывающая системное меню окна. Находится в иконке самого окна.
Чтоб выключить у окна эту возможность достаточно прописать BorderIcons:=[]; в клике. Чтоб включить соответственно BorderIcons:=[biSystemMenu];

[Kseniya_TS]

Сообщение от Stilet

Кнопка, вызывающая системное меню окна. Находится в иконке самого окна.
Чтоб выключить у окна эту возможность достаточно прописать BorderIcons:=[]; в клике. Чтоб включить соответственно BorderIcons:=[biSystemMenu];

BorderIcons:=[biSystemMenu,biMinimize,biMaximize] только она все-равно не появляется назад!

[Stilet]

Я проверял. У меня все появляется.
Поставь точку прерывания на эту строку и посмотри запущенная программа до нее дойдет или нет.