易语言图片无损转换源码

系统结构:转换图像格式,A2W,GlobalUnlock,GetObjectPtr,GdipSaveImageToStream_int,GetHGlobalFromStream_int,GlobalSize,CopyMemory,GdipDisposeImage,GlobalFree,MultiByteToWideChar,GdiplusStartup,GdiplusShutdown,GdipCreateBitmapFromStream,GlobalLock,GlobalAlloc,CreateStreamOnHGlobal,CLSIDFromString,

======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 转换图像格式
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ A2W
           |  |
           |  |------ __启动窗口_可否被关闭
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ _按钮3_被单击
           |  |
           |  |------ _单选框1_被单击
           |  |
           |  |------ _单选框2_被单击
           |  |
           |  |------ _单选框3_被单击
           |  |
           |  |------ _单选框4_被单击
           |  |
           |  |------ _单选框5_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GlobalUnlock
           |  |
           |  |---[dll]------   GetObjectPtr
           |  |
           |  |---[dll]------   GdipSaveImageToStream_int
           |  |
           |  |---[dll]------   GetHGlobalFromStream_int
           |  |
           |  |---[dll]------   GlobalSize
           |  |
           |  |---[dll]------   CopyMemory
           |  |
           |  |---[dll]------   GdipDisposeImage
           |  |
           |  |---[dll]------   GlobalFree
           |  |
           |  |---[dll]------   MultiByteToWideChar
           |  |
           |  |---[dll]------   GdiplusStartup
           |  |
           |  |---[dll]------   GdiplusShutdown
           |  |
           |  |---[dll]------   GdipCreateBitmapFromStream
           |  |
           |  |---[dll]------   GlobalLock
           |  |
           |  |---[dll]------   GlobalAlloc
           |  |
           |  |---[dll]------   CreateStreamOnHGlobal
           |  |
           |  |---[dll]------   CLSIDFromString

调用的DLL命令:

.DLL命令 GlobalUnlock, 整数型, "kernel32", "GlobalUnlock", , 开锁全局内存块
    .参数 hMem, 整数型

.DLL命令 GetObjectPtr, 整数型, , "lstrcpyn"
    .参数 lpString1, 对象, 传址
    .参数 lpString2, 对象, 传址
    .参数 iMaxLength, 整数型

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

.DLL命令 GetHGlobalFromStream_int, , "ole32.dll", "GetHGlobalFromStream"
    .参数 pstm, , , 未知类型：ISTREAM。
    .参数 phglobal, 整数型, 传址

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

.DLL命令 CopyMemory, , , "RtlMoveMemory"
    .参数 Destination, 字节集
    .参数 Source, 整数型
    .参数 cbCopy, 整数型

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

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

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

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

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

.DLL命令 GdipCreateBitmapFromStream, 整数型, "gdiplus.dll", "GdipCreateBitmapFromStream"
    .参数 stream, 整数型
    .参数 bitmap, , 传址

.DLL命令 GlobalLock, 整数型, "kernel32", "GlobalLock", , 锁定内存对象并返回一个指针
    .参数 hMem, 整数型

.DLL命令 GlobalAlloc, 整数型, "kernel32", "GlobalAlloc", , 在堆中分配内存
    .参数 wFlags, 整数型
    .参数 dwBytes, 整数型

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

.DLL命令 CLSIDFromString, , "ole32.dll", "CLSIDFromString"
    .参数 lpsz, 字节集
    .参数 pclsid, 字节集, 传址