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

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

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

Ctrl+Alt+Del под WinXP [D7, WinXP]

Страницы: 1 2 >
Extern © (2004-08-15 15:40:00)
Как это ни банально, но не могли бы вы подсказать, как скрыть прогармму из диспетчера задач под винХП.

DeadMeat (2004-08-30 21:48:00) [1]

> Сам под XP не пробывал, а под Win2kработает:

ЧИИВОО??

---
...Death Is Only The Begining...

Игорь Шевченко (2004-08-30 14:48:00) [2]
Дмитрий Ботвин (30.08.04 14:14) [19]

Мне не надо вообще ничего пробовать, под Win2k kernel32.dll не экспортирует функцию RegisterServiceProcess. О чем честно сообщает программа при запуске:

The procedure entry point Register Service Process could not be located in the dynamic library KERNEL32.DLL

Ты, часом Win2k с Win9x не спутал ?

Дмитрий Ботвин (2004-08-30 14:18:00) [3]
Извиняюсь, проверял наоборот 1-й, а вот второй нашел по запросу
в инете по ходу ответа. Его то я и не проверял :-))))

Дмитрий Ботвин (2004-08-30 14:14:00) [4]
Игорёчек, можешь попробывать оба варианта. Про первый не знаю -
не проверял, а вот второй пашет под Win2K. Правда, как я недавно
узнал, если в Far-е нажать F11 и выбрать "Список процессов", то
скрытые процессы всё равно можно увидеть. Но эту ситуацию я не
опробывал, мне энто не потребно стало :-)))

Игорь Шевченко (2004-08-30 12:08:00) [5]

> Сам под XP не пробывал, а под Win2k работает:

Не верю (с) Станиславский

Дмитрий Ботвин (2004-08-30 09:23:00) [6]
А вот нашёл более простой код, не проверял.....

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;

Пример использования:
// OnCreate
RegisterAsService(True); // Спрятали
// on **
RegisterAsService(False); // Показали

Дмитрий Ботвин (2004-08-30 09:21:00) [7]
Сам под XP не пробывал, а под Win2k работает:

unit cad;

interface
uses windows;

function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer;
stdcall; external 'KERNEL32.DLL';
function ShowHideInCad(ProcessID: Integer; Show: Boolean): boolean;
function TakeProcessID(WindowTitle: string): Integer;
function TakeMyApplicationProcessID: Integer;

implementation

//Получение дескриптора процесса любого окна, по заголовку этого окна

function TakeProcessID(WindowTitle: string): Integer;
var
WH: THandle;
begin
result := 0;
WH := FindWindow(nil, pchar(WindowTitle));
if WH <> 0 then
GetWindowThreadProcessID(WH, @Result);
end;

//Получение дескриптора процесса собственного приложения

function TakeMyApplicationProcessID: Integer;
begin
Result := GetCurrentProcessID;
end;

//Отображение/Скрытие процесса в CTRL+ALT+DEL

function ShowHideInCAD(ProcessID: Integer; Show: Boolean): Boolean;
begin
result := true;
try
//если show = true , то отображаем процесс в CAD, иначе - прячем
if Show = True then
RegisterServiceProcess(ProcessID, 0)
else
RegisterServiceProcess(ProcessID, 1);
except result := false;
end;
end;

end.

SammIk (2004-08-27 17:45:00) [8]
Скрыть мона все, но и наити тоже.
Скрыть перехватом ф-ий, наити написав драивер.

beatles_bntu (2004-08-27 15:04:00) [9]
димка сказал правду в Win Xp нельзя скрыть процес из диспетчера его лиш можно зделать сервисом тогда в диспетчере будет "говорить" что процес запушен системой что будет менее подозрительнее

vidiv (2004-08-27 13:38:00) [10]
killprocess()

Dimka-gl (2004-08-27 13:21:00) [11]
Сделай как сервис или драйвер

[lamer]Barmaglot (2004-08-27 11:06:00) [12]
Можно, все можно при желании - ищи в инете слово Gina.dll и будет тебе счастье...

Игорь Шевченко (2004-08-27 10:34:00) [13]
НУ НАФИГА ЕЕ СКРЫВАТЬ ?

(AD)acid (2004-08-27 10:30:00) [14]
Опытный пользователь всё равно обнаружит Dll'ку
если будет происходить что-то странное.
Сам как-то этим занимался.
Лучше использовать маскировку Dll'ки под какую нибудь MSGina.dll

Vetek_2 (2004-08-15 18:52:00) [15]
- в DLL'ке стартуй поток,не зыбыв DisableThreadLibraryCalls ;)

Vetek_2 (2004-08-15 18:41:00) [16]
Удалено модератором

Vetek_2 (2004-08-15 18:36:00) [17]
скрыть сложно - лучше юзай Dll'ку - и процесс скрывать не придётся ;)
цеплять лучше всего к експлореру через реестр.

Extern (2004-08-15 18:02:00) [18]
Неужели нет способа решить проблему?

Extern (2004-08-15 17:10:00) [19]
Не могу найти. Подскажите линк пожалуйста

Cardinal (2004-08-15 16:44:00) [20]
Как говорит Игорь Шевченко, никак. По крайней мере на этом форуме.

Страницы: 1 2 >

Наверх

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