如何用FoxPro实现WINDOWS重新启动

来源:计算机等级考试    发布时间:2012-08-28    计算机等级考试视频    评论

  若要在VFP应用程序中直接关闭计算机,就需要调用WIN32APE函数,利用WIN32API中提供的ExitWindowsEx()函数,我们便可以在VFP中控制WINDOWS的关机动作,步骤:
  建立基本界面
  此界面需要的控件为:一个选项按钮组、一个图像控件、一个标签、两个按钮,这里要注意的一点是:要想建立一个如图中的无控制框的界面,此表单的属性设置如下:
  Autocenter
  ..T
  Borderstyle
  0---无边框
  Closebale
  .f.
  Maxbutton
  .f.
  Minbutton
  .f.
  Controlbox
  .f.
  基本界面设计好后,就可以进行代码录入了,请在确定按钮的CLICK()事件中录入:来源:www.examda.com
  #define EWX_LOGOFF 0
  #define EWX_SHUTDOWN 1
  #define EWX_REBOOT 2
  #define EWX_FORCE 4
  #define EWX_POWEROFF 8
  DECLARE integer ExitWindowsEx IN USER32.DLL AS Shut_Down INTEGER , INTEGER
  LOCAL nAnswer
  DO CASE
  CASE THISFORM.Optiongroup1.Value = 1 &&关闭机器
  =Shut_Down( EWX_SHUTDOWN + EWX_FORCE , 0 )
  CASE THISFORM.Optiongroup1.Value = 2 &&重新启动
  =Shut_Down( EWX_REBOOT + EWX_FORCE , 0 )
  CASE THISFORM.Optiongroup1.Value = 3 &&注销
  =Shut_Down( EWX_LOGOFF + EWX_FORCE, 0 )
  ENDCASE
  THISFORM.RELEASE

  编辑特别推荐:

  计算机等级考试二级VFP考前密卷及答案

视频学习

我考网版权与免责声明

① 凡本网注明稿件来源为"原创"的所有文字、图片和音视频稿件,版权均属本网所有。任何媒体、网站或个人转载、链接转贴或以其他方式复制发表时必须注明"稿件来源:我考网",违者本网将依法追究责任;

② 本网部分稿件来源于网络,任何单位或个人认为我考网发布的内容可能涉嫌侵犯其合法权益,应该及时向我考网书面反馈,并提供身份证明、权属证明及详细侵权情况证明,我考网在收到上述法律文件后,将会尽快移除被控侵权内容。

最近更新

社区交流

考试问答