delphi实现关闭Windows

2016-02-19 17:50 0 1 收藏

今天图老师小编要向大家分享个delphi实现关闭Windows教程，过程简单易学，相信聪明的你一定能轻松get！

【 tulaoshi.com - 编程语言】

　　控制WINDOWS的开关：如关闭WINDOWS，重新启动WINDOWS等, ExitWindowsEx(UINT uFlags,DWORD dwReserved);是实现这一功能的API函数

　　首先定义常数

　　const

　　EWX_FORCE=4; //关闭所有程序并以其他用户身份登录

　　EWX_LogoFF=0; //重新启动计算机并切换到MS-DOS方式

　　EWX_REBOOT=2; //重新启动计算机

　　EWX_SHUTDOWN=1;//关闭计算机

　　运行时给How赋值，让他等于EWX_SHUTDOWN或其他，调用以下语句

　　ExitWindowsEx(How,0);

来源:https://www.tulaoshi.com/n/20160219/1616158.html

看过《delphi实现关闭Windows》的人还看了以下文章更多>>

Delphi7.0实现添加记录的“携带”实现

标签： Delphi

在数据库管理系统中，数据录入是数据处理的基本功能，录入操作方便与否是衡量数据库应用程序交互良莠的指标之一。录入中除了应要对录入数据进行合法检验外，还应为用户提供更多的方便操作，即对于“规范性”数据，如：性别、职称等字段的数据，应尽可能供用户“选择”录入，而非直接文字输入，另外，如：出生年月、联系电话、邮编等类似...

用DELPHI实现文件加密压缩

标签：编程语言网络编程

用DELPHI实现文件加密压缩作者: e梦缘 (wnhoo) Mail:wnhoo@163.com 风花雪月 e梦情缘点击下载此详细说明文件概述：在这篇文件中，讲述对单个文件的数据加密、数据压缩、自解压的实现。同样，也可以实现对多个文件或文件夹的压缩，只要稍加修改便可实现。关键...

delphi编程实现检测声卡存在

标签：编程语言网络编程

如果你是做一些多媒体播放器之类的程序时，为了完善系统的容错性，就必须用到一些检测系统的功能，其中检测声卡是否存在就是一个问题，下列程序帮你忙，首先需要在uses部分加入mmsystem ，接着在窗体创建时检测声卡： procedure TForm1.FormCreate(Sender: TObject);var i:Integer;begini := auxGetNumDevs();if i= thenlabel1.Capti...

用Delphi轻松实现背景播放

标签： Delphi

如果我们把Handle指向桌面，哪TMediaPlay将会在桌面播放。与TCanvas不同的是，TWinControl的Handle的属性是只读的，并且GetHandle方法是静态方法，这说明，我们要Handle指向桌面只有两种方法修改TWinControl，让Handle可写。建立TWinControl子类，并隐藏TWinControl.GetHandle方法,在新方法中返回桌面句柄。其中第二...

Delphi实现窗体控件自由摆布

标签： Delphi

Delphi关键字导航网络界面多媒体数据库图像控件文件硬件在做Mis项目过程中，有时需要让用户自己来实现窗体控件的布局，比如酒店管理中就需要对餐厅餐桌位置进行布局。要实现这种功能，必须做好三件事： 1、设置进入控件边缘的光标形状； 2、改变控件的大小及位置； 3、保存窗体控件的位置及状态，窗体下次启动时...

查看更多精彩>>