易语言画PNG透明图片源码

系统结构:子程序_开启,子程序_输出天气,快照_特殊增强,消除按钮边框,是否开启_,创建圆角矩形区域_,设置窗口区域_,设置窗口非透明组件底图色_,设置窗口信息_,设置窗口玻璃_,删除对象_,OpenClipboard,SetClipboardData,CloseClipboard,GlobalLock,GlobalAlloc,CopyMemory1,GlobalFree,EmptyClipboard,EnumClipboardFormats,DeleteObject,GlobalUnlock,keybd_event,GetClipboardData,GlobalSize,GdiplusStartup,CopyImage,GdipSaveImageToStream,GetHGlobalFromStream,GdipCreateBitmapFromHBITMAP,CreateStreamOnHGlobal,CopyMemory2,GdipDisposeImage,IsWindow,GetDC,CreateCompatibleDC,CreateCompatibleBitmap,SelectObject,GetWindowRect,BitBlt,ReleaseDC,DeleteDC,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |
======窗口程序集1
           |  |
           |  |------ _窗口1_创建完毕
           |  |
           |  |------ 子程序_开启
           |  |
           |  |------ _窗口1_位置被改变
           |  |
           |  |------ 子程序_输出天气
           |  |
           |  |------ 快照_特殊增强
           |  |
           |  |------ 消除按钮边框
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   是否开启_
           |  |
           |  |---[dll]------   创建圆角矩形区域_
           |  |
           |  |---[dll]------   设置窗口区域_
           |  |
           |  |---[dll]------   设置窗口非透明组件底图色_
           |  |
           |  |---[dll]------   设置窗口信息_
           |  |
           |  |---[dll]------   设置窗口玻璃_
           |  |
           |  |---[dll]------   删除对象_
           |  |
           |  |---[dll]------   OpenClipboard
           |  |
           |  |---[dll]------   SetClipboardData
           |  |
           |  |---[dll]------   CloseClipboard
           |  |
           |  |---[dll]------   GlobalLock
           |  |
           |  |---[dll]------   GlobalAlloc
           |  |
           |  |---[dll]------   CopyMemory1
           |  |
           |  |---[dll]------   GlobalFree
           |  |
           |  |---[dll]------   EmptyClipboard
           |  |
           |  |---[dll]------   EnumClipboardFormats
           |  |
           |  |---[dll]------   DeleteObject
           |  |
           |  |---[dll]------   GlobalUnlock
           |  |
           |  |---[dll]------   keybd_event
           |  |
           |  |---[dll]------   GetClipboardData
           |  |
           |  |---[dll]------   GlobalSize
           |  |
           |  |---[dll]------   GdiplusStartup
           |  |
           |  |---[dll]------   CopyImage
           |  |
           |  |---[dll]------   GdipSaveImageToStream
           |  |
           |  |---[dll]------   GetHGlobalFromStream
           |  |
           |  |---[dll]------   GdipCreateBitmapFromHBITMAP
           |  |
           |  |---[dll]------   CreateStreamOnHGlobal
           |  |
           |  |---[dll]------   CopyMemory2
           |  |
           |  |---[dll]------   GdipDisposeImage
           |  |
           |  |---[dll]------   IsWindow
           |  |
           |  |---[dll]------   GetDC
           |  |
           |  |---[dll]------   CreateCompatibleDC
           |  |
           |  |---[dll]------   CreateCompatibleBitmap
           |  |
           |  |---[dll]------   SelectObject
           |  |
           |  |---[dll]------   GetWindowRect
           |  |
           |  |---[dll]------   BitBlt
           |  |
           |  |---[dll]------   ReleaseDC
           |  |
           |  |---[dll]------   DeleteDC

  

调用的DLL命令:

.支持库 ogrelib

.DLL命令 是否开启_, 整数型, "dwmapi.dll", "DwmIsCompositionEnabled", , DwmIsCompositionEnabled Dwm合成是否开启
    .参数 开启, 逻辑型, 传址, ByRef pfEnabled

.DLL命令 创建圆角矩形区域_, 整数型, "gdi32.dll", "CreateRoundRectRgn"
    .参数 左上横坐标, 整数型, , X1，矩形左上角横坐标
    .参数 左上纵坐标, 整数型, , Y1，矩形左上角纵坐标
    .参数 右下横坐标, 整数型, , X2，矩形右下角横坐标
    .参数 右下纵坐标, 整数型, , Y2，矩形右下角纵坐标
    .参数 圆角椭圆的宽, 整数型, , X3，参见相关帮助
    .参数 圆角椭圆的高, 整数型, , Y3，参见相关帮助

