void __fastcall TForm1::Button1Click(TObject *Sender)
{
    SetSystemPowerState(False, False);
}

SetSystemPowerState(
    IN BOOL fSuspend,
    IN BOOL fForce
);