|
Если вы хотите зло подшутить над глупым пользователем, а он оказывается не такой уж и глупый, и в наглую пытается снять задачу с вашей проги, то вы можете его круто обломать - отключив сочетание клавиш Ctrl+Alt+Delete: (только под Win98\ME)
Например, у нас есть две кнопки (назовёт их 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;
Предыдущий вопрос
|
|
Следующий вопрос
by ktima
|
