找回密码  加入

AUTOIT CN

搜索
查看: 18376|回复: 157

[原创] AuVerManage_1.4[Au3版本管理] 181010更新

[复制链接]
发表于 2015-10-28 01:44:00 | 显示全部楼层 |阅读模式
本帖最后由 afan 于 2018-10-11 00:09 编辑

20181010 发布 v1.4
        [修正]某些操作可能造成菜单首行空白(无默认双击项)的问题
        [修正]切换版本后可能在注销或重启后才正常的问题




简单介绍:
本程序主要用于多个版本的 AutoIt3 切换与管理。
可安装、卸载版本
可添加多个版本随时切换
可于非当前版本下(可指定版本)运行Au3脚本
可编辑管理右键菜单
可编辑管理快捷方式
可编辑管理文件模板
可编辑管理用户Include目录
可设置au3文件图标
可查看英文官方最新版本信息
……
更新历史

20181010 发布 v1.4
        [修正]某些操作可能造成菜单首行空白(无默认双击项)的问题
        [修正]切换版本后可能在注销或重启后才正常的问题

20161027 发布 v1.3
        [修正]在主设置窗口右键造成的数组错误退出

20160223 发布 v1.2
        [修改]未安装Au3时强制进入设置界面
        [修正]未安装Au3时菜单管理首行空白
        [修改]重复运行时激活上一个实例
        [新增]JUI界面触边隐藏/显示,默认开启,可在设置菜单中选择

20160114 发布 v1.1
        [修正]添加拖放运行时的工作路径,以避免文件相对路径的错误问题
        [新增]JUI界面空白处添加右键“最小化到托盘”、“直接退出”菜单;悬停退出按钮会有当前为“退出”或“关闭到托盘”的提示
        [新增]JUI界面按钮添加右键菜单,可打开该版本安装路径
        [修改]在版本路径发生变化时,若已存在用户模板,则自动修正模板内路径为当前路径

20151101 发布 v1.0
        [新增]增加JUI界面,并可随时与主设置界面互相切换;菜单中可设置启动界面为设置或JUI界面
           添加版本&设置完成后,在设置界面仅切换版本稍显大材小用,切换到JUI更直观、方便
           当前版本为突出的亮色,切换版本只需按相应按钮,一键即可
           原伸缩界面功能已成鸡肋,以进入JUI界面入口代替;双击界面大图标亦可进入
           同时取消主设置界面拖放文件执行,改为统一在更方便的JUI界面执行:
           在JUI界面拖放文件在版本按钮上,即可在指定的版本环境执行脚本
           拖放文件后界面随即改为测试模式,整个界面变色,右上角现星形,提示当前运行于测试脚本模式
           测试模式下,同一文件无需多次拖拉,直接按需测试的版本按钮即可
           测试完成,点击界面的右上角现星形,恢复到正常模式
        [修改]所有可以点击的静态标签(按钮)均由响应鼠标单击按下改为按钮形式的响应按下并抬起,以免误操作
        [新增]记忆退出时的窗口坐标

20151031 发布 v0.9.5
        [修正]相同版本号不同路径下禁用、启用的逻辑问题
        [修正]底部"已修改"提示在切换到当前版本时不消失的问题
        [修正]在系统架构(如x86)发生变化时,若已存在用户模板,不自动保存该架构版本到模板的问题
        [修改]"当前版本"在ComboBox下拉选择变化时文本切换为更合适的"选择版本"
        [修改]应用版本时,在勾选刷新的前提下,如果和之前版本的文件图标相同则不刷新
        [新增]主菜单添加窗口置顶、界面可随处点击拖动
        [新增]菜单栏直观显示当前版本,并可直接返回到该版本
        [新增]拖动au3文件到本程序窗口可于当前选择的版本下运行(不改变当前版本)
           可非常方便的进行临时性测试,而无需来回切换
           由于限定其为临时性,可能不适合有读写Au3相关路径键值的脚本
        [修改]同时只允许运行一个实例,重复运行会提示
        [修改]默认关闭到托盘图标改为直接退出
        [新增]加载用户、通用设置时,校验并修正编译主程序的路径,以确保右键菜单的目标准确性
        [新增]版本列表支持使用相对路径(本程序与Au3路径处于同一盘符),对于U盘之类随身版本尤其有用
        [新增]增删版本窗口添加浏览选择目录按钮

20151028 发布初版 0.9

详细介绍:

游客,如果您要查看本帖隐藏内容请回复

本帖子中包含更多资源

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

x

评分

5

查看全部评分

发表于 2015-10-28 07:40:10 | 显示全部楼层
居然抢到了Afan的沙发

评分

1

查看全部评分

发表于 2015-10-28 07:50:28 | 显示全部楼层
xuexi.............................
发表于 2015-10-28 08:43:59 | 显示全部楼层
谢谢A版分享。半夜还在发,辛苦辛苦
发表于 2015-10-28 09:29:39 | 显示全部楼层
沙发是没轮到。
发表于 2015-10-28 09:30:00 | 显示全部楼层
简单介绍:
本程序主要用于多个版本的 AutoIt3 切换与管理。
可安装、卸载版本
可添加多个版本随时切换
...
afan 发表于 2015-10-28 01:44


到底是专家级高手,出手的东西就是不一样!
不过我还是觉得我自己的好用些, 就是界面太难看了.......... 呵呵........

本帖子中包含更多资源

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

x
发表于 2015-10-28 10:24:40 | 显示全部楼层
你们都是大神
 楼主| 发表于 2015-10-28 10:32:01 | 显示全部楼层
抢沙发的都是老伙计…
 楼主| 发表于 2015-10-28 10:36:45 | 显示全部楼层
