Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 13.04.2017, 14:01   #1
myvvar
Новичок
Джуниор
 
Регистрация: 13.04.2017
Сообщений: 1
Вопрос Вызывание BSOD

Код:
unit BSOD;

interface

uses
  WinAPI.Windows;

function RtlSetProcessIsCritical(unu: Cardinal; proc: Pointer; doi: Cardinal): Integer; stdcall; external 'ntdll.dll';
function RtlAdjustPrivilege(Privilege: Cardinal; Enable: Boolean; CurrentThread: Boolean; out OldPrivilege: Boolean): Cardinal; stdcall; external 'ntdll';

implementation

procedure Crash;
asm
  lea eax, dword[esp+12]
  //invoke RtlAdjustPrivilege, 20, 1, 0, eax
  push eax
  push 0
  push 1
  push 20
  call RtlAdjustPrivilege
  //invoke RtlSetProcessIsCritical, 1, 0, 0
  push 0
  push 0
  push 1
  call RtlSetProcessIsCritical
  call ExitProcess
end;

end.
Если вызвать Crash то винда крашнится.
Как заставить этот код работать в x64-ех битном приложении?
myvvar вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Непонятное вызывание оператора присваивания Lotles Общие вопросы C/C++ 5 04.11.2010 13:31
BSOD snevar Windows 3 02.11.2010 23:26
BSOD fearless_beaver Компьютерное железо 3 29.07.2010 22:43
ошибка при вызывание сторед процедуры vasylshvv Общие вопросы .NET 2 01.10.2008 12:15
Вызывание процедуры в другой процедуре Dura4ok Общие вопросы Delphi 7 22.01.2008 19:45