Дадим несколько советов по использованию рассмотренных значений свойства FormStyle.

    В ряде случаев полезно представить пользователю самому решать, сделать ли данное окно располагающимся поверх остальных, или нет. Например, ему может временно потребоваться перейти в какое-то другое приложение, чтобы получить необходимую информацию, и при этом ему нужно видеть поверх этого приложения окно, чтобы сравнить в этих двух окнах какие-то данные. Такую возможность можно представить пользователю. Можно ввести в меню пункт Поверх всех окон:

Рис.1. Окно с переключающимся статусом

    В обработчик щелчка на этом разделе можно вставить следующие операторы:

procedure TForm1.N2Click(Sender: TObject);
begin
   N2.Checked:= not N2.Checked;
   if N2.Checked then
         Form1.FormStyle:=fsStayOnTop
   else  Form1.FormStyle:=fsNormal;
end;

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