易语言图片快速无极限放大和平移源码

系统结构:创建位图,取画布句柄,取位图句柄,取宽度,取高度,置画笔属性,置实色画刷,置交叉线画刷,移动到,画直线到,画多义线点数组,画多义线横纵数组,画多边形点数组,画多边形横纵数组,画曲线点数组,画曲线横纵数组,画emf文件,画emf字节集,画图标文件,复制到画布,复制到画板,拉伸复制到画布,拉伸复制到画板,画矩形,画椭圆,画圆角矩形,实色填充,洪水填充,置文本属性,文本输出,在矩形内绘制文本,缩放到视图,CreateCompatibleBitmap,CreateCompatibleDC,DeleteDC,MoveToEx,LineTo,Polyline,Rectangle,Ellipse,CreateBrushIndirect,CreatePen,CreatePenIndirect,DeleteObject,SelectObject,SetBkMode,CreateSolidBrush,CreateHatchBrush,Polygon,PolyBezier,GetEnhMetaFile,SetEnhMetaFileBits,PlayEnhMetaFile,DeleteEnhMetaFile,LoadIcon,DrawIcon,BitBlt,StretchBlt,GetDC,ReleaseDC,RoundRect,FloodFill,FillRect,ExtFloodFill,CreateFont,SetTextColor,SetBkColor,TextOut,DrawText,SetGraphicsMode,FillRect1,

======内存位图
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 创建位图
           |  |
           |  |------ 取画布句柄
           |  |
           |  |------ 取位图句柄
           |  |
           |  |------ 取宽度
           |  |
           |  |------ 取高度
           |  |
           |  |------ 置画笔属性
           |  |
           |  |------ 置实色画刷
           |  |
           |  |------ 置交叉线画刷
           |  |
           |  |------ 移动到
           |  |
           |  |------ 画直线到
           |  |
           |  |------ 画多义线点数组
           |  |
           |  |------ 画多义线横纵数组
           |  |
           |  |------ 画多边形点数组
           |  |
           |  |------ 画多边形横纵数组
           |  |
           |  |------ 画曲线点数组
           |  |
           |  |------ 画曲线横纵数组
           |  |
           |  |------ 画emf文件
           |  |
           |  |------ 画emf字节集
           |  |
           |  |------ 画图标文件
           |  |
           |  |------ 复制到画布
           |  |
           |  |------ 复制到画板
           |  |
           |  |------ 拉伸复制到画布
           |  |
           |  |------ 拉伸复制到画板
           |  |
           |  |------ 画矩形
           |  |
           |  |------ 画椭圆
           |  |
           |  |------ 画圆角矩形
           |  |
           |  |------ 实色填充
           |  |
           |  |------ 洪水填充
           |  |
           |  |------ 置文本属性
           |  |
           |  |------ 文本输出
           |  |
           |  |------ 在矩形内绘制文本
           |  |
           |  |
