delphi - 如何既恢复最小化窗口并将窗口设置为前台？

Question

在 Delphi 11 Alexandria 的 Windows 10 中的 32 位 VCL 应用程序中，如果它隐藏在其他窗口后面，我有这个小功能可以将我的应用程序窗口设置为 z 顺序的顶部：

procedure TformMain.SetMeToTheForeGround;
begin
  if Winapi.Windows.IsIconic(Handle) then
    Winapi.Windows.ShowWindow(Handle, SW_RESTORE);
  Winapi.Windows.SetForegroundWindow(Handle);
end;

它工作得很好 - 但如果应用程序窗口被最小化，它就不会按预期工作。在这种情况下，任务栏应用程序图标仅获得橙色背景 - 但窗口未设置为前景！

那么我怎样才能既恢复最小化窗口并将窗口设置为前景呢？