到底是专家级高手,出手的东西就是不一样!
不过我还是觉得我自己的好用些, 就是界面太难看了.......... ...
131738 发表于 2015-10-28 09:30



    自用的和公用的定位不同,当然功能也会不同。够用就好~ 呵呵~
发表于 2015-10-28 11:09:16 | 显示全部楼层
自用的和公用的定位不同,当然功能也会不同。够用就好~ 呵呵~
afan 发表于 2015-10-28 10:36


不过我这个有个 BUG 一直不知如何解决, 借此机会讨教一下:
比如当前使用 15.0 的 AutoIt, 并且这个文件夹(或者某个文件)已经被打开,
此时要切换到 14.2, 而我忘记关闭 15.0 的文件夹(或文件), 问题来了:
结果程序将 14.2 的文件夹复制到 15.0 的文件夹内了.....

问题是, 我不知如何检测某个文件夹(或该文件夹内的文件)已经被打开了? 能帮帮我吗?
发表于 2015-10-28 12:29:15 | 显示全部楼层
谢谢分享,下载收藏
 楼主| 发表于 2015-10-28 14:02:44 | 显示全部楼层
不过我这个有个 BUG 一直不知如何解决, 借此机会讨教一下:
比如当前使用 15.0 的 AutoIt, 并且这个文件 ...
131738 发表于 2015-10-28 11:09



    这个我不知道你是如何切换的,怎么还要复制文件?那不会很麻烦吗…
发表于 2015-10-28 14:50:17 | 显示全部楼层
不知道能不能切换ACC版本和ACN版本编辑器之类的也切换呢
发表于 2015-10-28 15:07:34 | 显示全部楼层
本帖最后由 131738 于 2015-10-28 15:11 编辑
这个我不知道你是如何切换的,怎么还要复制文件?那不会很麻烦吗…
afan 发表于 2015-10-28 14:02
  1. #AutoIt3Wrapper_Res_Language=2052
  2. #AutoIt3Wrapper_UseX64=n
  3. #AutoIt3Wrapper_Res_LegalCopyright=Copyright ? 2013-2015
  4. #AutoIt3Wrapper_Run_Obfuscator=y
  5. #AutoIt3Wrapper_UseUpx=y
  6. #AutoIt3Wrapper_Res_Fileversion=1.0
  7. #AutoIt3Wrapper_OutFile=切换 AutoIt3 版本.exe
  8. #AutoIt3Wrapper_Icon=Icon_1.ico
  9. #include <GUIConstantsEx.au3>
  10. #include <Array.au3>
  11. #include <File.au3>
  12. #include <EditConstants.au3>

  13. $FileVersion_1 = FileGetVersion(@ScriptDir & "\AutoIt3\AutoIt3.exe"); 返回如 -- 3.3.12.0
  14. $FileVersion_2 = FileGetVersion(@ScriptDir & "\AutoIt3\SciTE\SciTE.exe"); 返回如 -- 3.4.4.0

  15. ;列表文件夹名称到数组-- [0]=文件夹数量, [1]---[n]=文件夹名称
  16. $aDir_Array = _FileListToArrayRec(@ScriptDir, "AutoIt3_*", 2, 0, 1, 0)
  17. ;~ _ArrayDisplay($aDir_Array)

  18. Global $go[$aDir_Array[0] + 1]
  19. $go[0] = $aDir_Array[0]

  20. Local $hGUI = GUICreate("切换 AutoIt3 版本", 360, 200, -1, -1)
  21. WinSetOnTop($hGUI, "切换 AutoIt3 版本", 1)

  22. GUICtrlCreateLabel("当前版本" & @CRLF & "AutoIt3:  v" & $FileVersion_1 & "    SciTE: v" & $FileVersion_2, 5, 10, 350, 35, $ES_CENTER)
  23. GUICtrlSetFont(-1, 12, 800)

  24. For $i = 1 To $aDir_Array[0]
  25.         $go[$i] = GUICtrlCreateRadio($aDir_Array[$i], 100, 30 + ($i * 30), 120, 20)
  26. Next
  27. ;~ _ArrayDisplay($go)

  28. $Button = GUICtrlCreateButton ( "切换", 290, 150, 60, 30)

  29. GUISetState(@SW_SHOW, $hGUI)

  30. While 1
  31.         Local $Control_Text
  32.         $msg = GUIGetMsg()
  33.         If $msg = $GUI_EVENT_CLOSE Then ExitLoop

  34.         If $msg > 1 Then
  35.                 For $x = 1 To $go[0]
  36.                         If GUICtrlRead ($go[$x]) =  $GUI_CHECKED Then
  37.                                 $Control_Text = ControlGetText ($hGUI, "切换 AutoIt3 版本", $go[$x])
  38.                         Else
  39.                                 ContinueLoop
  40.                         EndIf
  41.                 Next
  42.         EndIf

  43.         If $msg = $Button And $Control_Text <> "" Then
  44.                 DirMove (@ScriptDir & "\AutoIt3", @ScriptDir & "\AutoIt3_v" & $FileVersion_1, 1)
  45.                 DirMove (@ScriptDir & "" & $Control_Text, @ScriptDir & "\AutoIt3", 1)
  46.                 ExitLoop
  47.         EndIf
  48. WEnd

复制代码
其实就是想请教: 如何检测指定的文件夹(或该文件夹内的文件)是否被打开?
 楼主| 发表于 2015-10-28 16:48:13 | 显示全部楼层
不知道能不能切换ACC版本和ACN版本编辑器之类的也切换呢
xz00311 发表于 2015-10-28 14:50



    都是可以的,而且可以按个人的习惯编辑个人模板,让所有的版本统一一样的使用习惯。
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2019-1-19 17:32 , Processed in 0.092838 second(s), 18 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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