易语言绘制桌面天气预报图源码

系统结构:主程序,获取天气,获取未来四天,处理,文本取中间,释放字节流,创建字节流,取字节流指针,取字节流尺寸,取出字节集,销毁,创建_自名称,GetNativeFamily,SetNativeFamily,画图片_从文件,画图片_从字节集,创建画刷_图片画刷,创建画刷_固色画刷,销毁画刷,创建字体,销毁字体,画文字,GetBitsFromBitmapHandle,A2W,W2A,RGB到ARGB,取配置项目_LF_API,创建画板_,GdipLoadImageFromFile,装载图片_,取图片数据_,加载图片,释放_,GdipDeleteGraphics,MultiByteToWideChar,使用指定属性创建逻辑字体_,选入设备场景_,删除设备场景_,删除对象_,释放设备场景_,设置背景模式_,设置前景色_,文本绘图_,创建内存场景_,载入图象_,取对象属性_,GetDIBits_BimapInfo,GetDIBits,CopyMemory_BITMAPINFO,CopyMemory_BITMAPFILEHEADER,WideCharToMultiByte,GdiplusStartup,GdiplusShutdown,GlobalAlloc,GlobalLock,GlobalUnlock,GlobalSize,全局内存分配_,内存流对象_,GdipCreateSolidFill,GdipCreateFont,GdipDeleteFontFamily,GdipCreateFontFamilyFromName,GdipDrawString,GdipGetTextRenderingHint,GdipDeleteBrush,GdipDeleteFont,GdipCreateTexture,创建设备位图_,GdipSetTextRenderingHint,描绘桌面墙纸_,取设备场景_,更换壁纸bmp,获取配置项列表_,

======程序集
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ 主程序
           |  |
           |  |------ 获取天气
           |  |
           |  |------ 获取未来四天
           |  |
           |  |------ 处理
           |  |
           |  |------ 文本取中间
           |  |
           |  |
======字节流
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 释放字节流
           |  |
           |  |------ 创建字节流
           |  |
           |  |------ 取字节流指针
           |  |
           |  |------ 取字节流尺寸
           |  |
           |  |------ 取出字节集
           |  |
           |  |
======GdiplusFontFamily
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 销毁
           |  |
           |  |------ 创建_自名称
           |  |
           |  |------ GetNativeFamily
           |  |
           |  |------ SetNativeFamily
           |  |
           |  |
======程序集1
           |  |
           |  |------ 画图片_从文件
           |  |
           |  |------ 画图片_从字节集
           |  |
           |  |------ 创建画刷_图片画刷
           |  |
           |  |------ 创建画刷_固色画刷
           |  |
           |  |------ 销毁画刷
           |  |
           |  |------ 创建字体
           |  |
           |  |------ 销毁字体
           |  |
           |  |------ 画文字
           |  |
           |  |------ GetBitsFromBitmapHandle
           |  |
           |  |------ A2W
           |  |
           |  |------ W2A
           |  |
           |  |------ RGB到ARGB
           |  |
           |  |------ 取配置项目_LF_API
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   创建画板_
           |  |
           |  |---[dll]------   GdipLoadImageFromFile
           |  |
           |  |---[dll]------   装载图片_
           |  |
           |  |---[dll]------   取图片数据_
           |  |
           |  |---[dll]------   加载图片
           |  |
           |  |---[dll]------   释放_
           |  |
           |  |---[dll]------   GdipDeleteGraphics
           |  |
           |  |---[dll]------   MultiByteToWideChar
           |  |
           |  |---[dll]------   使用指定属性创建逻辑字体_
           |  |
           |  |---[dll]------   选入设备场景_
           |  |
           |  |---[dll]------   删除设备场景_
           |  |
           |  |---[dll]------   删除对象_
           |  |
           |  |---[dll]------   释放设备场景_
           |  |
           |  |---[dll]------   设置背景模式_
           |  |
           |  |---[dll]------   设置前景色_
           |  |
           |  |---[dll]------   文本绘图_
           |  |
           |  |---[dll]------   创建内存场景_
           |  |
           |  |---[dll]------   载入图象_
           |  |
           |  |---[dll]------   取对象属性_
           |  |
           |  |---[dll]------   GetDIBits_BimapInfo
           |  |
           |  |---[dll]------   GetDIBits
           |  |
           |  |---[dll]------   CopyMemory_BITMAPINFO
           |  |
           |  |---[dll]------   CopyMemory_BITMAPFILEHEADER
           |  |
           |  |---[dll]------   WideCharToMultiByte
           |  |
           |  |---[dll]------   GdiplusStartup
           |  |
           |  |---[dll]------   GdiplusShutdown
           |  |
           |  |---[dll]------   GlobalAlloc
           |  |
           |  |---[dll]------   GlobalLock
           |  |
           |  |---[dll]------   GlobalUnlock
           |  |
           |  |---[dll]------   GlobalSize
           |  |
           |  |---[dll]------   全局内存分配_
           |  |
           |  |---[dll]------   内存流对象_
           |  |
           |  |---[dll]------   GdipCreateSolidFill
           |  |
           |  |---[dll]------   GdipCreateFont
           |  |
           |  |---[dll]------   GdipDeleteFontFamily
           |  |
           |  |---[dll]------   GdipCreateFontFamilyFromName
           |  |
           |  |---[dll]------   GdipDrawString
           |  |
           |  |---[dll]------   GdipGetTextRenderingHint
           |  |
           |  |---[dll]------   GdipDeleteBrush
           |  |
           |  |---[dll]------   GdipDeleteFont
           |  |
           |  |---[dll]------   GdipCreateTexture
           |  |
           |  |---[dll]------   创建设备位图_
           |  |
           |  |---[dll]------   GdipSetTextRenderingHint
           |  |
           |  |---[dll]------   描绘桌面墙纸_
           |  |
           |  |---[dll]------   取设备场景_
           |  |
           |  |---[dll]------   更换壁纸bmp
           |  |
           |  |---[dll]------   获取配置项列表_

