小弟想将窗口右上角的关闭按钮屏蔽,不知该什么方法,请大家帮帮忙,谢谢谢谢谢谢!!!!

解决方案 »

  1.   

    属性中borderIcons的BIsystemMenu:=false;
      

  2.   

    有时间多看看以前的帖子对你有帮助form属性的borderIcons  展开
    把相应字段设成false给分
      

  3.   

    form属性的borderIcons  展开
    BIsystemMenu設為false;
      

  4.   

    属性中borderIcons的BIsystemMenu:=false;
    : miniking(kmin) 说得很正确啊
      

  5.   

    borderIcons的BIsystemMenu:=false;
      

  6.   

    对了就不用说了,说一说你如何代替掉那些:DefWindowProc(Handle, WM_SYSCOMMAND, SC_CLOSE, 0);//Close;
    //////////////////最大化and 恢复
      if self.WindowState = wsNormal then
      begin
        DefWindowProc(Handle, WM_SYSCOMMAND, SC_MAXIMIZE, 0);    
      end
      else
      begin
        DefWindowProc(Handle, WM_SYSCOMMAND, SC_RESTORE, 0);    
      end;//////////////////最大化and 恢复
    ////////////关闭
      if Application.MainForm =self then
        Application.Minimize
      else
        DefWindowProc(Handle, WM_SYSCOMMAND, SC_MINIMIZE, 0);
    ///////////关闭----------------
    沉沦中..........