Was macht Runterfahren

**SaFu**

Hi leute

ich habe mich mal gefragt was dieser Code alles macht

Also das er den Rechner Runterfährt weis ich aber wie

Speichert er die Sachen auch oder schneidet er alles direkt ab dann wäre es ja nicht so gut und wenn er das macht gibt es ein code womit man den Rechner runterfahren kann und alles gespeichert wird Ohne irgenwelche abfragen???

Wäre net wenn mir das jemand beantworten würde

zusammenfalten · markieren

Delphi-Quellcode:

			function TForm13.MyExitWindows(RebootParam: Longword): Boolean;

var

  TTokenHd: THandle;

  TTokenPvg: TTokenPrivileges;

  cbtpPrevious: DWORD;

  rTTokenPvg: TTokenPrivileges;

  pcbtpPreviousRequired: DWORD;

  tpResult: Boolean;

const

  SE_SHUTDOWN_NAME = 'SeShutdownPrivilege';

begin

  if Win32Platform = VER_PLATFORM_WIN32_NT then

  begin

    tpResult := OpenProcessToken(GetCurrentProcess(),

      TOKEN_ADJUST_PRIVILEGES or TOKEN_QUERY,

      TTokenHd);

    if tpResult then

    begin

      tpResult := LookupPrivilegeValue(nil,

                                       SE_SHUTDOWN_NAME,

                                       TTokenPvg.Privileges[0].Luid);

      TTokenPvg.PrivilegeCount := 1;

      TTokenPvg.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED;

      cbtpPrevious := SizeOf(rTTokenPvg);

      pcbtpPreviousRequired := 0;

      if tpResult then

        Windows.AdjustTokenPrivileges(TTokenHd,False,TTokenPvg,cbtpPrevious,rTTokenPvg,pcbtpPreviousRequired);

    end;

  end;

  Result:= ExitWindowsEx(RebootParam, 0);

end;

Was macht Runterfahren

Was macht Runterfahren

Forumregeln