Выполнить LogOff компьютера
Выполнить LogOff компьютера
Выполнить LogOff компьютера procedure TForm1.Button1Click(Sender: TObject); begin keybd_event(VK_LWIN, 0, 0, 0); keybd_event(ord('L'), 0, 0, 0); keybd_event(ord('L'), 0, KEYEVENTF_KEYUP, 0); keybd_event(VK_LWIN, 0, KEYEVENTF_KEYUP, 0); end; ExitWindowsEx(EWX_LOGOFF, 0); //убьёт все запущенные процессы.