Delphi子窗体默认最小化到桌面而不是任务栏，跟Application对象有什么关系？Application是子窗体的父窗体？跟这有关吗？

[ooolinux]

我记得Delphi的Application是一个0像素的窗口

[日立奔腾浪潮微软松下联想]

@ooolinux 只能说windows shell的设计就是这样，没有任务栏窗口的窗体最小化之后怎么办，总不能消失不见吧，用户就无法恢复了

[ooolinux]

@日立奔腾浪潮微软松下联想 这个代码比较方便，我原来用 void __fastcall TForm2::CreateParams(Controls::TCreateParams &Params) { TForm::CreateParams(Params); Params.WndParent = HWND_DESKTOP; }

[ooolinux]

@日立奔腾浪潮微软松下联想 为什么默认情况下子窗体会最小化到桌面？

[日立奔腾浪潮微软松下联想]

有一点关系，VCL程序中所有的窗体都是Application内部建立的一个隐藏窗体的子窗体，所以用户程序建立的第一个窗体并非真正的主窗体（虽然Application.MainForm指向它）。
要让子窗体最小化到任务栏也很简单，只要建立的时候：
SetWindowLongPtr(Form2.Handle, GWL_EXSTYLE,
GetWindowLongPtr(Form2.Handle, GWL_EXSTYLE) or WS_EX_APPWINDOW);
即可。

[ooolinux]

@日立奔腾浪潮微软松下联想 OK~

[日立奔腾浪潮微软松下联想]

参考：https://learn.microsoft.com/en-us/windows/win32/winmsg/extended-window-styles
WS_EX_APPWINDOW Forces a top-level window onto the taskbar when the window is visible.
0x00040000L