易语言GDI画板模块源码

系统结构:创建,销毁,清除,绘图,刷新,加载数据,加载文件,释放,取句柄,取宽度,取高度,A2W,GdiplusStartup,GdiplusShutdown,CreateStreamOnHGlobal,GdipLoadImageFromFile,GdipLoadImageFromStream,GdipDisposeImage,GdipCreateFromHDC,GdipDrawImageRect,GdipDeleteGraphics,UpdateLayeredWindow,SelectObject,GetDC,ReleaseDC,GetWindowLong,SetWindowLong,CreateCompatibleDC,DeleteDC,CreateDIBSection,CreateSolidBrush,DeleteObject,GlobalAlloc,GlobalLock,GlobalUnlock,GlobalFree,FillRect,SetRect,BitBlt,MultiByteToWideChar,GdipGetImageHeight,GdipGetImageWidth,GdipGetImageType,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |
======Gdip画板
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 创建
           |  |
           |  |------ 销毁
           |  |
           |  |------ 清除
           |  |
           |  |------ 绘图
           |  |
           |  |------ 刷新
           |  |
           |  |
======Gdip图片对象
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 加载数据
           |  |
           |  |------ 加载文件
           |  |
           |  |------ 释放
           |  |
           |  |------ 取句柄
           |  |
           |  |------ 取宽度
           |  |
           |  |------ 取高度
           |  |
           |  |
======help
           |  |
           |  |------ A2W
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GdiplusStartup
           |  |
           |  |---[dll]------   GdiplusShutdown
           |  |
           |  |---[dll]------   CreateStreamOnHGlobal
           |  |
           |  |---[dll]------   GdipLoadImageFromFile
           |  |
           |  |---[dll]------   GdipLoadImageFromStream
           |  |
           |  |---[dll]------   GdipDisposeImage
           |  |
           |  |---[dll]------   GdipCreateFromHDC
           |  |
           |  |---[dll]------   GdipDrawImageRect
           |  |
           |  |---[dll]------   GdipDeleteGraphics
           |  |
           |  |---[dll]------   UpdateLayeredWindow
           |  |
           |  |---[dll]------   SelectObject
           |  |
           |  |---[dll]------   GetDC
           |  |
           |  |---[dll]------   ReleaseDC
           |  |
           |  |---[dll]------   GetWindowLong
           |  |
           |  |---[dll]------   SetWindowLong
           |  |
           |  |---[dll]------   CreateCompatibleDC
           |  |
           |  |---[dll]------   DeleteDC
           |  |
           |  |---[dll]------   CreateDIBSection
           |  |
           |  |---[dll]------   CreateSolidBrush
           |  |
           |  |---[dll]------   DeleteObject
           |  |
           |  |---[dll]------   GlobalAlloc
           |  |
           |  |---[dll]------   GlobalLock
           |  |
           |  |---[dll]------   GlobalUnlock
           |  |
           |  |---[dll]------   GlobalFree
           |  |
           |  |---[dll]------   FillRect
           |  |
           |  |---[dll]------   SetRect
           |  |
           |  |---[dll]------   BitBlt
           |  |
           |  |---[dll]------   MultiByteToWideChar
           |  |
           |  |---[dll]------   GdipGetImageHeight
           |  |
           |  |---[dll]------   GdipGetImageWidth
           |  |
           |  |---[dll]------   GdipGetImageType
  ======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _时钟1_周期事件

  

调用的DLL命令:

.DLL命令 GdiplusStartup, 整数型, "GdiPlus.dll"
    .参数 token, 整数型, 传址
    .参数 inputbuf, GdiplusStartupInput
    .参数 outputbuf, 整数型

.DLL命令 GdiplusShutdown, , "GdiPlus.dll"
    .参数 token, 整数型

.DLL命令 CreateStreamOnHGlobal, 整数型, "Ole32.dll"
    .参数 hGlobal, 整数型
    .参数 fDeleteOnRelease, 逻辑型
    .参数 ppstm, 整数型, 传址

.DLL命令 GdipLoadImageFromFile, 整数型, "GdiPlus.dll"
    .参数 FileName, 字节集, , Unicode
    .参数 Image, 整数型, 传址

