varmessageBoxTimeout=u.api("MessageBoxTimeoutA","int(inthwnd,stringlpText,stringlpCaption,intuType,intwlange,intdwTimeout)","stdcall");
msgbox=function(str,title="AAuto",style,parenthwnd=0){
style:=0x40//_MB_OK|_MB_ICONINFORMATION;
if(!parenthwnd)
style|=0x2000/*_MB_TASKMODAL*/
returnmessageBox(parenthwnd,tostring(str),title,style|0x10000/*_MB_SETFOREGROUND*/);
}
msgboxTest=function(str,title,parenthwnd=0){
returnmsgbox(str,title,0x1|0x20/*_MB_OKCANCEL|_MB_ICONQUESTION*/,parenthwnd)==1;
}
msgboxTimeout=function(str,title="AAuto",timeout=2000,style,parenthwnd=0){
style:=0x40//_MB_OK|_MB_ICONINFORMATION;
if(!parenthwnd)
style|=0x2000/*_MB_TASKMODAL*/
returnmessageBoxTimeout(parenthwnd,tostring(str),title,style|0x10000/*_MB_SETFOREGROUND*/,0,timeout);
}
/*消息循环函数{{*/
/*
::TranslateAccelerator=u.api("TranslateAcceleratorA","int(inthWnd,inthAccTable,structlpMsg)");
::CreateAcceleratorTable=u.api("CreateAcceleratorTableA","int(structpaccel,intcAccel)");
classACCEL{
ctor(v,k,c){
this.fVirt=v;this.key=k;this.cmd=c;
}
WORDfVirt;
WORDkey;
INTcmd;
}
*/
isDialogMessage=u.api("IsDialogMessage","INT(inthDlg,structIpMsgc)");
varisDialogMessage=isDialogMessage;
varpeekMessage=u.api("PeekMessage","int(struct&lpMsg,inthwnd,INTwMsgFilterMin,INTwMsgFilterMax,INTwRemoveMsg)")
vargetMessage=u.api("GetMessage","int(struct&,int,INT,INT)")
vartranslateMessage=u.api("TranslateMessage","int(struct&)")
vardispatchMessage=u.api("DispatchMessage","int(struct&)")
varmapforms={//键为控件名任意窗口句柄,值为容器form
本文来自电脑杂谈,转载请注明本文网址:
http://www.pc-fly.com/a/jisuanjixue/article-30959-5.html
用录音机