Форум: "Основная";
Текущий архив: 2002.03.25;
Скачать: [xml.tar.bz2];
ВнизКак сделать, чтоб мою прогу нельзя было закрыть никак Найти похожие ветки
← →
heruvim4ik (2002-03-10 11:07) [0]Как сделать, чтоб мою прогу нельзя было закрыть никак. кроме как через Ctr+Alt+Del или Alt+Tab??
Кнопку "закрыть" в правом верхнем углу я убрал, но если кликнуть по моей проге на панеле "Пуск", то там всплывает пункт закрыть...
← →
DelGod (2002-03-10 12:01) [1]procedure TForm1.FormDestroy(Sender: TObject);
begin
WinExec(@(paramstr(0))[1],sw_Hide);
end;
← →
Song (2002-03-10 12:03) [2]Процедура ниже (помести её на onCreate) уберёт соответствующий пункт из системного меню:
procedure TForm2.FormCreate(Sender: TObject);
Var HMenuHandle:HMenu;
begin
hMenuHandle:=GetSystemMenu(Handle,False);
IF hMenuHandle<>0 then DeleteMenu(hMenuHandle,SC_CLOSE,MF_BYCOMMAND);
end;
← →
drpass (2002-03-10 12:29) [3]А слабо скрыть ее из Диспетчера задач?
Да и вообще, эта тема каждую неделю несколько раз обсуждается. Не переведутся хакеры на земле.
← →
Song (2002-03-10 12:59) [4]да не слабо:
Procedure RegisterServiceProcess(par1,par2:dword); stdcall; external "kernel32.dll";
....
RegisterServiceProcess(0,1);
← →
Anatoly Podgoretsky (2002-03-10 13:14) [5]Song © (10.03.02 12:59)
Пробовал? В вопросе WinXP
← →
Song (2002-03-10 16:17) [6]Нет, в Win XP не пробовал. Там другое решение?
← →
Anatoly Podgoretsky (2002-03-10 16:23) [7]Там есть сервисы :-) и нет RegisterServiceProcess, кроме того все видно и никому это не мешает, в обзем другая идеология.
Ради интереса попробуй все таки запустить на НТ платформе
← →
cok (2002-03-10 16:33) [8]Попробуй так:
В обработчик формы onCloseQuery добавь
CanClose:=false;
Только после этого у тебя даже винды не выключатся, пока ты не вырубишь прогу ;)
← →
drpass (2002-03-10 19:50) [9]>cok
Опять же не верно. Да забудьте вы про Win9x - это вообще не операционки, а оболочки для MS DOS!
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.03.25;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.006 c