Home

Page 35
Page 35
background image

28 Глава 1

Создайте новый проект в Delphi. Перенесите на форму одну только кнопку
и измените ее свойство

 на

 При нажатии

наше приложение будет прятаться. Теперь создайте обработчик события

onclick для этой кнопки и там напишите:
procedure
begin

end;

Здесь использована уже знакомая функция ShowWindow. Как я уже говорил,
эта процедура выводит окно. В качестве второго параметра процедуре в обо-
их случаях передается значение

 SW_HIDE,

 которое заставляет делать окно не-

видимым. При первом вызове процедуры в качестве первого параметра ука-

зано Handle — свойство, в котором хранится указатель текущего (в данном

случае главного) окна, чтобы сделать его невидимым.

При втором вызове указано

 — указатель всего приложе-

ния. Теперь приложение становится абсолютно невидимым. Точнее сказать,

видимым, но только на вкладке Процессы в окне Диспетчер задач

Как я уже говорил, большинство пользователей никогда не заглядывает на

эту вкладку, потому что разобраться там в чем-то очень тяжело. Достаточно

дать вашей программе какое-нибудь наименее вызывающее имя, и она ста-

нет абсолютно незаметной.

Тут же вспоминается случай, когда несколько лет назад я написал своего

первого трояна, с помощью которого подшучивал над своим начальником.

Я приблизительно таким же образом спрятал программу и дал ей название

internat32.exe. В системе Windows 95/98 есть такой сервис, как internat.exe, и

он присутствует всегда. Именно поэтому появление нового сервиса

internat32 ни у кого не вызвало подозрений. Мой начальник долго искал
причину, по которой на его компьютере исчезает звук и сам компьютер пе-

регружается, но ничего не нашел. Его компьютер даже рассматривали ком-

пьютерщики нашей фирмы, и даже они ничего не нашли. Просто никто не

обращал внимания на такой неприглядно названный файл.

На компакт-диске в директории \Примеры\Глава l\Hide App\ вы можете

увидеть исходник этого примера.

1.5. Оптимизация программ

Вся наша жизнь — это борьба с тормозами и нехваткой времени. Каждый

день мы тратим по несколько часов на оптимизацию. Каждый из нас старает-

ся оптимизировать все, что попадает под руку. А вы уверены, что вы это де-

лаете правильно? Может быть, есть возможность что-то сделать еще лучше?


Copyright © 2020 Файлообменник files.d-lan.dp.ua

Использование любых материалов сайта возможно только с разрешения автора.