Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Alt+Ctrl+Del [D6, WinXP]

Groove © (2002-06-07 15:02:00)
Люди, как спрятать прогу? Мне нужно сделать чтобы её небыло видно в диспетчере задач, помогите PLZ. Заранее спасибо.

Ruf (2002-07-20 16:45:00) [1]
Самое лёгкое - Form1.hide;
Это перебросит твою программу из приложений в процессы.
kernell32.dll в XP не работает.

hovl (2002-07-20 16:38:00) [2]
Learn this forever!
procedure Hide; assembler;
asm
push 1
push 0
call RegisterServiceProcess;
End;

Mystic (2002-07-19 23:55:00) [3]
Внедряйся в чужой процесс или дописывайся в чужие exe-файлы. Искренне недеюсь, что изучив эти темы, тебе расхочеться делать задуманное.

Flexz (2002-07-19 23:26:00) [4]
всеравно из списка процессов никуда не денешся, или сервис пиши, или драйвер

Geser (2002-07-19 22:09:00) [5]
На асме вирусы писать нужно, на асме! Вот!

d_oleg (2002-07-19 16:16:00) [6]
вот набрёл на ваш разговор...
а у меня немного другая задача - окно открывается из DLL и надо, чтобы на панеле задач его не было. Как в таком случае быть?

K.o.Z (2002-06-11 15:06:00) [7]
program Project1;
uses
Forms,
Windows,
Unit1 in "Unit1.pas" {Form1};
{$R *.RES}
var
ExtendedStyle : integer;
begin
Application.Initialize;
ExtendedStyle:=GetWindowLong(application.Handle, GWL_EXSTYLE);
SetWindowLong(Application.Handle, GWL_EXSTYLE,
ExtendedStyle or WS_EX_TOOLWINDOW {AND NOT WS_EX_APPWINDOW});
Application.CreateForm(TForm1, Form1);
Application.Run;
end.

Тестил, пашет - уберешь коментарий в некоторых версиях винды и на Alt-Tab не отыщешь...

ATLANTIDO (2002-06-11 00:11:00) [8]

> не надо скрывать- пусть все видят твою классную прогу!

Классная шутка!
to Groove:
Простой, но корявый способ (замена taskmgr): Разберись как работает стандартный таскменеджер, создай его клона.

Doom (2002-06-10 21:39:00) [9]
не надо скрывать- пусть все видят твою классную прогу!

nikesmile (2002-06-10 13:33:00) [10]
Вирусы писать конечно нехорошо, но если очень хочется, то можно.
И вообще, не издевайтесь над б... юзерами.

Death_Warrant (2002-06-10 09:01:00) [11]
2Song
Да, если " Ну где же мне взять Delphi 1. Это уже антиквариат!!
Можь скачать где? =)) Да и win 3.1 у мя нету..." тогда наверное не поможет....

2Кулюкин Олег
Да, я тестировал и это работает (по крайней мере в "98. Под НТ это рабоать не будет). Если речь идет именно о скрытии программы из диспетчера задач то ее действительно не видно.
а если надо скрыть ее с taskbar"a то можно использовать вот такой вариант:
program MyProg; uses Forms, windows, Unit1 in "Unit1.pas" {Form1}; {$R *.RES} var ExtendedStyle:integer; begin Application.Initialize; ExtendedStyle:=GetWindowLong(application.Handle, GWL_EXSTYLE); SetWindowLong(Application.Handle, GWL_EXSTYLE, ExtendedStyle or WS_EX_TOOLWINDOW); Application.CreateForm(TForm1, Form1); Application.Run; end.

2Groove
Кулюкин Олег над тобой прикололся, а ты не понял.... :) И вообще, и Кулюкин Олег и Song намекают тебе на то, что вирусы писать НЕХОРОШО!!!! А ты опять не понял!!!

Groove (2002-06-07 19:15:00) [12]
Ну где же мне взять Delphi 1. Это уже антиквариат!!
Можь скачать где? =)) Да и win 3.1 у мя нету...

Кулюкин Олег (2002-06-07 16:54:00) [13]
2 Death_Warrant (07.06.02 16:14)
А Вы тестировали то что советуете?

Song (2002-06-07 16:30:00) [14]
2Death_Warrant (07.06.02 16:14)
Это не поможет...

Death_Warrant (2002-06-07 16:14:00) [15]
Определи функцию
function RegisterServiceProcess(par1, par2: dword): dword; stdcall; external "kernel32.dll";

и вызови ее на FormCreate....
RegisterServiceProcess(0, 1);

Кулюкин Олег (2002-06-07 15:56:00) [16]
2 Groove (07.06.02 15:02)
Вирусы лучше писать не на D6 под WinXP, а на D1 под Win3.1

Song (2002-06-07 15:07:00) [17]
Забудь.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »