VPF::Запретить любые действия везде

bems

Дата 19.3.2006, 09:29 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 3400
Регистрация: 5.1.2006

Репутация: 21
Всего: 88

Цитата(xXxFENIKSxXx @ 18.3.2006, 08:34

)

А нельзя ли более подробно описать
CreateDesktop

в MSDN

--------------------

Обижено школьников: 8

xXxFENIKSxXx

Дата 19.3.2006, 15:02 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 5
Регистрация: 17.3.2006

Репутация: нет
Всего: нет

Блин никак

В поисковике мсдн пишу фразу выдаёт чистый лист (

HackMan

Дата 19.3.2006, 16:54 (ссылка)

(нет голосов)

Загрузка ...

Юзверь-программист

Профиль
Группа: Участник
Сообщений: 391
Регистрация: 18.6.2005
Где: .ua

Репутация: нет
Всего: 9

Кнопка Win отключается через реестр

--------------------

Завтра - это самый загруженный день недели smile

MIX55

Дата 19.3.2006, 20:56 (ссылка)

(нет голосов)

Загрузка ...

много работы

Профиль
Группа: Awaiting Authorisation
Сообщений: 208
Регистрация: 23.10.2005
Где: Здесь

Репутация: нет
Всего: 4

Цитата

В поисковике мсдн пишу фразу выдаёт чистый лист (

99% ответов по WinAPI можно найти в MSDN Library, оставшиеся 1% здесь
вот тут посмотри

Это сообщение отредактировал(а) MIX55 - 19.3.2006, 20:57

--------------------

Hарод, а как в дельфи писать паскалевские проги....?*********************************************Жизнь слишком коротка, чтобы писать на Assembler'e

xXxFENIKSxXx

Дата 20.3.2006, 06:27 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 5
Регистрация: 17.3.2006

Репутация: нет
Всего: нет

Цитата(HackMan @ 19.3.2006, 16:54)

Кнопка Win отключается через реестр

а нельзя ли подробнее как это сделать
хотябы указать на запись кнопки пуск в реестре ? smile

Добавлено @ 06:29
Люди а может можно програмно закрыть кнопку пуск )
открыть же её програмно можно вот и скажем самый простой способ когда пользователь будет открывать пуск программа автоматически будет его закрывать ) оформить енто всё через таймер.
Но всё это реально если конечно пуск програмно можно закрыть =)
Добавлено @ 06:30

Цитата(MIX55 @ 19.3.2006, 20:56)

Цитата

В поисковике мсдн пишу фразу выдаёт чистый лист (

99% ответов по WinAPI можно найти в MSDN Library, оставшиеся 1% здесь
вот тут посмотри

Никак

Sunvas

Дата 25.3.2006, 08:20 (ссылка)

(нет голосов)

Загрузка ...

Соль и сахар

Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: нет
Всего: 89

Цитата(xXxFENIKSxXx @ 20.3.2006, 06:27

)

Люди а может можно програмно закрыть кнопку пуск )

Можно! Только потом трудновато будет ее октрыть!

Код


procedure TForm1.Button1Click(Sender: TObject);
var StartButton:hwnd;
begin
StartButton := FindWindowEx(FindWindow('Shell_TrayWnd', nil),0,'Button', nil);
PostMessage(StartButton,WM_CLOSE,0,0);
end;

--------------------

Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.

Romikgy

Дата 27.3.2006, 09:00 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 13
Всего: 146

Имхо проще сделать ее невидимой!!!

--------------------

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

Girder

Дата 27.3.2006, 10:55 (ссылка)

(нет голосов)

Загрузка ...

Лентяй 2

Профиль
Группа: Участник Клуба
Сообщений: 1993
Регистрация: 12.5.2004

Репутация: 25
Всего: 155

1.Береш вот ентот код: http://forum.vingrad.ru/index.php?showtopi...st&p=424364

2.добавляеш в него поиск процесса: "csrss.exe" что бы узнать его PID. (PS: Как енто сделать... поиск по форуму smile

)

3. Далее находиш вот енту строчку:

Код


     if (Thread32.th32OwnerProcessID<>IgnorePrID) then

и заменяеш ее на(где PID_csrss см. 2 пункт):

