易语言自动更换墙纸源码

系统结构:SystemParametersInfo,

======窗口程序集1
           |  |
           |  |------ _按钮_立即更换_被单击
           |  |
           |  |------ _按钮_添加墙纸_被单击
           |  |
           |  |------ _按钮_退出_被单击
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   SystemParametersInfo

调用的DLL命令:

.DLL命令 SystemParametersInfo, 整数型, "user32", "SystemParametersInfoA", , 允许获取和设置数量众多的windows系统参数 返回值Long,非零表示成功,零表示失败?会设置GetLastError 在调用这个函数之前,特别要注意将lpvParam参数定义成正确的数据类型
    .参数 uAction, 整数型, , Long,指定要设置的参数?参考uAction常数表
    .参数 uParam, 整数型, , Long,参考uAction常数表
    .参数 lpvParam, 文本型, , Any,按引用调用的Integer?Long和数据结构?对于String数据,请用SystemParametersInfoByval函数?具体用法参考uAction常数表
    .参数 fuWinIni, 整数型, , Long,取决于不同的参数及操作系统,随同这个函数设置的用户配置参数保存在win.ini或注册表里,或同时保存在这两个地方?这个参数规定了在设置系统参数的时候,是否应更新用户设置参数?可以是零(禁止更新),或下述任何一个常数: SPIF_UPDATEINIFILE 更新win.ini和(或)注册表中的用户配置文件  SPIF_SENDWININICHANGE  倘若也设置了SPIF_UPDATEINIFILE,将一条WM_WININICHANGE消息发给所有应用程序?否则没有作用?这调消息告诉应用程序已经改变了用户配置设置