🚀 go-pugleaf

"Nerio" <ne_serzanti@tin.it> ha scritto nel messaggio 
news:4312e8e4@newsgroups.borland.com...
> "Remy Lebeau (TeamB)" <no.spam@no.spam.com> ha scritto nel messaggio 
> news:431212ad$1@newsgroups.borland.com...
>>
>> "Nerio" <ne_serzanti@tin.it> wrote in message
>> news:4310fd3c@newsgroups.borland.com...
>>
>>> Sorry for trouble, but why ExitWindowsEx(EWX_FORCE or EWX_LOGOFF
>>> or EWX_SHUTDOWN, 0) go fine and ....(EWX_REBOOT or EWX_POWEROFF,
>>> 0) seem do nothing?
>>
>> Did you read the documentation for ExitWindows() yet?  Did you adjust 
>> your
>> program's privileges to allow rebooting in the first place?
>>
>>
>> Gambit
>>
> Really I am not able to change priviliges!
> My listing is : ...........
> Nerio
>
The point is not my structures knowledge (or not only) but particularly my 
manifest ignorance of Windows.
Searching in Googles I found this listing (adapted for my use) :
------
{ HANDLE hToken;
  TOKEN_PRIVILEGES newTp, oldTp;
  unsigned long dwSize = sizeof(TOKEN_PRIVILEGES);
  LUID luid;
  if(!OpenProcessToken(GetCurrentProcess(), TOKEN_ADJUST_PRIVILEGES | 
TOKEN_QUERY,
                &hToken))
  { ShowMessage("Error opening ProcessToken"); return; }
  if(!LookupPrivilegeValue(0, SE_SHUTDOWN_NAME, &luid))
  { ShowMessage("Error reading PrivilegeValue"); return; }
  newTp.PrivilegeCount = 1;
  newTp.Privileges[0].Luid = luid;
  newTp.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;
  if(!AdjustTokenPrivileges(hToken, false, &newTp, sizeof(TOKEN_PRIVILEGES),
        &oldTp, &dwSize))
  { ShowMessage("Error on AdjustToken - (enabling)"); CloseHandle(hToken); 
return; }
  ExitWindowsEx(EWX_REBOOT, 0);
}
------
Many thanks again for help
Nerio