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

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


2024年9月3日发(作者:)

AU3源码,写仿YLMF的一键还原界面.txt其实全世界最幸福的童话,不过是一起度过

柴米油盐的岁月。一个人愿意等待,另一个人才愿意出现。感情有时候只是一个人的事,和

任何人无关。爱,或者不爱,只能自行了断。#Region ;**** 参数创建于

AutoIt3Wrapper_GUI ****

#AutoIt3Wrapper_icon=

#AutoIt3Wrapper_outfile=e:

#EndRegion ;**** 参数创建于 AutoIt3Wrapper_GUI ****

#include <3>

#Region ### START Koda GUI section ### Form=e:脚本

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:GhostC_'

Global $hFile = GUICtrlCreateInput("G:GhostC_", 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 &

Case $Msg = $bf

$sysinfo2 = True

$sysinfo1 = False

$bfhyt = "备份分区:"

GUICtrlSetData($bfhy, $bfhyt)

GUICtrlSetData($hFileSel1, "保存(&S)")

ControlEnable("", "", $Button4)

盘总体容量:& ""

Round(DriveSpaceTotal($getlist)) & "M")

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

体容量:" &


发布者:admin,转转请注明出处:http://www.yc00.com/web/1725294147a3522059.html

相关推荐

发表回复

评论列表(0条)

  • 暂无评论

联系我们

400-800-8888

在线咨询: QQ交谈

邮件:admin@example.com

工作时间:周一至周五,9:30-18:30,节假日休息

关注微信