AU3源码,写仿YLMF的一键还原界面

2022-04-13 07:40:03   文档大全网     [ 字体: ] [ 阅读: ]

#文档大全网# 导语】以下是®文档大全网的小编为您整理的《AU3源码,写仿YLMF的一键还原界面》,欢迎阅读!
一键,还原,源码,界面,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.wddqxz.cn/ce885b0b1a2e453610661ed9ad51f01dc2815789.html

相关推荐