.DLL命令 GdipLoadImageFromStream, 整数型, "GdiPlus.dll"
    .参数 Stream, 整数型
    .参数 Image, 整数型, 传址

.DLL命令 GdipDisposeImage, 整数型, "GdiPlus.dll"
    .参数 Image, 整数型

.DLL命令 GdipCreateFromHDC, 整数型, "GdiPlus.dll"
    .参数 hDC, 整数型
    .参数 Graphics, 整数型, 传址

.DLL命令 GdipDrawImageRect, 整数型, "GdiPlus.dll"
    .参数 Graphics, 整数型
    .参数 Image, 整数型
    .参数 X, 小数型
    .参数 Y, 小数型
    .参数 Width, 小数型
    .参数 Height, 小数型

.DLL命令 GdipDeleteGraphics, 整数型, "GdiPlus.dll"
    .参数 Graphics, 整数型

.DLL命令 UpdateLayeredWindow, 逻辑型
    .参数 hWnd, 整数型
    .参数 hdcDst, 整数型
    .参数 pptDst, 整数型
    .参数 psize, SIZE
    .参数 hdcSrc, 整数型
    .参数 pptSrc, POINT
    .参数 crKey, 整数型
    .参数 pblend, BLENDFUNCTION
    .参数 dwFlags, 整数型

.DLL命令 SelectObject, 整数型
    .参数 hDC, 整数型
    .参数 hObject, 整数型

.DLL命令 GetDC, 整数型
    .参数 hWnd, 整数型

.DLL命令 ReleaseDC, 整数型
    .参数 hWnd, 整数型
    .参数 hDC, 整数型

.DLL命令 GetWindowLong, 整数型, , "GetWindowLongA"
    .参数 hWnd, 整数型
    .参数 nIndex, 整数型

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

.DLL命令 CreateCompatibleDC, 整数型
    .参数 hDC, 整数型

.DLL命令 DeleteDC, 整数型
    .参数 hDC, 整数型

.DLL命令 CreateDIBSection, 整数型
    .参数 hDC, 整数型
    .参数 pBMI, BITMAPINFO
    .参数 iUsage, 整数型
    .参数 ppvBits, 整数型
    .参数 hSection, 整数型
    .参数 dwOffset, 整数型

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

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

.DLL命令 GlobalAlloc, 整数型
    .参数 wFlags, 整数型
    .参数 dwBytes, 整数型

.DLL命令 GlobalLock, 整数型
    .参数 hMem, 整数型

.DLL命令 GlobalUnlock, 整数型
    .参数 hMem, 整数型

.DLL命令 GlobalFree, 整数型, , "GlobalFree"
    .参数 hMem, 整数型

.DLL命令 FillRect, 整数型
    .参数 hDC, 整数型
    .参数 lpRect, RECT
    .参数 hBrush, 整数型

.DLL命令 SetRect, 整数型
    .参数 lprc, RECT
    .参数 xLeft, 整数型
    .参数 yTop, 整数型
    .参数 xRight, 整数型
    .参数 yBottom, 整数型

.DLL命令 BitBlt, 逻辑型
    .参数 hdcDest, 整数型
    .参数 nXDest, 整数型
    .参数 nYDest, 整数型
    .参数 nWidth, 整数型
    .参数 nHeight, 整数型
    .参数 hdcSrc, 整数型
    .参数 nXSrc, 整数型
    .参数 nYSrc, 整数型
    .参数 dwRop, 整数型

.DLL命令 MultiByteToWideChar, 整数型
    .参数 CodePage, 整数型
    .参数 dwFlags, 整数型
    .参数 lpMultiByteStr, 文本型
    .参数 cchMultiByte, 整数型
    .参数 lpWideCharStr, 字节集
    .参数 cchWideChar, 整数型

.DLL命令 GdipGetImageHeight, 整数型, "GdiPlus.dll"
    .参数 Image, 整数型
    .参数 Height, 整数型, 传址

.DLL命令 GdipGetImageWidth, 整数型, "GdiPlus.dll"
    .参数 Image, 整数型
    .参数 Width, 整数型, 传址

.DLL命令 GdipGetImageType, 整数型, "GdiPlus.dll"
    .参数 Image, 整数型
    .参数 Type, 整数型, 传址