AU3源码,写仿YLMF的一键还原界面
说明：文章内容仅供预览，部分内容可能不全。下载后的文档，内容与下面显示的完全一致。下载之前请确认下面内容是否您想要的，是否完整无缺。
AU3源码,写仿YLMF的一键还原界面.txt其实全世界最幸福的童话，不过是一起度过柴米油盐的岁月。一个人愿意等待，另一个人才愿意出现。感情有时候只是一个人的事，和任何人无关。爱，或者不爱，只能自行了断。#Region ;**** 参数创建于 AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_icon=LOGO\biosclub.ico #AutoIt3Wrapper_outfile=e:\onekey.exe #EndRegion ;**** 参数创建于 AutoIt3Wrapper_GUI **** #include #Region ### START Koda GUI section ### Form=e:\脚本\au3\gui\onekey.kxf Global $sysinfo1, $sysinfo2 $sysinfo1 = True $AForm1 = GUICreate("onekey 一键备份还原", 351, 200, -1, -1,$WS_SIZEBOX+$WS_SYSMENU) $varhd = "C:" $getlist = "C:" $Group1 = GUICtrlCreateGroup("", 7, 0, 337, 132) $Group2 = GUICtrlCreateGroup("Ghost 操作：", 13, 13, 147, 47) $bf = GUICtrlCreateRadio("备分", 29, 30, 55, 17) $hy = GUICtrlCreateRadio("还原", 94, 31, 49, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $bfhy = GUICtrlCreateGroup("备份分区：", 165, 13, 172, 60) $Label1 = GUICtrlCreateLabel("C:盘总体容量：" & Round(DriveSpaceTotal("c:")) & "M", 186, 34, 141, 17, $WS_DISABLED) ;$Label1 = GUICtrlCreateLabel("", 186, 34, 141, 17,$WS_DISABLED) $Label2 = GUICtrlCreateLabel("", 186, 52, 141, 17, $WS_DISABLED) $List1 = GUICtrlCreateCombo($varhd, 225, 11, 39, 20,$CBS_DROPDOWNLIST) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group4 = GUICtrlCreateGroup("Ghost 镜像文件路径：", 14, 72, 324, 51) Global $sTmpFile = 'G:\Ghost\C_WinXP.GHO' Global $hFile = GUICtrlCreateInput("G:\Ghost\C_WinXP.GHO", 21, 90, 241, 21) GUICtrlSetState(-1, $GUI_DROPACCEPTED) Global $hFileSel1 = GUICtrlCreateButton("保存(S)", 268, 89, 65, 22) $advbt = GUICtrlCreateButton("高级(&A)", 24, 139, 65, 23) $Button3 = GUICtrlCreateButton("撤销(&S)", 106, 139, 65, 23) $Button4 = GUICtrlCreateButton("确定(&O)", 187, 139, 65, 23) $cancelbutton = GUICtrlCreateButton("退出(&X)", 269, 139, 65, 23) GUICtrlSetState($hy, $GUI_CHECKED) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### $var = DriveGetDrive("FIXED") If Not @error Then For $i = 1 To $var[0] $varhd = GUICtrlSetData($List1, StringUpper($var[$i])) $lasthd = StringUpper($var[0]) $lastdrv = StringUpper($var[$lasthd]) Next EndIf While 1 $Msg = GUIGetMsg() Select Case $Msg = $cancelbutton Or $Msg = $GUI_EVENT_CLOSE ExitLoop Case $Msg = $hy $sysinfo1 = True $sysinfo2 = False $bfhyt = "还原分区：" GUICtrlSetData($bfhy, $bfhyt) GUICtrlSetData($hFileSel1, "打开(&O)") ControlDisable("", "", $Button4) ControlHide("", "", $Label2) GUICtrlSetData($Label1, $getlist & "盘总体容量：" & Round(DriveSpaceTotal($getlist)) & "M") Case $Msg = $bf $sysinfo2 = True $sysinfo1 = False $bfhyt = "备份分区：" GUICtrlSetData($bfhy, $bfhyt) GUICtrlSetData($hFileSel1, "保存(&S)") ControlEnable("", "", $Button4) ControlEnable("", "", $Button3) ControlShow("", "", $Label2) GUICtrlSetData($Label1, $getlist & "盘已用空间：" & (Round(DriveSpaceTotal($getlist)) - Round(DriveSpaceFree($getlist))) & "M") GUICtrlSetData($Label2, $lastdrv & "盘可用空间：" & Round(DriveSpaceFree($lastdrv)) & "M") Case $Msg = $hFileSel1 If $bfhyt = "还原分区：" Then Global $sTmpFile = FileOpenDialog("Select file:", "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}", "(*.gho;)") If @error Then ContinueLoop GUICtrlSetData($hFile, $sTmpFile) Else Global $sTmpFile = FileSaveDialog("Select file:", "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}", "(*.gho;)") If @error Then ContinueLoop GUICtrlSetData($hFile, $sTmpFile) EndIf Case $Msg = $List1 ;If BitAnd(GUICtrlRead($hy), $GUI_DEFBUTTON) Then If $sysinfo1 = True Then $getlist = GUICtrlRead($List1) GUICtrlSetData($Label1, $getlist & "盘总体容量：" (Round(DriveSpaceTotal($getlist))) & "M") Else GUICtrlSetData($Label1, $getlist & "盘已用空间：" (Round(DriveSpaceTotal($getlist)) - Round(DriveSpaceFree($getlist))) & "M") EndIf If $sysinfo2 = True Then $getlist = GUICtrlRead($List1) GUICtrlSetData($Label1, $getlist & "盘已用空间：" (Round(DriveSpaceTotal($getlist)) - Round(DriveSpaceFree($getlist))) & "M") Else GUICtrlSetData($Label1, $getlist & "盘总体容量：" (Round(DriveSpaceTotal($getlist))) & "M") EndIf Case $Msg = $advbt GUICtrlSetData($advbt, "简洁(&S)") ;### Tidy Error -> "wend" is closing previous "case" EndSelect WEnd & & & & 本文来源：https://www.wddqw.com/doc/ce885b0b1a2e453610661ed9ad51f01dc2815789.html