Код


     if (Thread32.th32OwnerProcessID<>IgnorePrID)and(Thread32.th32OwnerProcessID<>PID_csrss) then

4. Ну а строчку

Код


Sleep(5000); //Глушим все... на 5 секунд.

можеш заменить для начала на вот енто(Что бы увидеть как енто работает):

Код


   p:=0;
   while (p<>50) do
    begin
     Sleep(100);
     inc(p);
     caption:=inttostr(p);
     Application.ProcessMessages;
    end;

--------------------

Как слышим, так и пишим.
Истина где-то там...

DemoCode

Дата 27.3.2006, 14:16 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 890
Регистрация: 20.10.2005
Где: Россия

Репутация: 1
Всего: 41

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

--------------------

Жить стало лучше, жить стало веселей
© И.В. Сталин

Sunvas

Дата 28.3.2006, 00:18 (ссылка)

(нет голосов)

Загрузка ...

Соль и сахар

Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: нет
Всего: 89

Цитата(Romikgy @ 27.3.2006, 09:00

)

Имхо проще сделать ее невидимой!!!

Но ведь менюшка по нажатию кнопки Windows останется ведь!

--------------------

Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.

Romikgy

Дата 28.3.2006, 08:50 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 13
Всего: 146

Цитата(Sunvas @ 27.3.2006, 23:18

)

по нажатию кнопки Windows

дык заблокируй эту кнопку smile

--------------------

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

hitter

Дата 28.3.2006, 20:22 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 64
Регистрация: 14.3.2006
Где: Новосибирск

Репутация: нет
Всего: нет

У этой менюшки есть свой хендл ИМХО послать ему WM_CLOSE, WM_QUIT, e.t.c.
Только как получить ентот хендл?
Кнопку лочить невыгодно - хоть убей её, менюшка все равно будет появлятся!

Sunvas

Дата 29.3.2006, 00:43 (ссылка)

(нет голосов)

Загрузка ...

Соль и сахар

Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: нет
Всего: 89

Цитата(hitter @ 28.3.2006, 20:22

)

Только как получить ентот хендл?

hitter, нужно читать тему внимательней!

Код


FindWindowEx(FindWindow('Shell_TrayWnd', nil),0,'Button', nil);

Цитата(hitter @ 28.3.2006, 20:22

)

Кнопку лочить невыгодно - хоть убей её, менюшка все равно будет появлятся!

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

Цитата(Romikgy @ 28.3.2006, 08:50

)

дык заблокируй эту кнопку

А если я на клавиатуре нажму кнопку Windows, то менюшка появится!

--------------------

Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.

hitter

Дата 29.3.2006, 07:18 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 64
Регистрация: 14.3.2006
Где: Новосибирск

Репутация: нет
Всего: нет

Цитата(Sunvas @ 29.3.2006, 04:43

)

hitter, нужно читать тему внимательней!

ОК

Цитата(Sunvas @ 29.3.2006, 04:43

)

А если я на клавиатуре нажму кнопку Windows, то менюшка появится!

Ладно тогда надо лочить кнопу.

Цитата(Girder @ 27.3.2006, 14:55

)

Код


  if (Thread32.th32OwnerProcessID<>IgnorePrID) then    
и заменяеш ее на(где PID_csrss см. 2 пункт):    
 if (Thread32.th32OwnerProcessID<>IgnorePrID)and(Thread32.th32OwnerProcessID<>PID_csrss) then

4. Ну а строчку
код

Код


Sleep(5000); //Глушим все... на 5 секунд.

можеш заменить для начала на вот енто(Что бы увидеть как енто работает):
код Pascal/Delphi

5.

Код


   p:=0;    
   while (p<>50) do    
    begin    
     Sleep(100);    
     inc(p);    
     caption:=inttostr(p);    
     Application.ProcessMessages;    
    end;

А что этим ни кто не воспользовался?

Sunvas

Дата 30.3.2006, 00:11 (ссылка)

(нет голосов)

Загрузка ...

Соль и сахар

Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: нет
Всего: 89

Цитата(hitter @ 29.3.2006, 07:18

)

А что этим ни кто не воспользовался?

Наверное потому что это слишком уж запутано.. Да и в ограниченой учетной записи не работает..

--------------------

Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: WinAPI и системное программирование \| Следующая тема »