FMX表单不会通过单击任务栏来最小化;动画不起作用

时间:2018-11-17 12:13:35

标签: windows delphi firemonkey

有2个,甚至3个问题:

1)当我单击应用程序的任务栏图标时,该窗体不会像VCL应用程序那样缩小 深入研究FMX.Platform.Win WndProc,我发现这些行可能会引起问题(据我了解,这段代码会导致应用程序在我将其最小化的同时立即还原)

WM_ACTIVATEAPP:
  begin
    Result := DefWindowProc(hwnd, uMsg, wParam, lParam);
    if BOOL(wParam) then
      PlatformWin.RestoreApp;
   end;

2)当我单击表单的最小化按钮时,有时表单最小化到桌面:

enter image description here 修补

 procedure TPlatformWin.MinimizeApp;
   {...}
   Application.MainForm.WindowState := TWindowState.wsMinimized;

似乎可以解决问题

3)这个问题How to properly restore an FMX form?中的问题在10.2中仍然存在

给出补丁TPlatformWin.CreateAppHandle的答案,我不明白:将GetDesktopWindow更改为0并没有任何改变,删除重要代码,因为答案似乎毫无意义

0 个答案:

没有答案