Delphi编程禁止用户关闭操作系统(转)[@more@]本实例介绍在程序运行的过程中禁止用户关闭操作系统。
用户是否可以关闭操作系统是通过对WM_QueryEndSession的处理来实现的,为此首先需要在程序中添加WM_QueryEndSession消息处理的声明:
procedure QueryEndSession(var Msg:TMessage);Message WM_QueryEndSession;
它的响应代码如下:
用户是否可以关闭操作系统是通过对WM_QueryEndSession的处理来实现的,为此首先需要在程序中添加WM_QueryEndSession消息处理的声明:
procedure QueryEndSession(var Msg:TMessage);Message WM_QueryEndSession;
它的响应代码如下:
QUOTE: 来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/10617542/viewspace-949637/,如需转载,请注明出处,否则将追究法律责任。
请登录后发表评论
登录
全部评论
<%=items[i].createtime%>
<%=items[i].content%> <%if(items[i].items.items.length) { %>
<%for(var j=0;j
<%}%> <%}%>
<%=items[i].items.items[j].createtime%>
<%=items[i].items.items[j].username%> 回复 <%=items[i].items.items[j].tousername%>: <%=items[i].items.items[j].content%>
还有<%=items[i].items.total-5%>条评论
) data-count=1 data-flag=true>点击查看
<%}%>
|
转载于:http://blog.itpub.net/10617542/viewspace-949637/