procedure THIMainForm.SetTaskBar; begin - //if IsMain then - //if (Value = 1)and Assigned(Applet) then - //Applet.ExStyle :={ Applet.ExStyle or} WS_EX_DLGMODALFRAME or WS_EX_TOOLWINDOW; + if IsMain then + begin + if (Value = 1)and Assigned(Applet) then + Applet.ExStyle :={ Applet.ExStyle or} WS_EX_DLGMODALFRAME or WS_EX_TOOLWINDOW; + end + else + begin + if (Value = 0) and Assigned(Applet) then + Control.ExStyle := Control.ExStyle or WS_EX_APPWINDOW; + end; end;