获取桌面窗口图象

2016-02-19 18:11 9 1 收藏

图老师设计创意栏目是一个分享最好最实用的教程的社区,我们拥有最用心的各种教程,今天就给大家分享获取桌面窗口图象的教程,热爱PS的朋友们快点看过来吧!

【 tulaoshi.com - 编程语言 】

Windows提供了一个API函数GetDesktopWindow,该函数返回桌面窗口的设备描述。因此利用它就可以轻松获取桌面窗口的图象。
  参见下例:
  步骤1----建立新工程。
  步骤2----编写如下代码:
  
  PrivateDeclareFunctionGetDesktopWindowLib"user32"()AsLong
  PrivateDeclareFunctionGetDCLib"user32"(ByValhwndAsLong)_
  AsLong
  PrivateDeclareFunctionBitBltLib"gdi32"_
  (ByValhDestDCAsLong,ByValxAsLong,_
  ByValyAsLong,ByValnWidthAsLong,_
  ByValnHeightAsLong,ByValhSrcDCAsLong,_
  ByValxSrcAsLong,ByValySrcAsLong,_
  ByValdwRopAsLong)AsLong
  
  PrivateSubForm_Load()
  DimlDesktopAsLong
  DimlDCAsLong
  
  Form1.AutoRedraw=True
  Form1.ScaleMode=1
  lDesktop=GetDesktopWindow()
  lDC=GetDC(lDesktop)
  BitBltMe.hDC,0,0,Screen.Width,Screen.Height,lDC,_
  0,0,vbSrcCopy
  EndSub
  
  步骤3----编译运行,看看大功告成了吧!->

来源:http://www.tulaoshi.com/n/20160219/1616977.html

延伸阅读
  (五)TMainForm的事件和函数 和 TPrinter打印应用 ////////// 打印知识 [菜单项file打印] 事件: procedure TMainForm.filePrintItemClick(Sender: TObject); begin   {kh1}print;{kh2}   Screen.Cursor := crHourglass;   try     if MDIChildCount0 then ...
标签: Web开发
script defer function browser.onclick(){ var nW = window.open("","","width=170,height=200"); nW.moveTo(300,100); nW.document.write("script defer\r"+ "var m=true;\r"+ "function insert.onclick(){\r"+ "if(m){\r"+ "opener.atext.value=btext.value;\rm=false;"+ "}else{\r"+ "opener.atext.value+='\-'+btext.value;\r"+ "}\r}\r"+ ...
标签: Web开发
SCRIPT language=JAVASCRIPTfunction fade_in(){if (test.filters.alpha.opacity 100){test.filters.alpha.opacity += 10;clearTimeout(timer);var timer = setTimeout("fade_in()",150);timer;}}/SCRIPT
  创建一个新的Form3,保存为Capture3.pas。设置属性BorderIcons的四个属性为false. BorderStyle设为bsNone,FormStyle设为fsStayOnTop. 一个私有变量:fDragging:Boolean; 两个公共变量:fRect:TRect,fBmp:TBitmap; unit Capture3; interface uses   Windows, Messages, SysUtils, Varia...
标签: PS PS教程
    制作图象边缘的虚化效果有很多种方法,一般我们常使用的就是先把需要的区域选中,然后用羽化命令来制作,但是使用这种方法的缺点就是如果要调整到满意的效果的话,需要不段的试用不同的羽化的数值,比较麻烦,但如果使用图层蒙板来制作的话就比较简单,所见即所得。     1、首先我们将图片打...

经验教程

154

收藏

100
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部