www.2003.com怎样屏蔽或打开windows里的快捷键

2019-11-13 作者:计算机教程   |   浏览(151)

打开
var
  Dummy: Integer;
begin
  SystemParametersInfo( SPI_SETFASTTASKSWITCH, 0, @Dummy, 0);
  SystemParametersInfo( SPI_SCREENSAVERRUNNING, 0, @Dummy, 0);
end;

第三种:要引用ShellAPI单元

http://www.bkjia.com/Delphijc/530986.htmlwww.bkjia.comtruehttp://www.bkjia.com/Delphijc/530986.htmlTechArticle屏蔽 var Dummy: Integer; begin SystemParametersInfo( SPI_SETFASTTASKSWITCH, 1, @Dummy, 0); SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @Dummy, 0); end; 打开 var Dummy: Int...

第一种:需要引用Windows单元

屏蔽
var
  Dummy: Integer;
begin
  SystemParametersInfo( SPI_SETFASTTASKSWITCH, 1, @Dummy, 0);
  SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @Dummy, 0);
end;

  1. function GetSystemTaskBarHeight:Integer;  
  2. var  
  3.   R:TRect;  
  4. begin  
  5.   SystemParametersInfo(SPI_www.2003.com,GETWORKAREA,0,@R,0);  
  6.   Result:=Screen.Height-R.Bottom;  
  7. end;  

 

 

http://blog.csdn.net/chaijunkun/article/details/5577285

 

[delphi] view plain copy

  1. ShowMessage(IntToStr(GetSystemMetrics(SM_CYSCREEN)-GetSystemMetrics(SM_CYFULLSCREEN)-GetSystemMetrics(SM_CYCAPTION)));  

 

 

本文由www.2003.com发布于计算机教程,转载请注明出处:www.2003.com怎样屏蔽或打开windows里的快捷键

关键词: