Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Программная инженерия > Безопасность, Шифрование
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 16.12.2007, 06:25   #1
SaddaS
Пользователь
 
Аватар для SaddaS
 
Регистрация: 16.12.2007
Сообщений: 10
Вопрос Прога - шутка, Спрятать от глаз юзера прогу...

Здрасти , проблемма такая: Надо спрятать прогу от глаз юзера, с помощью этого «ShowWindow(Application.Handle, sw_Hide);» убираю из панели задач, а из Alt+Tab, не могу… Как то давно пробовал что то типа "Application.Minimize", забыл, и была проблемка с тем что после спрятанья прога, надо ее показать, а потом опять спрятать, а она не хочет...
SaddaS вне форума Ответить с цитированием
Старый 16.12.2007, 09:59   #2
Air
Участник клуба
 
Аватар для Air
 
Регистрация: 30.04.2007
Сообщений: 1,307
По умолчанию

Унифицированный код:

Это всё не в unit-е, а Project-е.
Код:
program Project1;
uses
Forms,Windows,Unit1 in 'Unit1.pas';
{$R *.res}
var e:integer;
begin
Application.Initialize;
e:=GetWindowLong(application.Handle,GWL_EXSTYLE);
SetWindowLong(Application.Handle,GWL_EXSTYLE,e or WS_EX_TOOLWINDOW);
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
В unit-е:
visible:=false;
<лучше всего вызывать из таймера>

Управлять формой:
form1.Hide; // спрятать
form1.Show; // показать
Всё гениальное - просто!

Последний раз редактировалось zetrix; 16.12.2007 в 10:09. Причина: Теги CODE использовать надо.
Air вне форума Ответить с цитированием
Старый 16.12.2007, 10:48   #3
zAlexandrz
Пользователь
 
Аватар для zAlexandrz
 
Регистрация: 03.11.2007
Сообщений: 25
По умолчанию

чтоб Alt+Tab непоказывал, в настройка формы visible - false

Последний раз редактировалось zAlexandrz; 16.12.2007 в 10:58.
zAlexandrz вне форума Ответить с цитированием
Старый 16.12.2007, 13:53   #4
Air
Участник клуба
 
Аватар для Air
 
Регистрация: 30.04.2007
Сообщений: 1,307
По умолчанию

Именно.
Если проги в списке задач нет, то в принципе ни как на её форму не выйти.
Всё гениальное - просто!
Air вне форума Ответить с цитированием
Старый 16.12.2007, 17:04   #5
SunKnight
Участник клуба Подтвердите свой е-майл
 
Аватар для SunKnight
 
Регистрация: 14.12.2007
Сообщений: 1,434
По умолчанию

Все это расчитано на криворукого пользователя, а сли Юзер возмет и глянет во вкладку Процессы,
-"а-а-а-а!Шо за левый процесс тут сидит.А нука я его ша..ЗАВЕРШУ".
Проповедую design patterns, верую в MVC, доверяю eXtrime programming.
SunKnight вне форума Ответить с цитированием
Старый 16.12.2007, 19:45   #6
Air
Участник клуба
 
Аватар для Air
 
Регистрация: 30.04.2007
Сообщений: 1,307
По умолчанию

Да не глупи, назови прогу "svchost" или то что в системе часто "сидит",
а скрытие процессов из списка - это Ring0 (нулевое кольцо-пвамять процессора), это слишком сложно будет для тебя, попробуй заблокировать taskmgr.exe
Код:
fileopen('C:\windows\system32\taskmgr.exe',fmshareexclusive); // запрет
fileopen('C:\windows\system32\taskmgr.exe',fmShareExclusive); //разрешение
только Дисп. Зад. должен быть выгружен.
Если твоя прога закончит работу Дисп. Зад. освободится.
Всё гениальное - просто!

Последний раз редактировалось Air; 16.12.2007 в 19:47.
Air вне форума Ответить с цитированием
Старый 17.12.2007, 06:08   #7
SaddaS
Пользователь
 
Аватар для SaddaS
 
Регистрация: 16.12.2007
Сообщений: 10
По умолчанию

Цитата:
Сообщение от Air Посмотреть сообщение
Да не глупи, назови прогу "svchost" или то что в системе часто "сидит"....
Я так и делаю... Спасибо, попробую...
SaddaS вне форума Ответить с цитированием
Старый 17.12.2007, 11:26   #8
JTG
я получил эту роль
Старожил
 
Аватар для JTG
 
Регистрация: 25.05.2007
Сообщений: 3,694
По умолчанию

а я вот счастливый пользователь RkU...
пыщь
JTG вне форума Ответить с цитированием
Старый 17.12.2007, 11:39   #9
SaddaS
Пользователь
 
Аватар для SaddaS
 
Регистрация: 16.12.2007
Сообщений: 10
По умолчанию

Air спасибо.
Все работает, маленько попарился, и во ля...
Теперь у меня другая проблемка, пробую процесс убрать из деспетчера, не получается. Может кто знает? Или хотя бы в как собсвенный процесс своей проги переименовать?
SaddaS вне форума Ответить с цитированием
Старый 17.12.2007, 11:45   #10
SaddaS
Пользователь
 
Аватар для SaddaS
 
Регистрация: 16.12.2007
Сообщений: 10
По умолчанию

Цитата:
Сообщение от Air Посмотреть сообщение
Да не глупи, назови прогу "svchost" или то что в системе часто "сидит",
а скрытие процессов из списка - это Ring0 (нулевое кольцо-пвамять процессора), это слишком сложно будет для тебя, попробуй заблокировать taskmgr.exe
Код:
fileopen('C:\windows\system32\taskmgr.exe',fmshareexclusive); // запрет
fileopen('C:\windows\system32\taskmgr.exe',fmShareExclusive); //разрешение
кстати, тут ты попутал маленько... Как включить его обратно?
И еще одно, там возле темы написано "перенесено", куда перенесено? И зачем? И почему? Что это?

Последний раз редактировалось SaddaS; 17.12.2007 в 11:47.
SaddaS вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
как спрятать прогу на панели задач aesoem Общие вопросы Delphi 4 05.08.2008 17:47
Сокрытие процесса от глаз вездесущего препода! психопес Помощь студентам 3 15.05.2008 18:15
Помещение в автозапуск незаметно для юзера. lamonana Общие вопросы Delphi 1 09.03.2008 20:11
Папка юзера Kashp Общие вопросы Delphi 3 07.08.2007 12:25
Ваз 2110 - первоапрельская шутка :) Alar Свободное общение 15 02.04.2007 15:28