Форум: "WinAPI";
Текущий архив: 2002.01.24;
Скачать: [xml.tar.bz2];
ВнизЗупуск программы в BackGround режиме Найти похожие ветки
← →
Anderius (2001-11-14 21:25) [0]Подскажите пожалуйста, как сделать так, чтобы программу не было видно не на TaskBar"е, не при нажатии Ctrl-Alt-Del, а она работала в фоновом режиме? Заранее благодарен!
← →
NetBreaker666 (2001-11-15 03:15) [1]Для TaskBar"a надо сделать:
Application.Minimize; //-- Чтоб вообще видно не было.
ShowWindow(Application.Handle,0);
А вот на Ctrl-Alt-Del придеться по####ся ;)
procedure RegisterServiceProcess;external "kernel32.dll" name "RegisterServiceProcess"; //Соблюдать регистр !!!
procedure HideProgramFromCtrlAltDelMotherFucker; //Cool
Assembler;
Begin
push 1 //Вот только не помню, если не сработает, то попытайся сперва push 0
push 0 //а затем push 1
call RegisterServiceProcess
End;
Ну, а потом природа поможет ;)
← →
Anderius (2001-11-15 19:35) [2]Большое спасибо за ответ, только Делфя что-то на третью строку?
Может поможешь делетанту, что делать дальше!
← →
Anderius (2001-11-15 19:37) [3]Я имею ввиду строку
procedure RegisterServiceProcess;external "kernel32.dll" name "RegisterServiceProcess";
← →
NetBreaker666 (2001-11-16 10:09) [4]Вот: это я взял из своего трояна, написанного пару лет назад:
procedure RegisterServiceProcess;external "kernel32.dll" name "RegisterServiceProcess";
Да, и сперва идет push 1, а затем push 0
А какя у тебя Delph"a ???
← →
Anderius (2001-11-17 18:46) [5]У меня 5,
и она ужасно кричит на
procedure RegisterServiceProcess;external "kernel32.dll" name "RegisterServiceProcess";
← →
NetBreaker666 (2001-11-17 20:01) [6]А что именно она кричит (Fatal error, warning, hint )????
У меня все OK.
← →
Olgerd (2001-11-18 21:13) [7]Может у тебя WinNT/2K/Xpю?
← →
Anderius (2001-11-19 00:35) [8]Вроде запустил! Вот только ничего не работает! В CTRL-ALT-DEL видно и т. д., помогите найти ошибку!
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
procedure RegisterServiceProcess;external "kernel32.dll" name "RegisterServiceProcess"; //Соблюдать регистр !!!
type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
procedure HideProgramFromCtrlAltDelMotherFucker; //Cool
Asm
push 1
push 0
call RegisterServiceProcess
End;
Begin
Application.Minimize;
ShowWindow(Application.Handle,0);
{$R *.DFM}
end.
← →
Anderius (2001-11-19 00:37) [9]Извините, уважаемый NetBreaker666, но может быть вы знаете, как завершить насильно другую программу? Заранее благодарен!
← →
NetBreaker666 (2001-11-25 01:53) [10]Извени, что давно не отвечал: вчера только из инска вернулся.
Ты не вызываешь процедуру HideProgramFromCtrlAltDelMotherFucker
Вот так надо:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
procedure RegisterServiceProcess;external "kernel32.dll" name "RegisterServiceProcess"; //Соблюдать регистр !!!
type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
procedure HideProgramFromCtrlAltDelMotherFucker; //Cool
Asm
push 1
push 0
call RegisterServiceProcess
End;
{$R *.DFM}
Begin
Application.Minimize;
ShowWindow(Application.Handle,0);
HideProgramFromCtrlAltDelMotherFucker; //на самом деле, эту херню в OnCreate() засуунть надо.
end.
← →
LLL (2001-11-25 11:35) [11]А зачем ASM?
RegisterServiceProcess(GetCurrentProcessID, 1) - спрятать,
RegisterServiceProcess(GetCurrentProcessID, 0) - показать.
← →
NetBreaker666 (2001-11-25 14:30) [12]Зачем ASM ???
Ты че ????
Может вообще все на JAVA писать ???
Пиши на асме все, что можно, только оптимизацию перед этим отключай (если регистры менятся будут).
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2002.01.24;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.003 c