可以拖动statusbar右下角对窗体进行缩放,如何禁止拖动改变窗体大小呢!!谢谢!!

解决方案 »

  1.   

    子类化,网上能搜索到源代码的        Case WM_GETMINMAXINFO
                '控制窗口大小
                Dim MinMax As MINMAXINFO
                CopyMemory MinMax, ByVal lParam, Len(MinMax)
                MinMax.ptMinTrackSize.x = 300
                MinMax.ptMinTrackSize.y = 300
                MinMax.ptMaxTrackSize.x = 300
                MinMax.ptMaxTrackSize.y = 300
                CopyMemory ByVal lParam, MinMax, Len(MinMax)
      

  2.   

    你把窗体的属性 BorderStyle =1 就可以了。
      

  3.   

    对楼上说的对把.Borderstyle=Fix Dialog就ok