截图API函数
发布网友
共3个回答
热心网友
我写过一个VB写的截图软件,自定义矩形截取特定区域,需要的话把你的邮箱告诉我,我发源码给你.
主要的API:
Public Const PM_REMOVE = &H1
' 鼠标相关消息
Public Const WM_MOUSEFIRST = &H200
Public Const WM_MOUSELAST = &H209
Public Const WM_RBUTTONDOWN = &H204
Public Const WM_LBUTTONDOWN = &H201
Public Const WM_RBUTTONUP = &H205
Public Const WM_LBUTTONUP = &H202
Public Const WM_MOUSEMOVE = &H200
' BitBlt 函数常量
Public Const SRCCOPY = &HCC0020
Public Const SRCINVERT = &H660046
' PatBlt 函数常量
Public Const DINV = 3
Public Const DSTINVERT = &H550009
Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
Type POINTAPI
x As Long
y As Long
End Type
Type Size
cx As Long
cy As Long
End Type
Type msg
hwnd As Long
message As Long
wParam As Long
lParam As Long
time As Long
pt As POINTAPI
End Type
'Windows 关于消息的函数
Declare Function PeekMessage Lib "user32" Alias "PeekMessageA" _
(lpMsg As msg, ByVal hwnd As Long, _
ByVal wMsgFilterMin As Long, _
ByVal wMsgFilterMax As Long, _
ByVal wRemoveMsg As Long _
) As Long
Declare Function WaitMessage Lib "user32" () As Long
Declare Function TranslateMessage Lib "user32" (lpMsg As msg) As Long
Declare Function DispatchMessage Lib "user32" Alias "DispatchMessageA" _
(lpMsg As msg) As Long
Declare Function PostMessage Lib "user32" Alias "PostMessageA" _
(ByVal hwnd As Long, _
ByVal wMsg As Long, _
ByVal wParam As Long, _
ByVal lParam As Long _
) As Long
'鼠标捕捉函数
Declare Function SetCapture Lib "user32" (ByVal hwnd As Long) As Long
Declare Function ReleaseCapture Lib "user32" () As Long
Declare Function GetCapture Lib "user32" () As Long
Declare Function DeleteDC Lib "gdi32" (ByVal hdc As Long) As Long
Declare Function DeleteObject Lib "gdi32" _
(ByVal hObject As Long) As Long
Declare Function GetTextExtentPoint32 Lib "gdi32" Alias "GetTextExtentPoint32A" _
(ByVal hdc As Long, _
ByVal lpszString As String, _
ByVal cbString As Long, _
lpSize As Size _
) As Long
Declare Function IsRectEmpty Lib "user32" (lpRect As RECT) As Long
Declare Function PatBlt Lib "gdi32" _
(ByVal hdc As Long, _
ByVal x As Long, ByVal y As Long, _
ByVal nWidth As Long, _
ByVal nHeight As Long, _
ByVal dwRop As Long _
) As Long
Declare Function Rectangle Lib "gdi32" _
(ByVal hdc As Long, _
ByVal X1 As Long, ByVal Y1 As Long, _
ByVal X2 As Long, ByVal Y2 As Long _
) As Long
Declare Function ScreenToClient Lib "user32" _
(ByVal hwnd As Long, _
lpPoint As POINTAPI _
) As Long
Declare Function SelectObject Lib "gdi32" _
(ByVal hdc As Long, _
ByVal hObject As Long _
) As Long
Declare Function TextOut Lib "gdi32" Alias "TextOutA" _
(ByVal hdc As Long, _
ByVal x As Long, ByVal y As Long, _
ByVal lpString As String, _
ByVal nCount As Long _
) As Long
Declare Function SetTextColor Lib "gdi32" _
(ByVal hdc As Long, _
ByVal crColor As Long _
) As Long
Declare Function SetBkColor Lib "gdi32" _
(ByVal hdc As Long, _
ByVal crColor As Long _
) As Long
Declare Function SetForegroundWindow Lib "user32" _
(ByVal hwnd As Long) As Long
Declare Function UpdateWindow Lib "user32" (ByVal hwnd As Long) As Long
Declare Function WindowFromPoint Lib "user32" _
(ByVal xPoint As Long, _
ByVal yPoint As Long _
) As Long
Declare Function BitBlt Lib "gdi32" _
(ByVal hDestDC As Long, _
ByVal x As Long, _
ByVal y As Long, _
ByVal nWidth As Long, _
ByVal nHeight As Long, _
ByVal hSrcDC As Long, _
ByVal xSrc As Long, _
ByVal ySrc As Long, _
ByVal dwRop As Long _
) As Long
Declare Function CreateDCNull Lib "gdi32" Alias "CreateDCA" _
(ByVal lpDriverName As String, _
ByVal lpDeviceName As String, _
ByVal lpOutput As String, _
ByVal lpInitData As Long _
) As Long
Declare Function ReleaseDC Lib "user32" _
(ByVal hwnd As Long, _
ByVal hdc As Long _
) As Long
Declare Function GetDeviceCaps Lib "gdi32" _
(ByVal hdc As Long, _
ByVal nIndex As Long _
) As Long
Declare Function CreateBitmap Lib "gdi32" _
(ByVal nWidth As Long, _
ByVal nHeight As Long, _
ByVal nPlanes As Long, _
ByVal nBitCount As Long, _
lpBits As Any _
) As Long
Declare Function ClientToScreen Lib "user32" _
(ByVal hwnd As Long, _
lpPoint As POINTAPI _
) As Long
Declare Function CreateCompatibleDC Lib "gdi32" _
(ByVal hdc As Long) As Long
Declare Function OpenClipboard Lib "user32" _
(ByVal hwnd As Long) As Long
Declare Function EmptyClipboard Lib "user32" () As Long
Declare Function SetClipboardData Lib "user32" _
(ByVal wFormat As Long, _
ByVal hMem As Long _
) As Long
Declare Function CreateDC Lib "gdi32" Alias "CreateDCA" _
(ByVal lpDriverName As String, _
ByVal lpDeviceName As String, _
ByVal lpOutput As String, _
lpInitData As Long _
) As Long
Declare Function CreateCompatibleBitmap Lib "gdi32" _
(ByVal hdc As Long, _
ByVal nWidth As Long, _
ByVal nHeight As Long _
) As Long
Declare Function CloseClipboard Lib "user32" () As Long
热心网友
操作系统除了协调应用程序的执行、内存分配、系统资源管理外，同时也是一个很大的服务中心，调用这个服务中心的各种服务（每一种服务是一个函数），可以帮助应用程序达到开启视窗、描绘图形、使用周边设备的目的，由于这些函数服务的对象是应用程序(Application),所以称之为Application Programming Interface，简称API函数。
解释：
作为一个编程初学者来说，API函数也许是一个时常耳闻却感觉有些神秘的东西。单看它复杂的语法，就足令人望而生畏，但是任何事物在我们深入了解它之前，总是会有这种感觉的。我们这篇API入门教程的目的，就是要把API函数的来龙去脉告诉大家，破除对API函数的畏惧，使它成为我们编程的好助手。
FOXAPI是什么
Foxapi 是一个针对开发者提供一些预先定义的接口，通过该接口开发者可以获取到相应的数据信息，方便开发者调用数据，从而间接减少代码编写。
FOXAPI何时使用
Foxapi 何时使用?当开发者遇到数据查询时，如：天气预报、股票信息、网站数据等查询时，就可以使用到它，它将会以预先设置好的格式展示出来。
为什么使用FOXAPI
Foxapi 为什么使用?使用它将会：减少服务器检索数据负担、减少编码检索数据的代码、缩减检索数据流程等等，使开发者更加快捷的查询各种数据。
热心网友
一般的截图函数都是只能对静态图片进行截取，无法对视频之类的进行截取。
