易语言触摸屏源码

系统结构:WndProc,LOWORD,GetContactIndex,SetWindowLong,CallWindowProc,RegisterTouchWindow,UnregisterTouchWindow,GetTouchInputInfo,GetTouchInputInfo_数组,CloseTouchInputHandle,IsTouchWindow,LocalSize,ScreenToClient,BeginPaint,GetClientRect,CreateCompatibleDC,CreateCompatibleBitmap,SelectObject,FillRect,CreateSolidBrush,Ellipse,BitBlt,GetDC,ReleaseDC,EndPaint,DeleteDC,DeleteObject,GetVersion,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ WndProc
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ LOWORD
           |  |
           |  |------ GetContactIndex
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   SetWindowLong
           |  |
           |  |---[dll]------   CallWindowProc
           |  |
           |  |---[dll]------   RegisterTouchWindow
           |  |
           |  |---[dll]------   UnregisterTouchWindow
           |  |
           |  |---[dll]------   GetTouchInputInfo
           |  |
           |  |---[dll]------   GetTouchInputInfo_数组
           |  |
           |  |---[dll]------   CloseTouchInputHandle
           |  |
           |  |---[dll]------   IsTouchWindow
           |  |
           |  |---[dll]------   LocalSize
           |  |
           |  |---[dll]------   ScreenToClient
           |  |
           |  |---[dll]------   BeginPaint
           |  |
           |  |---[dll]------   GetClientRect
           |  |
           |  |---[dll]------   CreateCompatibleDC
           |  |
           |  |---[dll]------   CreateCompatibleBitmap
           |  |
           |  |---[dll]------   SelectObject
           |  |
           |  |---[dll]------   FillRect
           |  |
           |  |---[dll]------   CreateSolidBrush
           |  |
           |  |---[dll]------   Ellipse
           |  |
           |  |---[dll]------   BitBlt
           |  |
           |  |---[dll]------   GetDC
           |  |
           |  |---[dll]------   ReleaseDC
           |  |
           |  |---[dll]------   EndPaint
           |  |
           |  |---[dll]------   DeleteDC
           |  |
           |  |---[dll]------   DeleteObject
           |  |
           |  |---[dll]------   GetVersion

  

调用的DLL命令:

.DLL命令 SetWindowLong, 整数型, "user32", "SetWindowLongA"
    .参数 hwnd, 整数型
    .参数 nIndex, 整数型
    .参数 dwNewLong, 整数型

.DLL命令 CallWindowProc, 整数型, "user32", "CallWindowProcA"
    .参数 lpPrevWndFunc, 整数型
    .参数 hwnd, 整数型
    .参数 msg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型

.DLL命令 RegisterTouchWindow, 整数型, "user32", "RegisterTouchWindow"
    .参数 hWnd, 整数型
    .参数 ulFlags, 整数型

.DLL命令 UnregisterTouchWindow, 整数型, "user32", "UnregisterTouchWindow"
    .参数 hWnd, 整数型

.DLL命令 GetTouchInputInfo, 逻辑型, "user32", "GetTouchInputInfo"
    .参数 hTouchInput, 整数型
    .参数 cInputs, 整数型
    .参数 pInputs, TOUCHINPUT, 传址 数组
    .参数 cbSize, 整数型

.DLL命令 GetTouchInputInfo_数组, 整数型, "user32", "GetTouchInputInfo"
    .参数 hTouchInput, 整数型
    .参数 cInputs, 整数型
    .参数 pInputs, TOUCHINPUT, 传址 数组
    .参数 cbSize, 整数型

.DLL命令 CloseTouchInputHandle, 整数型, "user32", "CloseTouchInputHandle"
    .参数 hTouchInput, 整数型

.DLL命令 IsTouchWindow, 整数型, "user32", "IsTouchWindow"
    .参数 hWnd, 整数型
    .参数 pulFlags, 整数型, 传址

.DLL命令 LocalSize, 整数型, "kernel32", "LocalSize"
    .参数 hMem, TOUCHINPUT, 传址

.DLL命令 ScreenToClient, 整数型, "user32", "ScreenToClient"
    .参数 hwnd, 整数型
    .参数 lpPoint, POINT

.DLL命令 BeginPaint, 整数型, "user32", "BeginPaint"
    .参数 hwnd, 整数型
    .参数 lpPaint, PAINTSTRUCT

.DLL命令 GetClientRect, 整数型, "user32", "GetClientRect"
    .参数 hwnd, 整数型
    .参数 lpRect, RECT

.DLL命令 CreateCompatibleDC, 整数型, "gdi32", "CreateCompatibleDC"
    .参数 hdc, 整数型

.DLL命令 CreateCompatibleBitmap, 整数型, "gdi32", "CreateCompatibleBitmap"
    .参数 hdc, 整数型
    .参数 nWidth, 整数型
    .参数 nHeight, 整数型

.DLL命令 SelectObject, 整数型, "gdi32", "SelectObject"
    .参数 hdc, 整数型
    .参数 hObject, 整数型

.DLL命令 FillRect, 整数型, "user32", "FillRect"
    .参数 hdc, 整数型
    .参数 lpRect, RECT
    .参数 hBrush, 整数型

.DLL命令 CreateSolidBrush, 整数型, "gdi32", "CreateSolidBrush"
    .参数 crColor, 整数型

.DLL命令 Ellipse, 整数型, "gdi32", "Ellipse"
    .参数 hdc, 整数型
    .参数 X1, 整数型
    .参数 Y1, 整数型
    .参数 X2, 整数型
    .参数 Y2, 整数型

.DLL命令 BitBlt, 整数型, "gdi32", "BitBlt"
    .参数 hDestDC, 整数型
    .参数 x, 整数型
    .参数 y, 整数型
    .参数 nWidth, 整数型
    .参数 nHeight, 整数型
    .参数 hSrcDC, 整数型
    .参数 xSrc, 整数型
    .参数 ySrc, 整数型
    .参数 dwRop, 整数型

.DLL命令 GetDC, 整数型, "user32", "GetDC"
    .参数 hwnd, 整数型

.DLL命令 ReleaseDC, 整数型, "user32", "ReleaseDC"
    .参数 hwnd, 整数型
    .参数 hdc, 整数型

.DLL命令 EndPaint, 整数型, "user32", "EndPaint"
    .参数 hwnd, 整数型
    .参数 lpPaint, PAINTSTRUCT

.DLL命令 DeleteDC, 整数型, "gdi32", "DeleteDC"
    .参数 hdc, 整数型

.DLL命令 DeleteObject, 整数型, "gdi32", "DeleteObject"
    .参数 hObject, 整数型

.DLL命令 GetVersion, 整数型, "kernel32", "GetVersion"