[说明]AU3源码,写仿YLMF的一键还原界面

合集下载
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

AU3源码,写仿YLMF的一键还原界面
#AutoIt3Wrapper_icon=LOGO\biosclub.ico
#AutoIt3Wrapper_outfile=e:\onekey.exe
#EndRegion ;**** 参数创建于 AutoIt3Wrapper_GUI ****
#include <GUIConstants.au3>
#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。

相关文档
最新文档