发信人: love1974()
整理人: wenbobo(2002-12-06 23:12:36), 站内信件
|
使用BCB控制关机或重新启动
采用 WINDOWS API函数 ExitWindowsEx()可以实现。
测试示例如下:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
DWORD tmp;
//关机
ExitWindowsEx(EWX_SHUTDOWN,tmp);
}
void __fastcall TForm1::Button2Click(TObject *Sender)
{
DWORD tmp;
//重新启动
ExitWindowsEx(EWX_REBOOT,tmp);
}
void __fastcall TForm1::Button1Click(TObject *Sender)
{
DWORD tmp;
//其他身份登陆
ExitWindowsEx(EWX_LOGOFF,tmp);
}
-- love1974[灌水版(还未开盘)斑竹] 灌翻网易,一大快事
太太平平,不是我活着的目标;不温不火,不是我的性格。是云就该下雨,是火就该发光。
那罐星砂送給你
╭╯ ╰╮╭╯╰╮ 願你心想事成
║▃▃▃║║☆★║ 這罐海水留給我
※ 来源:.月光软件站 http://www.moon-soft.com.[FROM: 202.96.190.124]
|
|