D7做的界面最大化有关问题

D7做的界面最大化问题
版本：D7
窗体：Form1

将form1窗体属性的Windowstate := wsMinimized；

程序在运行时，窗体最大化，但是将系统的任务栏也给覆盖了

请问，如何将窗体最大化后，系统的任务栏不被给form1覆盖

[解决办法]
重载这个东西就可以procedure WMGetMinMaxInfo(var mes: TWMGetMinMaxInfo);message WM_GetMinMaxInfo;

procedure TXXXXX.WMGetMinMaxInfo(var mes: TWMGetMinMaxInfo);
begin

mes.MinMaxInfo.ptMaxSize.X := Screen.WorkAreaWidth;
mes.MinMaxInfo.ptMaxSize.Y := Screen.WorkAreaHeight;
mes.Result := 0;

inherited;

end;