Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Скрытый процесс в Диспетчере задач [D5, D6, Win95/98, Win2k]


lakich ©   (2002-10-03 12:59:00) 

Мастера,подскажите как скрыть свой процесс в списке процессов диспетчера задач Windows?
Пишу подобие RemoteAdmina,(управление удалённм компом)..ничего
вредного программуля не делает:перед запуском предупреждает
юзверя мол машина под наблюдением,(много игрушек не гоняй)))прописывает себя в автозагрузку,мона получить снимок экрана и запущенных процессов
у юзверя,а также запустить или убить какую-нить программулю..вот
и всё-НО:полльзователи поступают просто-убивают процесс в диспетчере задач,поэтому ПОМОГИТЕ,ПЛИЗ,сделать процесс неведимым


lakich   (2002-10-04 10:03:00) [1]

от спасибо ,благодарен еси надо вышлю программулю-вродь работает))


Subfire   (2002-10-03 22:34:00) [2]

Есть вариант на win95-98-ME.
Передаешь true для регистрации сервиса, false для снятия регистрации.
Возвращает true если успешно.
В win95-98-ME программа исчезнет из списка задач.
В NT/2000/XP просто нет RegisterServiceProcess и функция вернет false без возникновения ошибки.

function RegisterAsService(Enable:Boolean):boolean;
type TRSP = function (H:THandle;K:word):longword;stdcall;
var RSP : TRSP;
begin
@RSP := GetProcAddress(GetModuleHandle(PChar("kernel32.dll")),
PChar("RegisterServiceProcess"));
Result := Assigned(@RSP);
if Result then begin
if Enable then Result := (RSP(0,1) = 1)
else Result := (RSP(0,0) = 1);
end;


Doctor Snap   (2002-10-03 21:42:00) [3]

Поищи в районе SystemParametersInfo or
SystemParametrsInfo


- Ruf -   (2002-10-03 18:33:00) [4]

пиши на ruf@ua.fm


Наверх

Титульная страница Поиск, карта сайта Написать письмо