最大化: if form1.WindowState = wsMinimized then 普通: if form1.WindowState = wsNormal then 最小化: if Boolean(IsIconic(Application.Handle)) then //主窗体 if Boolean(IsIconic(form1.Handle)) then //非主窗体