调用的DLL命令:

.DLL命令 创建画板_, 整数型, "GdiPlus.dll", "GdipCreateFromHDC"
    .参数 hdc, 整数型
    .参数 graphics, 整数型, 传址

.DLL命令 GdipLoadImageFromFile, 整数型, "GdiPlus.dll", "GdipLoadImageFromFile"
    .参数 filename, 字节集
    .参数 image, 整数型, 传址

.DLL命令 装载图片_, 整数型, "GdiPlus.dll", "GdipLoadImageFromStream"
    .参数 stream, 整数型
    .参数 image, 整数型, 传址

.DLL命令 取图片数据_, 整数型, "GdiPlus.dll", "GdipGetImageDimension"
    .参数 image, 整数型
    .参数 width, 小数型, 传址
    .参数 height, 小数型, 传址

.DLL命令 加载图片, 整数型, "GdiPlus.dll", "GdipDrawImageRect"
    .参数 graphics, 整数型
    .参数 image, 整数型
    .参数 x, 小数型
    .参数 y, 小数型
    .参数 width, 小数型
    .参数 height, 小数型

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

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

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

.DLL命令 使用指定属性创建逻辑字体_, 整数型, , "CreateFontIndirectA"
    .参数 lpLogFont, LOGFONT

.DLL命令 选入设备场景_, 整数型, , "SelectObject"
    .参数 hdc, 整数型, , 一个设备场景的句柄
    .参数 hObject, 整数型, , 一个画笔、位图、刷子、字体或区域的句柄

.DLL命令 删除设备场景_, 整数型, , "DeleteDC"
    .参数 hdc

.DLL命令 删除对象_, 整数型, , "DeleteObject"
    .参数 hdc

.DLL命令 释放设备场景_, , , "ReleaseDC"
    .参数 hwnd, 整数型, , 要释放的设备场景相关的窗口句柄
    .参数 hdc, 整数型, , 要释放的设备场景句柄

.DLL命令 设置背景模式_, , , "SetBkMode"
    .参数 hdc
    .参数 nBkMode

.DLL命令 设置前景色_, , , "SetTextColor"
    .参数 hdc
    .参数 crColor

.DLL命令 文本绘图_, , , "TextOutA"
    .参数 hdc
    .参数 x
    .参数 y
    .参数 lpString, 文本型
    .参数 nCount

.DLL命令 创建内存场景_, 整数型, , "CreateCompatibleDC"
    .参数 hdc, 整数型

.DLL命令 载入图象_, 整数型, , "LoadImageA"
    .参数 hInst, 整数型
    .参数 lpsz, 文本型
    .参数 un1, 整数型
    .参数 n1, 整数型
    .参数 n2, 整数型
    .参数 un2, 整数型

.DLL命令 取对象属性_, 整数型, , "GetObjectA"
    .参数 hgdiobj
    .参数 cbBuffer
    .参数 lpvObject, BITMAP

.DLL命令 GetDIBits_BimapInfo, 整数型, , "GetDIBits"
    .参数 HDC
    .参数 hBitmap
    .参数 nStartScan
    .参数 nNumScans
    .参数 lpBits
    .参数 lpBI, BITMAPINFO
    .参数 wUsage

.DLL命令 GetDIBits, 整数型, , "GetDIBits"
    .参数 HDC
    .参数 hBitmap
    .参数 nStartScan
    .参数 nNumScans
    .参数 lpBits, 字节集
    .参数 lpBI, BITMAPINFO
    .参数 wUsage

