[PA] 업무자동화/[AH]Autohotkey

AH 유틸; 진행상태 Progress

Weneedu 2020. 3. 24. 20:48

20200324 2046 

 

01 진행상태 표시 창/막대

 

#SingleInstance, Force
#Persistent
zProcessFunc(zMsg:="AH Time Passed"){
SysGet, zMonitorWorkArea, MonitorWorkArea,
static zBegTime
zx:=150 ; need to move window
zy:=70 ; need to move window
zBegTime:=A_TickCount ;, sec:=seconds, step:=1000/sec
zElapsedTime:=Round((A_TickCount-zBegTime)/1000,0)
zWidth:= "W" zx
zHeight:= "H" zy
zXpos:="X" A_ScreenWidth - zx
zBarAndBorder:=9
zYpos:="Y" zMonitorWorkAreaBottom - zy - zBarAndBorder
Progress,B1 %zWidth% %zHeight% %zXpos% %zYpos% FM10 FS10 CTFF0000, %zElapsedTime%, %zMsg%, zProcess,
SetTimer, update, 100
return

update:
zElapsedTime:=Round((A_TickCount-zBegTime)/1000,0)
progress,%zElapsedTime%,%zElapsedTime%
return
}

zProcessFunc()