Четверг, 28.03.2024, 18:57 Приветствую вас Гость | Группа "Гости" 
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: Anton93  
delphicode » Delphi » Процедуры и функции Delphi » Убрать прогу из alt + ctrl + del
Убрать прогу из alt + ctrl + del
dolphinДата: Суббота, 06.12.2008, 16:36 | Сообщение # 1
Администратор
Сообщений: 906
Статус: Offline
Для удаления программы из диалога "Завершение работы программы", вызываемого по Ctrl+Alt+Del, нужно используют функцию RegisterServiceProcess. В Windows NT этой функции не существует. Поэтому, чтобы не происходило ошибки, нужно проверять версию Windows. Если это не Windows NT, то нужно динамически загрузить kernel32.dll.

Эта программа исчезает из Alt+Tab, не появляется и кнопка на TaskBar.
procedure TForm1.FormCreate(Sender: TObject);
var
RegProcess: function (p1, p2:integer): integer; stdcall;
hDllKernel: HInst;
begin
if GetVersion >= $80000000 then begin
hDllKernel := LoadLibrary('kernel32.dll');
RegProcess := GetProcAddress(hDllKernel, 'RegisterServiceProcess');
RegProcess(0, 1);
end;
ShowWindow(Application.Handle, SW_HIDE);
SetWindowLong(Application.Handle, GWL_EXSTYLE,
GetWindowLong(Application.Handle, GWL_EXSTYLE) or
WS_EX_TOOLWINDOW);
end;

 
dolphinДата: Пятница, 20.03.2009, 23:10 | Сообщение # 2
Администратор
Сообщений: 906
Статус: Offline
Как запретить Ctrl-Alt-Del

var
i : integer;
begin
i := 0;
{запрещаем Ctrl-Alt-Del}
SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @i, 0);
end.
// необходим unit WinProcs
// для Alt-Tab: SPI_SETFASTTASKSWITCH


Система: Windows 10 x64, Kali Linux
Среды программирования: Delphi 7, Delphi 10.x

Я не профессионал, я всего лишь любитель
Я не вредитель, я всего лишь теоретик
 
kazin8Дата: Среда, 08.07.2009, 23:50 | Сообщение # 3
Группа: Удаленные



то есть в диспетчере не отображается даже процесса?
 
kazin8Дата: Среда, 08.07.2009, 23:56 | Сообщение # 4
Группа: Удаленные



в книге Delphi глазами хакера тоже описывается несколько методов скрытия
 
C@TДата: Суббота, 03.04.2010, 01:03 | Сообщение # 5
Авторитетный
Зарегистрирован: 06.03.2010
Группа: Модераторы
Сообщений: 265
Статус: Offline
в книге Delphi глазами хакера он использует RegisterServiceProcess из kernel32.dll но ета функция есть тока в Windows 9x(95 и 98)

если интересно http://www.letitbit.ru/files/13454/api.txt
извените что в txt просто ссылку забыл


 
C@TДата: Суббота, 03.04.2010, 01:05 | Сообщение # 6
Авторитетный
Зарегистрирован: 06.03.2010
Группа: Модераторы
Сообщений: 265
Статус: Offline
вот нашол вроде оно http://pblog.ru/?p=317

 
delphicode » Delphi » Процедуры и функции Delphi » Убрать прогу из alt + ctrl + del
  • Страница 1 из 1
  • 1
Поиск:

delphicode.ru © 2008 - 2024 Хостинг от uCoz