Заставить форму оставаться поверх всего, даже когда основная форма свернута

Вы можете заставить форму оставаться наверху, установив для параметра FormStyle значение fsStayOnTop, а также сделав ее окном верхнего уровня и установив соответствующий стиль окна. Вы можете сделать это, переопределив CreateParams в своей форме:

TForm1 = class(TForm)        
  private
    { Private declarations }
  protected      
    procedure CreateParams(var Params: TCreateParams); override;
  public
    { Public declarations }
end;

реализация :

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.WndParent := 0;  { Make this a top-level window }
  Params.Style := WS_POPUPWINDOW or WS_CAPTION or WS_CLIPCHILDREN;
end;

Я попробовал решение CreateParams, опубликованное выше — в Delphi 10.3.3 — и оно не сработало. Однако я нашел решение, которое работает для Delphi. Не знаю, есть ли что-то подобное в Lazarus, но я публикую здесь ответ Delphi на случай, если кто-то еще столкнется с этим, поскольку я нашел этот пост за 30 минут до того, как нашел сработавший ответ Delphi. :)

Поместите это в событие Form B OnCreate:

Стиль формы:= fsStayOnTop;

но одного этого мало...

Перетащите TApplicationEvents в форму B.

В событии OnDeactivate для ApplicationEvents1 добавьте следующее:

SetForegroundWindow(Handle);

Я слежу за небольшим окном состояния, в то время как моя основная форма обрабатывает данные за пределами сайта. Красиво работает!

В дополнение к сообщению @J... вы можете использовать процедуру OnDeactivate из класса TForm, чтобы заставить пользователя не свободный фокус из окна.

При создании и отображении формы вы также можете использовать ShowModal вместо Show, чтобы окно отображалось поверх родителя.