======窗口程序集1
           |  |
           |  |------ _按钮导入_被单击
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 缩放到视图
           |  |
           |  |------ _按钮放大_被单击
           |  |
           |  |------ _按钮缩小_被单击
           |  |
           |  |------ _画板_鼠标左键被按下
           |  |
           |  |------ _画板_鼠标左键被放开
           |  |
           |  |------ _画板_鼠标位置被移动
           |  |
           |  |------ _画板_滚轮被滚动
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CreateCompatibleBitmap
           |  |
           |  |---[dll]------   CreateCompatibleDC
           |  |
           |  |---[dll]------   DeleteDC
           |  |
           |  |---[dll]------   MoveToEx
           |  |
           |  |---[dll]------   LineTo
           |  |
           |  |---[dll]------   Polyline
           |  |
           |  |---[dll]------   Rectangle
           |  |
           |  |---[dll]------   Ellipse
           |  |
           |  |---[dll]------   CreateBrushIndirect
           |  |
           |  |---[dll]------   CreatePen
           |  |
           |  |---[dll]------   CreatePenIndirect
           |  |
           |  |---[dll]------   DeleteObject
           |  |
           |  |---[dll]------   SelectObject
           |  |
           |  |---[dll]------   SetBkMode
           |  |
           |  |---[dll]------   CreateSolidBrush
           |  |
           |  |---[dll]------   CreateHatchBrush
           |  |
           |  |---[dll]------   Polygon
           |  |
           |  |---[dll]------   PolyBezier
           |  |
           |  |---[dll]------   GetEnhMetaFile
           |  |
           |  |---[dll]------   SetEnhMetaFileBits
           |  |
           |  |---[dll]------   PlayEnhMetaFile
           |  |
           |  |---[dll]------   DeleteEnhMetaFile
           |  |
           |  |---[dll]------   LoadIcon
           |  |
           |  |---[dll]------   DrawIcon
           |  |
           |  |---[dll]------   BitBlt
           |  |
           |  |---[dll]------   StretchBlt
           |  |
           |  |---[dll]------   GetDC
           |  |
           |  |---[dll]------   ReleaseDC
           |  |
           |  |---[dll]------   RoundRect
           |  |
           |  |---[dll]------   FloodFill
           |  |
           |  |---[dll]------   FillRect
           |  |
           |  |---[dll]------   ExtFloodFill
           |  |
           |  |---[dll]------   CreateFont
           |  |
           |  |---[dll]------   SetTextColor
           |  |
           |  |---[dll]------   SetBkColor
           |  |
           |  |---[dll]------   TextOut
           |  |
           |  |---[dll]------   DrawText
           |  |
           |  |---[dll]------   SetGraphicsMode
           |  |
           |  |---[dll]------   FillRect1

  

调用的DLL命令:

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

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

.DLL命令 DeleteDC, 逻辑型
    .参数 hdc, 整数型

.DLL命令 MoveToEx, 逻辑型
    .参数 hdc, 整数型
    .参数 X, 整数型
    .参数 Y, 整数型
    .参数 lpPoint, 整数型, , 未知类型：LPPOINT。

.DLL命令 LineTo, 逻辑型
    .参数 hdc, 整数型
    .参数 nXEnd, 整数型
    .参数 nYEnd, 整数型

.DLL命令 Polyline, 逻辑型
    .参数 hdc, 整数型
    .参数 lppt, 整数型, , 可能为 POINT 结构。
    .参数 cPoints, 整数型

.DLL命令 Rectangle, 逻辑型
    .参数 hdc, 整数型
    .参数 nLeftRect, 整数型
    .参数 nTopRect, 整数型
    .参数 nRightRect, 整数型
    .参数 nBottomRect, 整数型

.DLL命令 Ellipse, 逻辑型
    .参数 hdc, 整数型
    .参数 nLeftRect, 整数型
    .参数 nTopRect, 整数型
    .参数 nRightRect, 整数型
    .参数 nBottomRect, 整数型

.DLL命令 CreateBrushIndirect, 整数型
    .参数 lplb, LOGBRUSH, 传址, 可能为 LOGBRUSH 结构。

.DLL命令 CreatePen, 整数型
    .参数 fnPenStyle, 整数型
    .参数 nWidth, 整数型
    .参数 crColor, 整数型

.DLL命令 CreatePenIndirect, 整数型
    .参数 lplgpn, LOGPEN, 传址, 可能为 LOGPEN 结构。

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

.DLL命令 SelectObject, 整数型
    .参数 hdc, 整数型
    .参数 hgdiobj, 整数型

.DLL命令 SetBkMode, 整数型
    .参数 hdc, 整数型
    .参数 iBkMode, 整数型

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

.DLL命令 CreateHatchBrush, 整数型
    .参数 fnStyle, 整数型
    .参数 clrref, 整数型

.DLL命令 Polygon, 逻辑型
    .参数 hdc, 整数型
    .参数 lpPoints, , 传址, 可能为 POINT 结构。
    .参数 nCount, 整数型

.DLL命令 PolyBezier, 逻辑型
    .参数 hdc, 整数型
    .参数 lppt, , 传址, 可能为 POINT 结构。
    .参数 cPoints, 整数型

.DLL命令 GetEnhMetaFile, 整数型, , "GetEnhMetaFileA"
    .参数 lpszMetaFile, 文本型, 传址

