使用带有 SM_CLEANBOOT 参数的 Windows API GetSystemMetrics,这指定了系统的启动方式,在您的项目代码中使用:
计划项目1;
用途
表格,
视窗,
对话框,
'Unit1.pas' {Form1} 中的 Unit1;
{$R *.RES}
开始
应用程序.初始化;
Application.CreateForm(TForm1, Form1);
案例 GetSystemMetrics(SM_CLEANBOOT) 的
1:开始
ShowMessage('以安全模式运行:故障安全启动');
应用程序.终止;
结尾;
2:开始
ShowMessage('以安全模式运行:通过网络启动进行故障保护');
应用程序.终止;
结尾;
结尾;
应用程序.运行;
结尾。