代码之家 › 专栏 › 技术社区 › Mike at Bookup

Delphi FMX FormStyle StayOnTop仅在应用程序处于活动状态时可用

delphi-sydney delphi-10.4-sydney firemonkey delphi

0

Mike at Bookup · 技术社区 · 4 年前

我创建了一个表单,并将其FormStyle设置为StayOnTop。窗口按预期工作,位于项目中其他窗口的顶部。

0 回复 | 直到 4 年前

1

3

Moskwa 4 年前

您是否尝试在**主窗体**上设置OnActivate和OnDeactivate

procedure TForm1.FormActivate(Sender: TObject);
begin
  if Assigned(Form2) then
    Form2.FormStyle := TFormStyle.StayOnTop;
end;

procedure TForm1.FormDeactivate(Sender: TObject);
begin
  if Assigned(Form2) then
    Form2.FormStyle := TFormStyle.Normal;
end;