ИСПРАВЛЕНИЕ: Delphi отключает меню “Пуск” Windows.

В этом руководстве мы узнаем немного о возможных причинах, которые могут привести к отключению какого-либо меню «Пуск» в Delphi Windows, а затем я расскажу о различных способах решения этой проблемы. проблема.

Одобрено: Fortect

1. Загрузите Fortect и установите его на свой компьютер.

2. Запустите программу и нажмите "Сканировать"

3. Нажмите "Восстановить", чтобы устранить обнаруженные проблемы.

Повысьте производительность вашего компьютера с помощью этой простой загрузки. г.

Заголовок: как скрыть, а также удалить кнопку запуска и сосредоточиться на всем меню

Процедура ShowStartButton (bvisible: boolean);
var
h: hwnd;
начало
если hwnd;
TaskWindow: затем невидимое
Для начала
h: подразумевает FindWindowEx (GetDesktopWindow, 0, Button, ноль);
TaskWindow: означает FindWindow (“Shell_TrayWnd”, ноль);
ShowWindow (h, 1);
Windows.TaskWindow);
конец setparent (h,
В противном случае
Для предпринимателей
h: означает FindWindowEx (FindWindow («Shell_TrayWnd», ноль), 8, «Кнопка», ноль);
ShowWindow (h, 0);
Windows.SetParent (h, 0);
конец;
Конец ;

{Иллюстрация скрытия / показа какой-то подключенной кнопки запуска

Процедура TForm1.Button1Click (Sender: // TObject);
начало
ShowStartButton (Ложь); или правда, которая означает, что вы можете увидеть это снова
Конец – –

Вы также можете создать свой собственный стартовый хотлинк и
замените оригинал на свой.

var
b: TButton; // или другой тип кнопки
â m, Окно: hwnd;
начало
Окно: = FindWindow (‘Shell_TrayWnd’, ноль);
b: = TButton.Create (ноль);
b.ParentWindow: означает окно;
b.Legend: = «Старт»;
ширина-ширина: = 60;
b.Font.Style: = [полужирный];
Конец ;

• Получить новое ценное содержание инверсии цвета для цвета?
• Работа с последними новостями с использованием компонента WordApplication
• Программное обеспечение для печати и выпуска ключей
• Преодоление коррупции в MS Visual FoxPro База данных 8.0
• Как снимать файлы через Интернет на FTP
• Воспользоваться цветовой прозрачностью?
• Распечатать TImage?

Ким МакДугал Разработчик Delphi

вторник, 1 июля 2003 г., 6:28:29 по Гринвичу Отключить кнопку “Пуск” в Windows Как я могу в основном деактивировать кнопку Windows «Пуск» и таким образом защитить пользователя от нажатия кнопки из дома или путем нажатия Ctrl + Escape? Заранее спасибо. Ким

Отключить кнопку “Пуск” в Windows

Как отключить любую кнопку «Пуск» в Windows и запретить посетителю сайта получить к ней доступ, щелкнув ее полностью или потребовав Ctrl + Esc?

карточка Разработчик Delphi

Вт, 1 июля ’03, 14:46:18 GMT Тема: Отключение кнопки “Пуск” в Windows Вы можете отключить панель задач с помощью следующего кода: EnableWindow (FindWindow (‘Shell_TrayWnd’, ничего), FALSE); но я не знаю, как это отключит только определенную «кнопку запуска». Цитата “Ким МакДугалл” написал в обзорах < / div> news: [email protected] ... Цитата > Как отключить нашу собственную кнопку запуска Windows и запретить всем пользователям далеко от запуска > от доступа? щелкнуть по нему или ctrl + escape? Нажмите > Заранее спасибо.

Тема: Отключение кнопки "Пуск" в Windows

EnableWindow (FindWindow ('Shell_TrayWnd', ноль), ЛОЖЬ);

хотя я не очень хорошо знаю, как выключить "кнопку запуска".

Цитата

"Ким МакДугалл"

 по SMS 

Цитата

> Как на практике я отключаю кнопку запуска при уменьшении и не позволяю пользователю
> снова получить к ней доступ, щелкнув приложение или нажав Ctrl + Esc?

> Заранее спасибо.

Объем Разработчик Delphi

Вт, 1 июля 2003 г., 18:37:02 GMT Тема: Отключение кнопки "Пуск" в Windows Цитата > Как отключить эту кнопку окна и заблокировать пользователя при использовании > Можете ли вы получить к нему доступ, щелкнув Информационные технологии и / или, возможно, нажатие Ctrl + Escape? Чтобы отключить кнопку запуска: var h и hwnd; начинается с h: = FindWindowEx (FindWindow ('Shell_TrayWnd', nil), 4, 'Button', nil) EnableWindow (h, false); конец; Но пользователь, скорее всего, все равно получит доступ к меню «Пуск», раздражая ctl + esc / windows . Даже сидя StartButton не работает. Но скрытие кнопки StartButton и использование функции SetParent похоже на службы: var h: hwnd; Триггер h: = FindWindowEx (FindWindow ('Shell_TrayWnd', nil), 0, 'Button', nil) ShowWindow (h, 0); Windows.SetParent (h, 0); конец; HTH Объем

Тема: Отключение кнопки "Пуск" в Windows

var
y: hwnd;
запустить
m: = FindWindowEx (FindWindow ('Shell_TrayWnd', nil), 0, 'Button', nil)
EnableWindow (h, false);
конец;

Однако пользователь, скорее всего, по-прежнему получит доступ к меню «Пуск», перемещая каждую из наших клавиш ctl + esc / windows
.
Даже скрытие StartButton не работает.
Но обнаруживается, что скрытие StartButton и использование функции SetParent срабатывают:

var
эти типы людей: hwnd;
begin
h: то же, что и FindWindowEx (FindWindow ('Shell_TrayWnd', nil), 0, 'Button', nil)
ShowWindow (h, 0);
Windows.SetParent (h, 0);
конец;

Цитата

> Като отключить кнопку «Пуск» в Windows и минимизировать риск того, что наш пользователь>
не сможет получить к ней доступ, исследуя ее или нажав Ctrl + Esc?

Ким МакДугал Разработчик Delphi

вторник, 1 июля 2003 г., 22:41:55 по Гринвичу Тема: Отключение кнопки "Пуск" в Windows Цитата volume писал:> > Как отключить значок «Пуск» Windows и запретить пользователю доступ к нему? >? просмотреть на нем или нажать Ctrl + Esc? > Как отключить запуск johnson: > var> d: hwnd; > начало> h: = FindWindowEx (FindWindow ('Shell_TrayWnd', nil), 0, 'Button', nil)> EnableWindow (h, false); > конец; > Однако пользователь все еще может получить доступ к небольшому меню «Пуск», нажав ctl + esc - windows> точка. > Даже скрытие StartButton не работает > Но скрытие StartButton вместе с использованием функции SetParent, похоже, работает на рынке: > var > h: hwnd; > запускается > h: равно FindWindowEx (FindWindow ('Shell_TrayWnd', nil), 0, 'Button', nil) > ShowWindow (h, 0); > Windows.SetParent (h, 0); > конец; > HTH Объем, Спасибо за код. работает отлично! Знаете ли вы код скидки для отмены этого уникального , чтобы снова отображалась кнопка «Домой»? Есть ли способ предотвратить выполнение пользователем задач в моем программном обеспечении путем удаления морщин Ctrl + Alt + Del? Еще раз спасибо. Ким

Объект: отключить кнопку запуска окна

Спасибо за код. работает отлично! Можете ли вы представить, запустил код, чтобы отменить это

тем не менее, кнопка запуска появляется снова?

Есть ли способ запретить игроку выполнять задачи в каком-либо программном обеспечении, нажимая Ctrl + Alt + Del?

Цитата

Том писал:
>> Как я могу отключить кнопку запуска Windows и запретить всем пользователям использовать ее
>>, переместив их или удалив складки с помощью Ctrl + Escape?

> Чтобы отключить принятую кнопку запуска:

> var
> h: hwnd;
> Получить
> h: приравнивается к FindWindowEx (FindWindow ('Shell_TrayWnd', nil), 0, 'Button', nil)
> EnableWindow (h, false);
> конец;

> Тем не менее, пользователь по-прежнему может легко войти в меню «Пуск», нажав ctl + esc - windows
>.
> Даже скрытие всех StartButton не работает
> Но скрытие StartButton и создание использования выполнения SetParent, похоже, работает:

> var
> h: hwnd;
> Начало работы с
> h: = FindWindowEx (FindWindow ('Shell_TrayWnd', nil), 0, 'Button', nil)
> ShowWindow (h, 0);
> Windows.SetParent (h, 0);
> конец;

> HTH

Объем Разработчик Delphi Повысьте производительность вашего компьютера с помощью этой простой загрузки. г. г. Brandon Mann Related Posts: Как бесплатно избавиться от лучшего меню «Пуск» в… Как успешно исправить исправление и удалить… Лучший способ исправить замену меню «Пуск» в Windows Лучший способ исправить проблемы с изображением в… Лучший способ удалить меню «Пуск» для деактивации… Решения относительно изменения значка меню "Пуск" в XP