Api图片框显示PNG图片

hMemObj ＝ 全局堆栈分配_ (2, 取字节集长度 (输入_PNG图片) ＋ 1) ' 申请新内存获得句柄
pMem ＝ 锁住全局内存块_ (hMemObj) ' 锁定内存块，返回内存块的指针
拷贝内存_ (pMem, 输入_PNG图片, 取字节集长度 (输入_PNG图片) ＋ 1) ' 复制源数据到新内存。
解锁全局内存块_ (hMemObj) ' 解锁
' --------------------------------初始GDI
GpInput.GdiplusVersion ＝ 1
GdiplusStartup (token, GpInput, 0)
' ________________________________
hdc ＝ GetDC (输入_句柄)
GdipCreateFromHDC (hdc, GdiDC) ' 创建新的窗口场景
CreateStreamOnHGlobal (hMemObj, 0, StreamObject) ' 根据新内存句柄创建IStream
GdipLoadImageFromStream (StreamObject, img) ' 建立Image
GdipDrawImage (GdiDC, img, 0, 0) ' 在场景中显示Image
全局内存分配_ (hMemObj)
' -------------------------------扫尾工作，释放内存！
GdipDisposeImage (img)
GdipDeleteGraphics (GdiDC)
GdiplusShutdown (token)
ReleaseDC (取窗口句柄 (), hdc)