找回密码
 加入
搜索
查看: 67283|回复: 5

[AU3基础] 如何通过脚本设置系统字体&区域与语言选项?

  [复制链接]
发表于 2013-7-26 23:10:19 | 显示全部楼层 |阅读模式
本帖最后由 baozhiwen 于 2013-7-26 23:11 编辑

问题1
以前每台机器通过手动方式来修改右击桌面属性->外观->高级外观里面的对话框等显示的字体,改为微软雅黑。如下图中窗口:

现在想通过脚本来自动修改,可有谁做过这样的设置?这个是保存在注册表中的还是?

问题2
如何来通过脚本来自动修改区域与语言?如下图,在系统里哪里修改 啊。希望知道的人分享下哦~

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
 楼主| 发表于 2013-7-27 09:47:02 | 显示全部楼层
木有人知道么~~~
发表于 2013-7-27 12:57:26 | 显示全部楼层

;第一个
Opt("WinTitleMatchMode", 2)
Run("control.exe desk.cpl")
While True
        Sleep(500)
        If WinExists("显示") Then ExitLoop
WEnd
WinActivate("显示")
Sleep(500)
While True
        ControlCommand("", "", "[CLASS:SysTabControl32; INSTANCE:1]", "TabRight", "")
        Sleep(500)
        If 4 = ControlCommand("", "", "[CLASS:SysTabControl32; INSTANCE:1]", "CurrentTab", "") Then ExitLoop
WEnd
ControlClick("显示", "", "[CLASS:Button; INSTANCE:2]")
Sleep(500)
While True
        Sleep(500)
        If WinExists("高级外观") Then ExitLoop
WEnd
ControlCommand("高级外观", "", "[CLASS:ComboBox; INSTANCE:1]", "SelectString", "消息框")
Sleep(500)
ControlCommand("高级外观", "", "[CLASS:ComboBox; INSTANCE:2]", "SelectString", "微软雅黑")
Sleep(500)
ControlClick("高级外观", "", "[CLASS:Button; INSTANCE:6]")
Sleep(500)
WinActivate("显示")
While True
        Sleep(500)
        If WinExists("显示") Then ExitLoop
WEnd
ControlClick("显示", "", "[CLASS:Button; INSTANCE:3]")
发表于 2013-7-27 17:23:24 | 显示全部楼层
regsnap 监控修改后注册表变动,au3通过regwrite修改并刷新。
发表于 2013-7-28 11:34:40 | 显示全部楼层
LS 正解
1楼模拟点击
2楼对比注册表
发表于 2013-7-29 14:44:44 | 显示全部楼层
不错,期待能更加直接地进行调整的代码出现
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-5-8 05:22 , Processed in 0.079807 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表