Utilisez l'API Windows GetSystemMetrics avec le paramètre SM_CLEANBOOT, cela spécifie comment le système a été démarré, dans l'utilisation du code de votre projet :
programme Projet1 ;
utilise
Formulaires,
les fenêtres,
Dialogues,
Unit1 dans 'Unit1.pas' {Form1} ;
{$R *.RES}
commencer
application.Initialiser ;
Application.CreateForm(TForm1, Form1);
cas GetSystemMetrics(SM_CLEANBOOT) de
1 : commencer
ShowMessage('Exécution en mode sans échec : Démarrage sans échec');
Application.Terminer ;
fin;
2 : commencer
ShowMessage('Exécution en mode sans échec : sécurité intégrée avec démarrage réseau');
Application.Terminer ;
fin;
fin;
Application.Exécuter ;
fin.