.DLL命令 SetEnhMetaFileBits, 整数型
    .参数 cbBuffer, 整数型
    .参数 lpData, 字节集, 传址

.DLL命令 PlayEnhMetaFile, 逻辑型
    .参数 hdc, 整数型
    .参数 hemf, 整数型
    .参数 lpRect, RECT, 传址, 可能为 RECT 结构。

.DLL命令 DeleteEnhMetaFile, 逻辑型
    .参数 hemf, 整数型

.DLL命令 LoadIcon, 整数型, , "LoadIconA"
    .参数 hInstance, 整数型
    .参数 lpIconName, 文本型, 传址

.DLL命令 DrawIcon, 逻辑型
    .参数 hDC, 整数型
    .参数 X, 整数型
    .参数 Y, 整数型
    .参数 hIcon, 整数型

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

.DLL命令 StretchBlt, 逻辑型
    .参数 hdcDest, 整数型
    .参数 nXOriginDest, 整数型
    .参数 nYOriginDest, 整数型
    .参数 nWidthDest, 整数型
    .参数 nHeightDest, 整数型
    .参数 hdcSrc, 整数型
    .参数 nXOriginSrc, 整数型
    .参数 nYOriginSrc, 整数型
    .参数 nWidthSrc, 整数型
    .参数 nHeightSrc, 整数型
    .参数 dwRop, 整数型

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

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

.DLL命令 RoundRect, 逻辑型
    .参数 hdc, 整数型
    .参数 nLeftRect, 整数型
    .参数 nTopRect, 整数型
    .参数 nRightRect, 整数型
    .参数 nBottomRect, 整数型
    .参数 nWidth, 整数型
    .参数 nHeight, 整数型

.DLL命令 FloodFill, 逻辑型
    .参数 hdc, 整数型
    .参数 nXStart, 整数型
    .参数 nYStart, 整数型
    .参数 crFill, 整数型

.DLL命令 FillRect, 整数型
    .参数 hDC, 整数型
    .参数 lprc, RECT, 传址, 可能为 RECT 结构。
    .参数 hbr, 整数型

.DLL命令 ExtFloodFill, 逻辑型
    .参数 hdc, 整数型
    .参数 nXStart, 整数型
    .参数 nYStart, 整数型
    .参数 crColor, 整数型
    .参数 fuFillType, 整数型

.DLL命令 CreateFont, 整数型, , "CreateFontA"
    .参数 nHeight, 整数型
    .参数 nWidth, 整数型
    .参数 nEscapement, 整数型
    .参数 nOrientation, 整数型
    .参数 fnWeight, 整数型
    .参数 fdwItalic, 逻辑型
    .参数 fdwUnderline, 逻辑型
    .参数 fdwStrikeOut, 逻辑型
    .参数 fdwCharSet, 整数型
    .参数 fdwOutputPrecision, 整数型
    .参数 fdwClipPrecision, 整数型
    .参数 fdwQuality, 整数型
    .参数 fdwPitchAndFamily, 整数型
    .参数 lpszFace, 文本型, 传址

.DLL命令 SetTextColor, 整数型
    .参数 hdc, 整数型
    .参数 crColor, 整数型

.DLL命令 SetBkColor, 整数型
    .参数 hdc, 整数型
    .参数 crColor, 整数型

.DLL命令 TextOut, 逻辑型, , "TextOutA"
    .参数 hdc, 整数型
    .参数 nXStart, 整数型
    .参数 nYStart, 整数型
    .参数 lpString, 文本型, 传址
    .参数 cbString, 整数型

.DLL命令 DrawText, 整数型, , "DrawTextA"
    .参数 hDC, 整数型
    .参数 lpString, 文本型, 传址
    .参数 nCount, 整数型
    .参数 lpRect, RECT, , 未知类型：LPRECT。
    .参数 uFormat, 整数型

.DLL命令 SetGraphicsMode, 整数型
    .参数 hdc, 整数型
    .参数 iMode, 整数型

.DLL命令 FillRect1, 整数型
    .参数 hDC, 整数型
    .参数 lprc, RECT, 传址, 可能为 RECT 结构。
    .参数 hbr, 整数型