Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.11.04;
Скачать: CL | DM;

Вниз

Запуск программ   Найти похожие ветки 

 
O.O   (2007-10-10 07:12) [0]

Как во время работы программы запретить запускать любые другие приложения? Например спрятать панель задач и меню Пуск, рабочий стол сделать недоступным или как ещё?


 
Alarm ©   (2007-10-10 09:09) [1]

Например спрятать панель задач и меню Пуск:

procedure TForm1.Button1Click(Sender: TObject);
Var hTaskBar : THandle;
begin
hTaskbar := FindWindow("Shell_TrayWnd", Nil);
ShowWindow(hTaskBar, SW_HIDE);
end;

рабочий стол сделать недоступным:

procedure ShowDesktop(const YesNo : boolean);
var h : THandle;
begin
h := FindWindow("ProgMan", nil);
h := GetWindow(h, GW_CHILD);
if YesNo = True then
  ShowWindow(h, SW_SHOW)
else
  ShowWindow(h, SW_HIDE);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
ShowDesktop(False);
end;


 
Leonid Troyanovsky ©   (2007-10-10 09:22) [2]


> O.O   (10.10.07 07:12)  

> Пуск, рабочий стол сделать недоступным или как ещё?

Выпусти свое приложение на отдельный десктоп.

--
Regards, LVT.


 
O.O   (2007-10-10 09:35) [3]

Спасибо за ответы, буду пробовать


 
clickmaker ©   (2007-10-10 10:20) [4]


> [1] Alarm ©   (10.10.07 09:09)

от Ctrl+Alt+Del - Task manager - Run не спасет ведь


 
O.O   (2007-10-10 11:05) [5]


> Alarm ©   (10.10.07 09:09) [1]

Всё отлично сработало, спасибо!

> clickmaker ©   (10.10.07 10:20) [4]

Это уже другой вопрос, в моём случае это никак не помешает


 
Alarm ©   (2007-10-10 11:11) [6]

>clickmaker ©   (10.10.07 10:20) [4]

Ctrl+Alt+Del можно заблокировать другими способами, а

Run не спасет ведь, решается блокированием клавиши "Win"


 
Leonid Troyanovsky ©   (2007-10-10 11:21) [7]


> Alarm ©   (10.10.07 11:11) [6]

Заблуждения.

--
Regards, LVT.


 
Маша Шрайбер ©   (2007-10-10 11:28) [8]

>> Alarm ©   (10.10.07 09:09) [1]
>> if YesNo = True then

Это так принято у крутых прогеров, умеющих скрывать десктоп?
)))


 
Alarm ©   (2007-10-10 11:28) [9]

>Leonid Troyanovsky ©   (10.10.07 11:21) [7]
А в чем конкретно заблуждения (если не затруднит)?


 
Leonid Troyanovsky ©   (2007-10-10 11:33) [10]


> Alarm ©   (10.10.07 11:28) [9]

> А в чем конкретно заблуждения (если не затруднит)?

Конкретно в [6],
оба утверждения порождены заблуждениями.

--
Regards, LVT.


 
Alarm ©   (2007-10-10 11:42) [11]

>Leonid Troyanovsky ©   (10.10.07 11:33) [10]

Очень смелые и уверенные утверждения (но, к сожалению бездоказательные). Ну, если по поводу Ctrl+Alt+Del в данный момент я пожалуй промолчу, то по блокировке клавиши "Win" - заблуждается Leonid Troyanovsky ©.


 
Leonid Troyanovsky ©   (2007-10-10 11:51) [12]


> Alarm ©   (10.10.07 11:42) [11]

> промолчу, то по блокировке клавиши "Win" - заблуждается

taskmgr, пункт меню File - New.
При чем тут Win?

--
Regards, LVT.



Страницы: 1 вся ветка

Текущий архив: 2007.11.04;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.212 c
2-1192005087
kyn66
2007-10-10 12:31
2007.11.04
Полуошибка ???


15-1190833172
Ricks
2007-09-26 22:59
2007.11.04
Новый компьютер -> новые возможности -> новые проблемы


2-1191973448
Friz
2007-10-10 03:44
2007.11.04
Небольшой вопросик.


15-1191658605
Суслик
2007-10-06 12:16
2007.11.04
Вирусы и защита от них - а надо оно?


2-1192294044
Антон Шестаков
2007-10-13 20:47
2007.11.04
Привязать чужое приложение к своему