.DLL命令 CopyMemory_BITMAPINFO, 整数型, , "RtlMoveMemory"
    .参数 Destination, 字节集
    .参数 Source, BITMAPINFO
    .参数 Length

.DLL命令 CopyMemory_BITMAPFILEHEADER, 整数型, , "RtlMoveMemory"
    .参数 Destination, 字节集
    .参数 Source, BITMAPFILEHEADER
    .参数 Length

.DLL命令 WideCharToMultiByte, 整数型, , "WideCharToMultiByte", , 返回 MultiByte字符数目,包括结尾0
    .参数 CodePage, 整数型
    .参数 dwFlags, 整数型
    .参数 lpWideCharStr, 整数型
    .参数 cchWideChar, 整数型
    .参数 lpMultiByteStr, 文本型
    .参数 cchMultiByte, 整数型
    .参数 unknow, 整数型
    .参数 unknow, 整数型

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

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

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

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

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

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

.DLL命令 全局内存分配_, 整数型, , "GlobalFree"
    .参数 hMem, 整数型

.DLL命令 内存流对象_, 整数型, "Ole32.dll", "CreateStreamOnHGlobal"
    .参数 hGlobal, 整数型
    .参数 fDeleteOnRelease, 整数型
    .参数 ppstm, 整数型, 传址

.DLL命令 GdipCreateSolidFill, 整数型, "GdiPlus.dll", "GdipCreateSolidFill"
    .参数 color, 整数型
    .参数 brush, 整数型, 传址

.DLL命令 GdipCreateFont, 整数型, "GdiPlus.dll", "GdipCreateFont"
    .参数 fontFamily, 整数型
    .参数 emSize, 小数型
    .参数 style, 整数型
    .参数 unit, 整数型
    .参数 font, 整数型, 传址

.DLL命令 GdipDeleteFontFamily, 整数型, "GdiPlus.dll", "GdipDeleteFontFamily"
    .参数 FontFamily, 整数型

.DLL命令 GdipCreateFontFamilyFromName, 整数型, "GdiPlus.dll", "GdipCreateFontFamilyFromName"
    .参数 name, 字节集
    .参数 fontCollection, 整数型
    .参数 FontFamily, 整数型, 传址

.DLL命令 GdipDrawString, 整数型, "GdiPlus.dll", "GdipDrawString"
    .参数 graphics, 整数型
    .参数 string, 字节集
    .参数 length, 整数型
    .参数 font, 整数型
    .参数 layoutRect, RectF
    .参数 stringFormat, 整数型
    .参数 brush, 整数型

.DLL命令 GdipGetTextRenderingHint, 整数型, "GdiPlus.dll", "GdipGetTextRenderingHint"
    .参数 graphics, 整数型
    .参数 mode, 整数型, 传址

.DLL命令 GdipDeleteBrush, 整数型, "GdiPlus.dll", "GdipDeleteBrush"
    .参数 brush, 整数型

.DLL命令 GdipDeleteFont, 整数型, "GdiPlus.dll", "GdipDeleteFont"
    .参数 font, 整数型

.DLL命令 GdipCreateTexture, 整数型, "GdiPlus.dll", "GdipCreateTexture"
    .参数 image, 整数型
    .参数 wrapmode, 整数型
    .参数 texture, 整数型, 传址

.DLL命令 创建设备位图_, 整数型, , "CreateCompatibleBitmap"
    .参数 hdc, 整数型
    .参数 nWidth, 整数型
    .参数 nHeight, 整数型

.DLL命令 GdipSetTextRenderingHint, 整数型, "GdiPlus.dll", "GdipSetTextRenderingHint"
    .参数 graphics, 整数型
    .参数 mode, 整数型

.DLL命令 描绘桌面墙纸_, , , "PaintDesktop"
    .参数 hdc

.DLL命令 取设备场景_, 整数型, , "GetDC"
    .参数 hwnd, 整数型

.DLL命令 更换壁纸bmp, 整数型, , "SystemParametersInfoA"
    .参数 uAction
    .参数 uParam
    .参数 lpvParam, 文本型
    .参数 fuWinIn

.DLL命令 获取配置项列表_, , , "GetPrivateProfileSectionA"
    .参数 lpAppName, 文本型, , 欲获取的小节。注意这个字串不区分大小写
    .参数 lpReturnedString, 字节集, , 项和值字串的列表。每个字串都由一个NULL字符分隔，最后一个字串后面用两个NULL字符中止
    .参数 nSize, 整数型, , lpReturnedString缓冲区的大小。在windows系统中最大值为32767
    .参数 lpFileName, 文本型, , 初始化文件的名字。如没有指定完整路径名，windows就在Windows目录中查找文件