Отключить Ctrl+Alt+Delete
Если вы хотите зло подшутить над глупым пользователем, а он оказывается не такой уж и глупый, и в наглую пытается снять задачу с вашей проги, то вы можете его круто обломать - отключив сочетание клавиш Ctrl+Alt+Delete:
Например, у нас есть две кнопки (назовёт их Disablebtn & Enablebtn):
//Отключить
procedure TForm1.DisablebtnClick(Sender: TObject);
var
b: boolean;
begin
b := false;
SystemParametersInfo(SPI_SCREENSAVERRUNNING, 1, @b, 0);
end;
//Включить
procedure TForm1.EnablebtnClick(Sender: TObject);
var
b: boolean;
begin
b := false;
SystemParametersInfo(SPI_SCREENSAVERRUNNING, 0, @b, 0);
end;
|
|
|
|
|
Заказ микроавтобусов Спринтер - аренда автобуса. Автобус на Новый Год 800руб/час. . Ломбард 24 часа. выгодные условия - часовой ломбард. Все часовые ломбарды Москвы. . Коврики на Avito - коврики автомобильные текстильные. . Бланки, регистрация ип. Схеме происходит регистрация ип. . |
