本文整理自网络,侵删。
ShowWindow(FindWindowEx(FindWindowEx(FindWindow('Shell_TrayWnd', nil), 0, 'TrayNotifyWnd', nil), 0, 'SysPager', nil), SW_HIDE);
ShowWindow(FindWindowEx(FindWindowEx(FindWindow('Shell_TrayWnd', nil), 0, 'TrayNotifyWnd', nil), 0, 'SysPager', nil), SW_SHOW);
相关阅读 >>
Delphi 使用firedac tfdibbackup和tfdibrestore备份和还原firebird
Delphi xe 自己编辑xe2 vcl style(皮肤/skin)
Delphi实现win10下Delphi 10.3.1 inline hook 域名转向之internetconnecta
更多相关阅读请进入《Delphi》频道 >>