aardio - 限制窗口位置和大小

效果： 

 

代码：

import win.ui;
/*DSG{{*/
var winform = win.form(text="aardio form";right=349;bottom=469)
winform.add()
/*}}*/
// 本例程由光庆编写
winform.show();
//限制宽高
import win.ui.minmax
win.ui.minmax(winform,200,200,500,500)
//限制位置
// 取屏幕宽度、高度
var screenw,screenh= win.getScreen();
// 限制窗口左边、上边、右边、下边距离
var lleft,ltop,lright,lbottom = 200,200,200,200
// 处理窗口消息
winform.wndproc = function(hwnd,message,wParam,lParam){ 
	     if message= 0x216 /*_WM_MOVING*/ {	
			m=::RECT()	
			..raw.convert(..topointer(lParam),m)
			if m.left<lleft {
				m.left=lleft;
				m.right=lleft+winform.width;
			}
			if m.top<ltop {
				m.top=ltop;
				m.bottom=m.top+winform.height;
			} 
			if m.right>screenw-lright {
				m.left=screenw-lright-winform.width;
				m.right=screenw-lright;
			} 			
			if m.bottom>screenh-lbottom {
				m.top=screenh-lbottom-winform.height;
				m.bottom=screenh-lbottom;
			} 	
			..raw.convert(m,..topointer(lParam))
        }; 
}
win.loopMessage();