Use Windows API GetSystemMetrics with SM_CLEANBOOT parameter, this specifies how the system was started, in your PRoject´s code use:

program Project1;

uses

Forms,

Windows,

Dialogs,

Unit1 in 'Unit1.pas' {Form1};

{$R *.RES}

begin

application.Initialize;

Application.CreateForm(TForm1, Form1);

case GetSystemMetrics(SM_CLEANBOOT) of

1: begin

ShowMessage('Running in Safe Mode: Fail-Safe Boot');

Application.Terminate;

end;

2: begin

ShowMessage('Running in Safe Mode: Fail-safe with network boot');

Application.Terminate;

end;

end;

Application.Run;

end.