.DLL命令 设置窗口区域_, 整数型, "user32.dll", "SetWindowRgn"
    .参数 窗口句柄, 整数型
    .参数 区域, 整数型
    .参数 自动刷新, 逻辑型

.DLL命令 设置窗口非透明组件底图色_, , , "SetLayeredWindowAttributes"
    .参数 窗口句柄, 整数型
    .参数 透明色, 整数型
    .参数 透明度, 整数型
    .参数 透明方式, 整数型

.DLL命令 设置窗口信息_, 整数型, "user32", "SetWindowLongA", , 在窗口结构中为指定的窗口设置信息  指定数据的前一个值
    .参数 窗口句柄, 整数型, , hwnd，欲为其取得信息的窗口的句柄
    .参数 窗口信息值, 整数型, , nIndex，请参考GetWindowLong函数的nIndex参数的说明
    .参数 窗口信息新值, 整数型, , dwNewLong，由nIndex指定的窗口信息的新值

.DLL命令 设置窗口玻璃_, 整数型, "DwmApi.dll", "DwmExtendFrameIntoClientArea"
    .参数 窗口句柄, 整数型
    .参数 矩形, 矩形

.DLL命令 删除对象_, 整数型, "gdi32.dll", "DeleteObject", , DeleteObject
    .参数 对象句柄, 整数型, , hObject,一个GDI对象的句柄

.DLL命令 OpenClipboard, 整数型, "user32", "OpenClipboard"
    .参数 句柄, 整数型

.DLL命令 SetClipboardData, 整数型, , "SetClipboardData"
    .参数 uFormat, 整数型
    .参数 hMem, 整数型

.DLL命令 CloseClipboard, 整数型, "user32", "CloseClipboard"

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

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

.DLL命令 CopyMemory1, , "kernel32", "RtlMoveMemory"
    .参数 Destination, 整数型
    .参数 Source, 整数型
    .参数 Length, 整数型

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

.DLL命令 EmptyClipboard, 整数型, "user32", "EmptyClipboard"

.DLL命令 EnumClipboardFormats, 整数型, "user32", "EnumClipboardFormats"
    .参数 wFormat, 整数型

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

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

.DLL命令 keybd_event, , "user32", "keybd_event"
    .参数 bVk, 字节型
    .参数 bScan, 字节型
    .参数 dwFlags, 整数型
    .参数 dwExtraInfo, 整数型

.DLL命令 GetClipboardData, 整数型, "user32", "GetClipboardData"
    .参数 wFormat, 整数型

.DLL命令 GlobalSize, 整数型, "kernel32", "GlobalSize"
    .参数 hMem, 整数型

.DLL命令 GdiplusStartup, 整数型, "gdiplus.dll", "GdiplusStartup"
    .参数 token, 整数型, 传址
    .参数 inputbuf, 字节集
    .参数 outputbuf, 整数型

.DLL命令 CopyImage, 整数型
    .参数 hImage, 整数型
    .参数 uType, 整数型
    .参数 cxDesired, 整数型
    .参数 cyDesired, 整数型
    .参数 fuFlags, 整数型

.DLL命令 GdipSaveImageToStream, 整数型, "gdiplus.dll", "GdipSaveImageToStream"
    .参数 image
    .参数 stream
    .参数 clsidEncoder, 字节集
    .参数 encoderParams

.DLL命令 GetHGlobalFromStream, , "ole32.dll", "GetHGlobalFromStream"
    .参数 pstm
    .参数 phglobal, 整数型, 传址

.DLL命令 GdipCreateBitmapFromHBITMAP, 整数型, "gdiplus.dll", "GdipCreateBitmapFromHBITMAP"
    .参数 hbm
    .参数 hPal
    .参数 BITMAP, , 传址

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

.DLL命令 CopyMemory2, , , "RtlMoveMemory"
    .参数 Destination, 整数型, 传址
    .参数 Source, 对象, 传址
    .参数 cbCopy, 整数型

.DLL命令 GdipDisposeImage, 整数型, "gdiplus.dll", "GdipDisposeImage"
    .参数 image, 整数型

.DLL命令 IsWindow, 整数型, "user32", "IsWindow"
    .参数 窗口句柄, 整数型

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

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

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

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

.DLL命令 GetWindowRect, 整数型, "user32", "GetWindowRect"
    .参数 窗口句柄, 整数型
    .参数 lpRect, 整数型, 传址 数组

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

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

.DLL命令 DeleteDC, 整数型, "gdi32", "DeleteDC"
    .参数 设备描述句柄, 整数型