AH GUI, 필터링조건

20200421 1831

 

01 날짜, 보낸이, 제목으로 필터링

 

 

Gui, Add, Text, x22 y10 w100 h25 , Rec'd Date(9999y=All)
Gui, Add, DateTime,vTxtDate  x142 y10 w100 h25 , 

Gui, Add, Text, x22 y45 w100 h25 , Title containing
Gui, Add, Edit, vTxtTitle x142 y40 w100 h25 , %zFilterTitle%

;Gui, Add, Text, x134 y118 w-12 h-69 , 
Gui, Add, Text, x22 y80 w100 h25 , Sender
Gui, Add, Edit, vTxtSender x142 y70 w100 h25 , %zFilterSender%

zzz:=SubStr(zPrevousReadMail,1,15) "..."
Gui, Add, Text, x22 y110 w240 h30 , [LastMail]%zzz%

Gui, Add, CheckBox, vC1 x22 y135 ,Ignore_Previously_Read_Mail
;Gui, Add, CheckBox, vC1 ,Ignore_Previously_Read_Mail

Gui, Add, Button, gBtnRun x22 y180 w100 h25 , Run
Gui, Add, Button, gBtnCanc x142 y180 w100 h25 , Cancel

; Generated using SmartGUI Creator for SciTE
Gui, Show, w270 h220, Filtering Conditions
return

BtnCanc:
ExitApp


GuiClose:
Gui Destroy
MsgBox,% vTxtDate
;ExitApp

BtnRun:
gui,submit, hohide ;##################### very important
FormatTime, zTime0, TxtDate, yyyy
FormatTime, zTime, TxtDate, yyyyMMdd
if(zTime0=9999)
    zTime:=""

zTemp:=A_WorkingDir "\setting\AH2001_previousReadMail.dat"

if(C1=1) {
    FileDelete, %zTemp% ;################ %% please~~
    zPrevousReadMail=""
    ;MsgBox, %zTemp%
}
zFilterDate:=zTime
zFilterSender:=TxtSender
zFilterTitle:=TxtTitle

;MsgBox, %C1%
Gui Destroy