Określenie w jaki sposób uruchomiono Windowsa

Aby po kliknięciu przycisku Button1 wyświetlić na etykiecie informację o sposobie w jaki uruchomiono system Windows używamy funkcji Windows API GetSystemMetrics():

Unit1.cpp

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   switch (GetSystemMetrics(SM_CLEANBOOT))
   {
      case 0: Label1->Caption = "Normal boot"; break;
      case 1: Label1->Caption = "Fail-safe boot"; break;
      case 2: Label1->Caption = "Fail-safe with network boot"; break;
   }
}